diff options
author | Aurélien Aptel <aurelien.aptel@gmail.com> | 2013-08-05 18:57:54 +0200 |
---|---|---|
committer | Jim McDonough <jmcd@samba.org> | 2013-11-05 08:42:43 -0500 |
commit | 7088302d2469a0191f7b3e7d396575e7f688dde3 (patch) | |
tree | 7d69ad31f108f4adc86e9262e65a17d21d235060 /source3/script/tests | |
parent | 977c26d8b0e978ac27273161c87918b467fe8672 (diff) | |
download | samba-7088302d2469a0191f7b3e7d396575e7f688dde3.tar.gz samba-7088302d2469a0191f7b3e7d396575e7f688dde3.tar.xz samba-7088302d2469a0191f7b3e7d396575e7f688dde3.zip |
test_smbclient_tarmode.pl: sanitize $DIR + whitespace
Signed-off-by: Aurélien Aptel <aurelien.aptel@gmail.com>
Reviewed-by: David Disseldorp <ddiss@samba.org>
Reviewed-by: Jim McDonough <jmcd@samba.org>
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/$_"); } |