Support Range :values in catalogue

Author: davydog187

lib/surface/catalogue/components/component_api.ex

@@ -122,6 +122,10 @@ defmodule Surface.Catalogue.Components.ComponentAPI do
     "—"
   end
 
+  defp format_values(%Range{} = range) do
+    raw(["<code>", inspect(range), "</code>"])
+  end
+
   defp format_values(values) do
     values
     |> Enum.map(fn value -> raw(["<code>", format_value(value), "</code>"]) end)

lib/surface/catalogue/components/prop_input.ex

@@ -126,15 +126,12 @@ defmodule Surface.Catalogue.Components.PropInput do
   defp css_value_to_string(nil), do: nil
   defp css_value_to_string(value), do: Enum.join(value, " ")
 
-  defp get_choices(prop) do
-    values =
-      prop.opts
-      |> Keyword.get(:values, [])
-      |> Enum.map(&{&1, &1})
+  defp get_choices(%{opts: opts}) do
+    values = for x <- Keyword.get(opts, :values, []), do: {x, x}
 
     cond do
       values == [] -> []
-      prop.opts[:required] -> values
+      opts[:required] -> values
       true -> [{"nil", "__NIL__"} | values]
     end
   end