From 00c0677588920832bad40d10f7d0fee5312fb115 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 15 Jun 2011 17:46:08 -0400
Subject: [PATCH] fix removal of staged attachments

---
 IkiWiki/Plugin/remove.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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) {
-- 
2.44.0