From: Joey Hess <joey@kitenet.net>
Date: Wed, 15 Jun 2011 21:46:08 +0000 (-0400)
Subject: fix removal of staged attachments
X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/commitdiff_plain/00c0677588920832bad40d10f7d0fee5312fb115?ds=sidebyside

fix removal of staged attachments
---

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