From 2ef53b128d9f40fa998215b2809e676207050902 Mon Sep 17 00:00:00 2001 From: Simon McVittie Date: Sun, 26 Jul 2009 16:59:26 +0100 Subject: [PATCH] getsource: remove unnecessary IkiWiki:: prefixes Many variables and functions are exported. --- IkiWiki/Plugin/getsource.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/IkiWiki/Plugin/getsource.pm b/IkiWiki/Plugin/getsource.pm index 1b7eb56c6..db5614ec1 100644 --- a/IkiWiki/Plugin/getsource.pm +++ b/IkiWiki/Plugin/getsource.pm @@ -43,7 +43,7 @@ sub cgi_getsource ($) { my $cgi=shift; # Note: we use sessioncgi rather than just cgi - # because we need $IkiWiki::pagesources{} to be + # because we need %pagesources to be # populated. return unless (defined $cgi->param('do') && @@ -55,7 +55,7 @@ sub cgi_getsource ($) { IkiWiki::loadindex(); - if (! exists $IkiWiki::pagesources{$page}) { + if (! exists $pagesources{$page}) { IkiWiki::cgi_custom_failure( $cgi->header(-status => "404 Not Found"), IkiWiki::misctemplate(gettext("missing page"), @@ -66,7 +66,7 @@ sub cgi_getsource ($) { exit; } - if (! defined pagetype($IkiWiki::pagesources{$page})) { + if (! defined pagetype($pagesources{$page})) { IkiWiki::cgi_custom_failure( $cgi->header(-status => "403 Forbidden"), IkiWiki::misctemplate(gettext("not a page"), @@ -77,7 +77,7 @@ sub cgi_getsource ($) { exit; } - my $data = IkiWiki::readfile(IkiWiki::srcfile($IkiWiki::pagesources{$page})); + my $data = readfile(srcfile($pagesources{$page})); if (! $config{getsource_mimetype}) { $config{getsource_mimetype} = "text/plain; charset=utf-8"; -- 2.44.0