summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xLedgerSMB/Form.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 63048646..90fb16c9 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -196,8 +196,8 @@ sub error {
} else {
- if ($self->{error_function}) {
- &{ $self->{error_function} }($msg);
+ if ($ENV{error_function}) {
+ &{ $ENV{error_function} }($msg);
} else {
die "Error: $msg\n";
}
@@ -223,8 +223,8 @@ sub info {
} else {
- if ($self->{info_function}) {
- &{ $self->{info_function} }($msg);
+ if ($ENV{info_function}) {
+ &{ $ENV{info_function} }($msg);
} else {
print "$msg\n";
}