Dots in directory names aren't nice on VMS.

p4raw-id: //depot/perl@26870

diff --git a/lib/Archive/Tar/t/04_resolved_issues.t b/lib/Archive/Tar/t/04_resolved_issues.t
index 865cf04..9ebaa16 100644 (file)
--- a/lib/Archive/Tar/t/04_resolved_issues.t
+++ b/lib/Archive/Tar/t/04_resolved_issues.t
@@ -25,7 +25,7 @@ use_ok( $Class );
     local $Archive::Tar::DO_NOT_USE_PREFIX = 1;
     local $Archive::Tar::DO_NOT_USE_PREFIX = 1;
     
-    my $dir =   'Catalyst-Helper-Controller-Scaffold-HTML-Template-0.03/' . 
+    my $dir =   'Catalyst-Helper-Controller-Scaffold-HTML-Template-0_03/' . 
                 'lib/Catalyst/Helper/Controller/Scaffold/HTML/';
     my $file =  'Template.pm';
     my $out =   $$ . '.tar';