aboutsummaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin/attachment.pm
diff options
context:
space:
mode:
authorJoey Hess <joey@kodama.kitenet.net>2008-07-23 19:25:46 -0400
committerJoey Hess <joey@kodama.kitenet.net>2008-07-23 19:25:46 -0400
commit762bf0b887743db0267a50852c2eb3eaa8fb8042 (patch)
tree579b88af57cea12221099eb05f61753abdb29b5d /IkiWiki/Plugin/attachment.pm
parent4944fb6829cd6892ba24276486ad9f5b34ebee1b (diff)
downloadikiwiki-762bf0b887743db0267a50852c2eb3eaa8fb8042.tar
ikiwiki-762bf0b887743db0267a50852c2eb3eaa8fb8042.tar.gz
foldage
Diffstat (limited to 'IkiWiki/Plugin/attachment.pm')
-rw-r--r--IkiWiki/Plugin/attachment.pm16
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;