One more try at quote preference

Author: kipcole9

lib/cldr/backend/cldr_backend.ex

@@ -490,8 +490,10 @@ defmodule Cldr.Backend do
         with {:ok, %LanguageTag{cldr_locale_name: locale_name}} <- validate_locale(locale) do
           marks = quote_marks_for(locale_name)
 
-          # IO.inspect marks.quotation_start, label: "Quote start for #{locale_name}"
-          # IO.inspect marks.quotation_end, label: "Quote end for #{locale_name}"
+          if is_binary(marks.quotation_start) || is_binary(marks.quotation_end) do
+            IO.inspect marks.quotation_start, label: "Quote start for #{locale_name}"
+            IO.inspect marks.quotation_end, label: "Quote end for #{locale_name}"
+          end
 
           quote_start = quote_preference(marks.quotation_start, preference)
           quote_end = quote_preference(marks.quotation_end, preference)
@@ -500,8 +502,19 @@ defmodule Cldr.Backend do
         end
       end
 
-      defp quote_preference(marks, preference) when is_map_key(marks, preference),
-        do: Map.fetch!(marks, preference)
+      # There is an anomalous behaviour in CI where somehow the marks show up
+      # as binary even though debugging says thats not so. Therefore this needs
+      # revisiting at some time. `marks` should always be a map, and always have
+      # a map entry of :default.
+
+      defp quote_preference(marks, preference) do
+        if is_binary(marks) do
+          marks
+        else
+          Map.get(marks, preference) || Map.fetch!(marks, :default)
+        end
+      end
+
 
       @doc """
       Add locale-specific ellipsis to a string.