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
--- perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm	2007-11-24 19:16:21.000000000 -0500
+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm	2007-11-24 19:15:53.000000000 -0500
@@ -23,6 +23,7 @@
 use CGI::FormMagick::Events;
 use CGI::FormMagick::Utils;
 use CGI::FormMagick::Sub;
+use File::Basename;
 
 use strict;
 use Carp;
@@ -1015,7 +1016,7 @@
     my $fm = shift;
     my $cgi = $fm->{cgi};
 
-    my $fn = $cgi->param('.id');
+    my $fn = fileparse($cgi->param('.id'));
     my $po = new Persistence::Object::Simple __Fn => $fn;
 
     my @names = $cgi->param ();