diff --git a/IkiWiki/Plugin/attachment.pm b/IkiWiki/Plugin/attachment.pm index ea40379ff..f97ab45a4 100644 --- a/IkiWiki/Plugin/attachment.pm +++ b/IkiWiki/Plugin/attachment.pm @@ -322,12 +322,13 @@ sub attachment_list ($) { my $dir=attachment_holding_dir($page); my $heldmsg=gettext("this attachment is not yet saved"); foreach my $file (glob("$dir/*")) { - my $mtime=(stat($file))[9]; - my $f=$file; - $f=~s/^\Q$dir\E\///; + next unless -f $file; + my $mtime=(stat(_))[9]; + my $base=IkiWiki::basename($file); + my $f=$loc.$base; $attachments{$f}={ - $std->($page."/".$f, (stat($file))[9], (stat($file))[7]), - link => "$f", + $std->($f, (stat($file))[9], (stat(_))[7]), + link => "$base", } }