18 lines
826 B
Diff
18 lines
826 B
Diff
|
diff -ruN perl-CGI-FormMagick-0.92.old/lib/CGI/FormMagick/HTML.pm perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/HTML.pm
|
||
|
--- perl-CGI-FormMagick-0.92.old/lib/CGI/FormMagick/HTML.pm 2013-03-16 18:45:52.000000000 -0700
|
||
|
+++ perl-CGI-FormMagick-0.92/lib/CGI/FormMagick/HTML.pm 2013-03-16 18:47:50.000000000 -0700
|
||
|
@@ -300,8 +300,11 @@
|
||
|
print qq( <td class="sme-noborders-content">$inputfield</td>\n </tr>\n);
|
||
|
|
||
|
# display errors (if any) below the field label, taking up a whole row
|
||
|
- my $error = $fm->{errors}->{$info->{label}};
|
||
|
- $fm->print_field_error($error) if $error;
|
||
|
+ if ($info->{label})
|
||
|
+ {
|
||
|
+ my $error = $fm->{errors}->{$info->{label}};
|
||
|
+ $fm->print_field_error($error) if $error;
|
||
|
+ }
|
||
|
}
|
||
|
}
|
||
|
}
|