1 |
diff -Nur -x '*.orig' -x '*.rej' perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm |
2 |
--- perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm 2005-10-31 10:24:02.000000000 -0700 |
3 |
+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm 2007-11-24 10:46:25.000000000 -0700 |
4 |
@@ -1015,7 +1015,7 @@ |
5 |
my $fm = shift; |
6 |
my $cgi = $fm->{cgi}; |
7 |
|
8 |
- my $fn = join "/", ($fm->{sessiondir},$cgi->param('.id')); |
9 |
+ my $fn = $cgi->param('.id'); |
10 |
my $po = new Persistence::Object::Simple __Fn => $fn; |
11 |
|
12 |
my @names = $cgi->param (); |