parent
f9cbe871ad
commit
0c9fe2f99c
|
@ -130,9 +130,6 @@ sub sessioncgi ($$) { #{{{
|
|||
htmllink("", "", $page, noimageinline => 1)));
|
||||
}
|
||||
|
||||
# Must be editiable.
|
||||
IkiWiki::check_canedit($page, $q, $session);
|
||||
|
||||
# Must exist on disk, and be a regular file.
|
||||
my $file=$pagesources{$page};
|
||||
if (! -e "$config{srcdir}/$file") {
|
||||
|
@ -142,10 +139,18 @@ sub sessioncgi ($$) { #{{{
|
|||
error(sprintf(gettext("%s is not a file"), $file));
|
||||
}
|
||||
|
||||
push @files, IkiWiki::possibly_foolish_untaint($file);
|
||||
# Must be editiable.
|
||||
IkiWiki::check_canedit($page, $q, $session);
|
||||
|
||||
# This is sorta overkill, but better safe
|
||||
# than sorry. If a user can't upload an
|
||||
# attachment, don't let them delete it.
|
||||
if ($q->param("attachment")) {
|
||||
IkiWiki::Plugin::attachment::check_canattach($session, $page, $file);
|
||||
}
|
||||
|
||||
# TODO check attachment limits.
|
||||
push @files, IkiWiki::possibly_foolish_untaint($file);
|
||||
}
|
||||
|
||||
# Do removal, and update the wiki.
|
||||
require IkiWiki::Render;
|
||||
|
|
Loading…
Reference in New Issue