Document FillInForm and allow it to take options hash

Changes

@@ -4,6 +4,8 @@ Revision history for Mason-Plugin-HTMLFilters
 
 0.03  Feb 20, 2011
 
+- Document FillInForm and allow it to take options hash
+
 0.02  Feb 20, 2011
 
 - Require Mason

lib/Mason/Plugin/HTMLFilters.pm

@@ -38,11 +38,11 @@ Formats a block of text into HTML paragraphs.  A sequence of two or more
 newlines is used as the delimiter for paragraphs which are then wrapped in HTML
 ""<p>""...""</p>"" tags. Taken from L<Template::Toolkit|Template>. e.g.
 
-    <% $.HTMLPara { %>
+    % $.HTMLPara {{
     First paragraph.
       
     Second paragraph.
-    </%>
+    % }}
     
 outputs:
 
@@ -59,18 +59,29 @@ outputs:
 Similar to HTMLPara above, but uses the HTML tag sequence "<br><br>" to join
 paragraphs. Taken from L<Template::Toolkit|Template>. e.g.
 
-    <% $.HTMLPara { %>
+    % $.HTMLPara {{
     First paragraph.
       
     Second paragraph.
-    </%>
+    % }}
     
 outputs:
 
     First paragraph.
     <br><br>
     Second paragraph.
 
+=item FillInForm ($form_data, %options)
+
+Uses L<HTML::FillInForm|HTML::FillInForm> to fill in the form with the
+specified I<$form_data> and I<%options>.
+
+    % $.FillInForm($form_data, target => 'form1') {{
+    ...
+    <form name='form1'>
+    ...
+    % }}
+
 =back
 
 =head1 SUPPORT

lib/Mason/Plugin/HTMLFilters/Filters.pm

@@ -45,12 +45,12 @@ method HTMLParaBreak () {
     };
 }
 
-method FillInForm ($fdat) {
+method FillInForm ($form_data, %options) {
     require HTML::FillInForm;
     sub {
         my $html = $_[0];
-        return $html if !defined($fdat);
-        return HTML::FillInForm->fill( \$html, $fdat );
+        return $html if !defined($form_data);
+        return HTML::FillInForm->fill( \$html, $form_data, %options );
     };
 }