Fix display of repos configured at absolute path locations.

diff --git a/debian/changelog b/debian/changelog
index a613e50f6adb6b99a723c39244940b0ad7e3b51a..e1119a103b01f3952a9772c5a9a759fcd853fe15 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,6 +1,7 @@
 mr (0.36) UNRELEASED; urgency=low
 
   * Add webcheckout command. See http://kitenet.net/~joey/rfc/rel-vcs/
+  * Fix display of repos configured at absolute path locations.
 
  -- Joey Hess <joeyh@debian.org>  Tue, 06 Jan 2009 20:59:20 -0500
 

diff --git a/mr b/mr
index e96a3dccbb62eb5e26f4b41a8d28d8cba193d4b7..00c62fb760b22ccbaf4a0af5c63522d70b4ecec7 100755 (executable)
--- a/mr
+++ b/mr
@@ -515,12 +515,12 @@ sub action {
        }
        else {
                if (! $no_chdir) {
-                       print "mr $action: $topdir$subdir\n" unless $quiet;
+                       print "mr $action: $dir\n" unless $quiet;
                }
                else {
                        my $s=$directory;
                        $s=~s/^\Q$topdir$subdir\E\/?//;
-                       print "mr $action: $topdir$subdir (in subdir $s)\n" unless $quiet;
+                       print "mr $action: $dir (in subdir $s)\n" unless $quiet;
                }
                $command="set -e; ".$lib.
                        "my_action(){ $command\n }; my_action ".