--- fuse-comp.pl	2007/07/10 02:57:03	29
+++ fuse-comp.pl	2007/07/10 10:48:21	30
@@ -207,9 +207,16 @@
 			unlink $comp || confess "can't remove: $comp: $!";
 		} else {
 			warn ">>> compressed $size_path -> $size_comp ",int(($size_comp * 100) / $size_path),"% $comp\n";
+
 			# FIXME add timeout to remove uncompressed version?
 			unlink $path || confess "can't remove $path: $!";
+
+			if ( -e $dest ) {
+				warn "## cleanup uncompressed $dest\n" if $debug;
+				unlink $dest || confess "can't remove $dest: $!";
+			}
 		}
+
 	}
 }