Merge branch 'master' of git@lx-office.linet-services.de:lx-office-erp

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index bcb7cd58933ec0aed6716d928182739f4e3f420e..31020aebc86940fe706b5bb7a6ca38be5f2adb84 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -746,7 +746,7 @@ sub redirect_header {
   my $base_uri = $self->_get_request_uri;
   my $new_uri  = URI->new_abs($new_url, $base_uri);
 
-  die "Headers already sent" if $::self->{header};
+  die "Headers already sent" if $self->{header};
   $self->{header} = 1;
 
   my $cgi = $main::cgi || CGI->new('');