1 |
diff -ruN perl-CGI-FormMagick-0.92.old/lib/CGI/FormMagick/HTML.pm perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/HTML.pm |
2 |
--- perl-CGI-FormMagick-0.92.old/lib/CGI/FormMagick/HTML.pm 2013-03-16 18:45:52.000000000 -0700 |
3 |
+++ perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/HTML.pm 2013-03-16 18:47:50.000000000 -0700 |
4 |
@@ -300,8 +300,11 @@ |
5 |
print qq( <td class="sme-noborders-content">$inputfield</td>\n </tr>\n); |
6 |
|
7 |
# display errors (if any) below the field label, taking up a whole row |
8 |
- my $error = $fm->{errors}->{$info->{label}}; |
9 |
- $fm->print_field_error($error) if $error; |
10 |
+ if ($info->{label}) |
11 |
+ { |
12 |
+ my $error = $fm->{errors}->{$info->{label}}; |
13 |
+ $fm->print_field_error($error) if $error; |
14 |
+ } |
15 |
} |
16 |
} |
17 |
} |