summaryrefslogtreecommitdiff
path: root/.library/IkiWiki/Plugin/license.pm
diff options
context:
space:
mode:
authorThomas Schwinge <tschwinge@gnu.org>2007-11-08 00:59:14 +0100
committerThomas Schwinge <tschwinge@gnu.org>2007-11-08 01:00:10 +0100
commit9fd6a8ac202b18e83ee67d27e6d96f61ffe66510 (patch)
tree35467bf7da8ff92cfebbd9d714498dbdbb682b7d /.library/IkiWiki/Plugin/license.pm
parent254bd4a9c0aa089175813c5a027bfd60c2ee00f3 (diff)
Use more consistent Perl syntax.
Diffstat (limited to '.library/IkiWiki/Plugin/license.pm')
-rw-r--r--.library/IkiWiki/Plugin/license.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/.library/IkiWiki/Plugin/license.pm b/.library/IkiWiki/Plugin/license.pm
index 47fb34d8..da337f29 100644
--- a/.library/IkiWiki/Plugin/license.pm
+++ b/.library/IkiWiki/Plugin/license.pm
@@ -43,17 +43,17 @@ sub import
sub pagetemplate (@)
{
my %params = @_;
- my $page = $params {page};
- my $destpage = $params {destpage};
+ my $page = $params{page};
+ my $destpage = $params{destpage};
- my $template = $params {template};
+ my $template = $params{template};
if ($template->query (name => "license") &&
- ! defined $template->param('license'))
+ ! defined $template->param ('license'))
{
my $content;
my $license_page = bestlink ($page, "license") || return;
- my $license_file = $pagesources {$license_page} || return;
+ my $license_file = $pagesources{$license_page} || return;
#my $pagetype = pagetype ($license_file);
# Check if ``$pagetype eq 'html'''?
$content = readfile (srcfile ($license_file));