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",
}
}