]> git.vanrenterghem.biz Git - git.ikiwiki.info.git/blobdiff - IkiWiki/Plugin/remove.pm
add padding between inlined page title and content
[git.ikiwiki.info.git] / IkiWiki / Plugin / remove.pm
index 869d32f9303e41a2e96198615a2171305f6732e6..c8d76368eb31813c0d5b3e40181b68afb1e94f28 100644 (file)
@@ -46,7 +46,7 @@ sub check_canremove ($$$) { #{{{
 
        # If a user can't upload an attachment, don't let them delete it.
        # This is sorta overkill, but better safe than sorry.
-       if (! defined IkiWiki::pagetype($pagesources{$page})) {
+       if (! defined pagetype($pagesources{$page})) {
                if (IkiWiki::Plugin::attachment->can("check_canattach")) {
                        IkiWiki::Plugin::attachment::check_canattach($session, $page, $file);
                }
@@ -110,7 +110,7 @@ sub removal_confirm ($$@) { #{{{
        
        my ($f, $buttons)=confirmation_form($q, $session);
        $f->title(sprintf(gettext("confirm removal of %s"),
-               join(", ", map { IkiWiki::pagetitle($_) } @pages)));
+               join(", ", map { pagetitle($_) } @pages)));
        $f->field(name => "page", type => "hidden", value => \@pages, force => 1);
        if (defined $attachment) {
                $f->field(name => "attachment", type => "hidden",
@@ -210,7 +210,7 @@ sub sessioncgi ($$) { #{{{
                                if (! exists $pagesources{$parent}) {
                                        $parent="index";
                                }
-                               IkiWiki::redirect($q, $config{url}."/".htmlpage($parent));
+                               IkiWiki::redirect($q, urlto($parent, '/', 1));
                        }
                }
                else {