diff options
author | Joey Hess <joey@kodama.kitenet.net> | 2008-07-23 19:25:46 -0400 |
---|---|---|
committer | Joey Hess <joey@kodama.kitenet.net> | 2008-07-23 19:25:46 -0400 |
commit | 762bf0b887743db0267a50852c2eb3eaa8fb8042 (patch) | |
tree | 579b88af57cea12221099eb05f61753abdb29b5d /IkiWiki/Plugin/attachment.pm | |
parent | 4944fb6829cd6892ba24276486ad9f5b34ebee1b (diff) | |
download | ikiwiki-762bf0b887743db0267a50852c2eb3eaa8fb8042.tar ikiwiki-762bf0b887743db0267a50852c2eb3eaa8fb8042.tar.gz |
foldage
Diffstat (limited to 'IkiWiki/Plugin/attachment.pm')
-rw-r--r-- | IkiWiki/Plugin/attachment.pm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/IkiWiki/Plugin/attachment.pm b/IkiWiki/Plugin/attachment.pm index e08aa3677..9dbc66020 100644 --- a/IkiWiki/Plugin/attachment.pm +++ b/IkiWiki/Plugin/attachment.pm @@ -11,7 +11,7 @@ sub import { #{{{ hook(type => "formbuilder", id => "attachment", call => \&formbuilder); } # }}} -sub check_canattach ($$;$) { +sub check_canattach ($$;$) { #{{{ my $session=shift; my $dest=shift; # where it's going to be put, under the srcdir my $file=shift; # the path to the attachment currently @@ -43,7 +43,7 @@ sub check_canattach ($$;$) { else { return 1; } -} +} #}}} sub checkconfig () { #{{{ $config{cgi_disable_uploads}=0; @@ -207,7 +207,7 @@ sub formbuilder (@) { #{{{ $form->tmpl_param("attachment_list" => [attachment_list($form->field('page'))]); } # }}} -sub attachment_location ($) { +sub attachment_location ($) { #{{{ my $page=shift; # Put the attachment in a subdir of the page it's attached @@ -216,9 +216,9 @@ sub attachment_location ($) { $page.="/" if length $page; return $page; -} +} #}}} -sub attachment_list ($) { +sub attachment_list ($) { #{{{ my $page=shift; my $loc=attachment_location($page); @@ -240,9 +240,9 @@ sub attachment_list ($) { # Sort newer attachments to the top of the list, so a newly-added # attachment appears just before the form used to add it. return sort { $b->{mtime_raw} <=> $a->{mtime_raw} || $a->{link} cmp $b->{link} } @ret; -} +} #}}} -my %units=( # size in bytes +my %units=( #{{{ # size in bytes B => 1, byte => 1, KB => 2 ** 10, @@ -274,7 +274,7 @@ my %units=( # size in bytes # ikiwiki, if you find you need larger data quantities, either modify # yourself to add them, or travel back in time to 2008 and kill me. # -- Joey -); +); #}}} sub parsesize ($) { #{{{ my $size=shift; |