diff options
-rwxr-xr-x | sbosrcarch | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1241,7 +1241,7 @@ sub purge_mode { find({wanted => \&purge_pass_2_wanted, no_chdir => 1}, "by-name"); for(keys %keep_filenames) { - warn $_; + print "KEEP $_\n"; } die "end of line"; |