Changeset 71 in text-formbuilder for trunk/lib/Text

Timestamp:

03/15/05 16:39:29 (20 years ago)

Author:

peichman

Message:

documented how to do blank labels on fields
changed !head from <h3> to <h2>
improved the default stylesheet (better looking fieldsets) and removed the <hr> from above the submit button

File:

• trunk/lib/Text/FormBuilder.pm (modified) (4 diffs)

trunk/lib/Text/FormBuilder.pm

@@ -32 +32 @@
 #author, #footer { font-style: italic; }
 caption h2 { padding: .125em .5em; background: #ccc; text-align: left; }
-fieldset { margin: 1em 0; }
+fieldset { margin: 1em 0; border: none; border-top: 2px solid #999; }
 legend { font-size: 1.25em; font-weight: bold; background: #ccc; padding: .125em .25em; border: 1px solid #666; }
 th { text-align: left; }
-th h3 { padding: .125em .5em; background: #eee; }
+th h2 { padding: .125em .5em; background: #eee; font-size: 1.25em; }
 th.label { font-weight: normal; text-align: right; vertical-align: top; }
 td ul { list-style: none; padding-left: 0; margin-left: 0; }
-.note { background: #eee; }
+.note { background: #eee; padding: .5em 1em; }
 .sublabel { color: #999; }
 .invalid { background: red; }
@@ -491 +491 @@
         TABLE_LINE: for my $line (@{ $$section{lines} }) {
             if ($$line[0] eq 'head') {
-                $OUT .= qq[  <tr><th class="subhead" colspan="2"><h3>$$line[1]</h3></th></tr>\n]
+                $OUT .= qq[  <tr><th class="subhead" colspan="2"><h2>$$line[1]</h2></th></tr>\n]
             } elsif ($$line[0] eq 'note') {
                 $OUT .= qq[  <tr><td class="note" colspan="2">$$line[1]</td></tr>\n]
@@ -543 +543 @@
     }
 %>
-  <tr><td colspan="2"><hr /></td></tr>
   <tr><th></th><td style="padding-top: 1em;"><% $submit %></td></tr>
 </table>
@@ -1003 +1002 @@
     field_3|'\'Official\' title'
 
+Quoted strings are also how you can set the label for a field to be blank:
+
+    unlabeled_field|''
+
 Now, back to the beginning. Form fields are each described on a single line.
 The simplest field is just a name (which cannot contain any whitespace):