Merge branch 'f-bundled-perl-modules'

[kivitendo-erp.git] / SL / SessionFile.pm

diff --git a/SL/SessionFile.pm b/SL/SessionFile.pm
index 7536b56d3adbac3c78f8b2f1c891b6eb4d775c98..839264074c67429e3dfb63842888216f940bc5e4 100644 (file)
--- 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);