diff options
| author | Thomas Schwinge <tschwinge@gnu.org> | 2007-11-08 00:59:14 +0100 |
|---|---|---|
| committer | Thomas Schwinge <tschwinge@gnu.org> | 2007-11-08 01:00:10 +0100 |
| commit | 9fd6a8ac202b18e83ee67d27e6d96f61ffe66510 (patch) | |
| tree | 35467bf7da8ff92cfebbd9d714498dbdbb682b7d /.library/IkiWiki/Plugin/fill_empty_page.pm | |
| parent | 254bd4a9c0aa089175813c5a027bfd60c2ee00f3 (diff) | |
| download | web-9fd6a8ac202b18e83ee67d27e6d96f61ffe66510.tar.gz web-9fd6a8ac202b18e83ee67d27e6d96f61ffe66510.tar.bz2 web-9fd6a8ac202b18e83ee67d27e6d96f61ffe66510.zip | |
Use more consistent Perl syntax.
Diffstat (limited to '.library/IkiWiki/Plugin/fill_empty_page.pm')
| -rw-r--r-- | .library/IkiWiki/Plugin/fill_empty_page.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/.library/IkiWiki/Plugin/fill_empty_page.pm b/.library/IkiWiki/Plugin/fill_empty_page.pm index b2ce1fc0..e10aff21 100644 --- a/.library/IkiWiki/Plugin/fill_empty_page.pm +++ b/.library/IkiWiki/Plugin/fill_empty_page.pm @@ -37,7 +37,7 @@ sub import sub formbuilder_setup { my %params = @_; - my $form = $params {form}; + my $form = $params{form}; my $page = $form->field ("page"); return if $form->title ne "editpage"; @@ -47,7 +47,7 @@ sub formbuilder_setup # This is obviously not the last conclusion of wisdom. my $empty_page_page = bestlink ($page, "empty_page") || return; - my $empty_page_file = $pagesources {$empty_page_page} || return; + my $empty_page_file = $pagesources{$empty_page_page} || return; my $empty_page_type = pagetype ($empty_page_file); return unless defined $empty_page_type; |