Merge pull request #159 from revelrylabs/handle-for-attribute

handle 'for' attribute in single checkbox creation

lib/harmonium.ex

@@ -201,6 +201,15 @@ defmodule Harmonium do
     end
   end
 
+  @doc """
+  Renders an input label with a for attribute.
+  """
+  def rev_label(f, key, modifiers, do: block) do
+    label f, key, class: rev_label_class(modifiers) do
+      block
+    end
+  end
+
   @doc """
   Renders an input label inner `<span>`.
   """
@@ -449,12 +458,12 @@ defmodule Harmonium do
   Render a single checkbox.
 
       iex> single_checkbox(f, :bool) |> safe_to_string()
-      "<label class=\\\"rev-InputLabel rev-Checkbox\\\"><input name=\\\"widget[bool]\\\" type=\\\"hidden\\\" value=\\\"false\\\"><input class=\\\"rev-Checkbox-input\\\" id=\\\"widget_bool\\\" name=\\\"widget[bool]\\\" type=\\\"checkbox\\\" value=\\\"true\\\"></label>"
+      "<label class=\\\"rev-InputLabel rev-Checkbox\\\" for=\\\"widget_bool\\\"><input name=\\\"widget[bool]\\\" type=\\\"hidden\\\" value=\\\"false\\\"><input class=\\\"rev-Checkbox-input\\\" id=\\\"widget_bool\\\" name=\\\"widget[bool]\\\" type=\\\"checkbox\\\" value=\\\"true\\\"></label>"
 
   You may optionally add a label:
 
       iex> single_checkbox(f, :bool, label: "Publish?") |> safe_to_string()
-      "<label class=\\\"rev-InputLabel rev-Checkbox\\\"><input name=\\\"widget[bool]\\\" type=\\\"hidden\\\" value=\\\"false\\\"><input class=\\\"rev-Checkbox-input\\\" id=\\\"widget_bool\\\" name=\\\"widget[bool]\\\" type=\\\"checkbox\\\" value=\\\"true\\\"><span class=\\\"rev-Checkbox-label\\\">Publish?</span></label>"
+      "<label class=\\\"rev-InputLabel rev-Checkbox\\\" for=\\\"widget_bool\\\"><input name=\\\"widget[bool]\\\" type=\\\"hidden\\\" value=\\\"false\\\"><input class=\\\"rev-Checkbox-input\\\" id=\\\"widget_bool\\\" name=\\\"widget[bool]\\\" type=\\\"checkbox\\\" value=\\\"true\\\"><span class=\\\"rev-Checkbox-label\\\">Publish?</span></label>"
   """
   def single_checkbox(f, key, options \\ []) do
     input_options =
@@ -475,7 +484,7 @@ defmodule Harmonium do
           end
       end
 
-    rev_label class: "rev-Checkbox" do
+    rev_label f, key, class: "rev-Checkbox" do
       ~E"<%= box %><%= label %>"
     end
   end