From f7b9b043ef957755618188c0c17f55142f7a3506 Mon Sep 17 00:00:00 2001
From: Jim Cromie <jim.cromie@gmail.com>
Date: Sun, 13 Mar 2011 12:44:34 -0600
Subject: [PATCH] add space after testfile name, and before ok/not ok

Adding space between testfile name and ...... lets user double-click
on just the name, instead of getting all the dots too, reducing the
cmdline editing to resubmit the test manually.  Space before ok/not-ok
allows easier parsing with split /\s/, $line.  Both make output agree
more closely with that from Test::*
---
 t/TEST | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/TEST b/t/TEST
index 0c24c17..219a16f 100755
--- a/t/TEST
+++ b/t/TEST
@@ -509,7 +509,7 @@ EOT
     }
     my $maxlen = 0;
     foreach (@::path_to_name{@tests}) {
-	s/\.\w+\z/./;
+	s/\.\w+\z/ /; # space gives easy doubleclick to select fname
 	my $len = length ;
 	$maxlen = $len if $len > $maxlen;
     }
@@ -539,7 +539,7 @@ EOT
 	    }
 	}
 	my $te = $::path_to_name{$test} . '.'
-		    x ($dotdotdot - length($::path_to_name{$test}));
+		    x ($dotdotdot - length($::path_to_name{$test})) .' ';
 
 	if ($^O ne 'VMS') {  # defer printing on VMS due to piping bug
 	    print $te;
-- 
2.7.4