From 8a149188fed60abbd8741050c7394c5f156656dc Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Fri, 15 Apr 2011 10:26:19 +0200
Subject: [PATCH] $::self typo

---
 SL/Form.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/Form.pm b/SL/Form.pm
index 33b3d04bf..11d72a6ed 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -745,7 +745,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('');
-- 
2.20.1