X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/b66261d08bb978a1c5b1fe02ef25b49b4cd9d9e6..00c0677588920832bad40d10f7d0fee5312fb115:/IkiWiki/Plugin/remove.pm

diff --git a/IkiWiki/Plugin/remove.pm b/IkiWiki/Plugin/remove.pm
index e6f7e1dbd..b94447020 100644
--- a/IkiWiki/Plugin/remove.pm
+++ b/IkiWiki/Plugin/remove.pm
@@ -119,17 +119,17 @@ sub removal_confirm ($$@) {
 	my @pages=@_;
 		
 	# Special case for unsaved attachments.
-	@pages=grep {
+	foreach my $page (@pages) {
 		if (IkiWiki::Plugin::attachment->can("is_held_attachment")) {
-			my $f=IkiWiki::Plugin::attachment::is_held_attachment($_);
+			my $f=IkiWiki::Plugin::attachment::is_held_attachment($page);
 			if (defined $f) {
+				print STDERR "!! remove $f\n";
 				require IkiWiki::Render;
 				IkiWiki::prune($f);
-				0;
 			}
 		}
-		1;
-	} @pages;
+	}
+	@pages=grep { exists $pagesources{$_} } @pages;
 	return unless @pages;
 
 	foreach my $page (@pages) {