X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/03cd941d3e48fc3e2455640c74e8ab3fb179dcf1..511e5cb5b3c261068e3e1d3a9384ee0fab93d73f:/SL/SessionFile.pm?ds=sidebyside

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);