urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

getsource: remove unnecessary IkiWiki:: prefixes 

Many variables and functions are exported.
master
Simon McVittie 2009-07-26 16:59:26 +01:00
parent b1f31ab7cb
commit 2ef53b128d
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
IkiWiki/Plugin/getsource.pm
View File

@ -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";