X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/70e382870c7675c0ce054579e80336d6349e7fe9..989d69a85d92cbea4a81d4564adc36cd98a4dfe0:/SL/SessionFile.pm

diff --git a/SL/SessionFile.pm b/SL/SessionFile.pm
index 7536b56d3..839264074 100644
--- a/SL/SessionFile.pm
+++ b/SL/SessionFile.pm
@@ -26,7 +26,7 @@ sub new {
   }
 
   my $path   = $self->prepare_path;
-  $file_name =~ s:.*/::g;
+  $file_name =~ s{.*/}{}g;
   $file_name =  "${path}/${file_name}";
 
   $self->file_name($file_name);