From 8b06d627bf4ffd889f39b60e98a9a7b6b28f2d36 Mon Sep 17 00:00:00 2001 From: Ward Wouts Date: Thu, 12 Dec 2002 10:40:38 +0000 Subject: [PATCH] show line numbers when moving multiple files to the same name in interactive mode --- mvwrap/mvwrap | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/mvwrap/mvwrap b/mvwrap/mvwrap index dbd5d68..4cf4182 100755 --- a/mvwrap/mvwrap +++ b/mvwrap/mvwrap @@ -190,7 +190,11 @@ sub which_doubles { foreach (keys %selector) { if ( scalar(@{$selector{$_}}) > 1 ) { print "Doubles detected:\n"; - map {print "$source[$_] -> $target[$_]\n";} @{$selector{$_}}; + if (@pattern) { # non-interactief + map {print "$source[$_] -> $target[$_]\n";} @{$selector{$_}}; + } else { # interactief + map {print "[line: $_] $source[$_] -> $target[$_]\n";} @{$selector{$_}}; + } } } }