Warnung wenn kein cookie übergeben wurde

[mfinanz.git] / SL / Auth.pm

diff --git a/SL/Auth.pm b/SL/Auth.pm
index 7ca8d0bfdd9e002a73f2a000a3f03caf28d4a980..37586b8fffd1ffc3cf0f42b9676becf9533bd0ef 100644 (file)
--- a/SL/Auth.pm
+++ b/SL/Auth.pm
@@ -512,7 +512,7 @@ sub restore_session {
   my $self = shift;
 
   $session_id        =  $::request->{cgi}->cookie($self->get_session_cookie_name());
   my $self = shift;
 
   $session_id        =  $::request->{cgi}->cookie($self->get_session_cookie_name());

-  $session_id        =~ s|[^0-9a-f]||g;
+  $session_id        =~ s|[^0-9a-f]||g if $session_id;

 
   $self->{SESSION}   = { };
 
 
   $self->{SESSION}   = { };