bugfixes
authorJoey Hess <joey@kodama.kitenet.net>
Tue, 1 Jul 2008 17:39:02 +0000 (13:39 -0400)
committerJoey Hess <joey@kodama.kitenet.net>
Tue, 1 Jul 2008 17:39:02 +0000 (13:39 -0400)
IkiWiki/Plugin/attachment.pm

index f9d7f14f6c00a882aa2a2fbad83701dfec5be17a..d2989bb8b8b45d625269a6ae7b96fd37428dad0e 100644 (file)
@@ -32,7 +32,7 @@ sub formbuilder (@) { #{{{
 
        if ($form->submitted eq "Upload") {
                my $q=$params{cgi};
-               my $filename=IkiWiki::basename($q->param('attachment'));
+               my $filename=$q->param('attachment');
                if (! defined $filename || ! length $filename) {
                        # no file, so do nothing
                        return;
@@ -46,11 +46,11 @@ sub formbuilder (@) { #{{{
                # to, unless that page is an "index" page.
                my $page=$form->field('page');
                $page=~s/(^|\/)index//;
-               $filename="$page/$filename";
+               $filename=$page."/".IkiWiki::basename($filename);
                
                # To untaint the filename, escape any hazardous characters,
                # and make sure it isn't pruned.
-               $filename=IkiWiki::titlepage(IkiWiki::possibly_foolish_untaint($filename);
+               $filename=IkiWiki::titlepage(IkiWiki::possibly_foolish_untaint($filename));
                if (IkiWiki::file_pruned($filename, $config{srcdir})) {
                        error(gettext("bad attachment filename"));
                }
@@ -71,7 +71,7 @@ sub formbuilder (@) { #{{{
 
                # Move the attachment into place.
                # Try to use a fast rename; fall back to copying.
-               prep_writefile($filename, $config{srcdir});
+               IkiWiki::prep_writefile($filename, $config{srcdir});
                unlink($config{srcdir}."/".$filename);
                if (! rename($tempfile, $config{srcdir}."/".$filename)) {
                        my $fh=$q->upload('attachment');