projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
test action
[kivitendo-erp.git]
/
SL
/
SessionFile.pm
diff --git
a/SL/SessionFile.pm
b/SL/SessionFile.pm
index
08f905b
..
8392640
100644
(file)
--- a/
SL/SessionFile.pm
+++ b/
SL/SessionFile.pm
@@
-21,8
+21,12
@@
sub new {
my $self = $class->SUPER::new;
my $self = $class->SUPER::new;
+ if ($params{session_id}) {
+ $self->session_id($params{session_id})
+ }
+
my $path = $self->prepare_path;
my $path = $self->prepare_path;
- $file_name =~ s
:.*/::
g;
+ $file_name =~ s
{.*/}{}
g;
$file_name = "${path}/${file_name}";
$self->file_name($file_name);
$file_name = "${path}/${file_name}";
$self->file_name($file_name);
@@
-149,7
+153,7
@@
Returns the full relative file name associated with this instance. If
it has been created for "customer.csv" then the value returned might
be C<users/session_files/e8789b98721347/customer.csv>.
it has been created for "customer.csv" then the value returned might
be C<users/session_files/e8789b98721347/customer.csv>.
-=item C<open
,
%params]>
+=item C<open
[
%params]>
Opens the file_name given at creation with the given parameters.
Opens the file_name given at creation with the given parameters.