diff options
Diffstat (limited to 'source3/script/tests')
| -rwxr-xr-x | source3/script/tests/test_smbclient_tarmode.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/source3/script/tests/test_smbclient_tarmode.pl b/source3/script/tests/test_smbclient_tarmode.pl index b654c5eebc..83be069760 100755 --- a/source3/script/tests/test_smbclient_tarmode.pl +++ b/source3/script/tests/test_smbclient_tarmode.pl @@ -185,6 +185,7 @@ my $TAR = "$TMP/tarmode.tar"; $LOCALPATH =~ s{[/\\]+$}{}g; $SHARE =~ s{[/\\]+$}{}g; $HOST =~ s{[/\\]+$}{}g; +$DIR =~ s{^\.[/\\]+$}{}g; $DIR =~ s{[/\\]+$}{}g; if (!-d $LOCALPATH) { @@ -346,7 +347,7 @@ sub test_creation_long_path { my $d = "a"x130; my @all; - for(qw( foo/a bar/b )) { + for (qw( foo/a bar/b )) { push @all, File->new_remote("$d/$_"); } |