1
0
mirror of https://github.com/samba-team/samba.git synced 2024-12-22 13:34:15 +03:00

Fix bug #5171 (perl syntax error) found by Jason Filley <jason@snakelegs.org>

Michael
(This used to be commit dcb5034acd)
This commit is contained in:
Michael Adam 2008-01-14 15:44:41 +01:00
parent c6f2bbb59f
commit f326cd2be5

View File

@ -45,7 +45,7 @@ if ($ARGV[1] eq "SUPPORT" || $ARGV[0] eq "support")
}
# Connect shares just used by Administration staff
If ($ARGV[1] eq "ADMIN" || $ARGV[0] eq "admin")
if ($ARGV[1] eq "ADMIN" || $ARGV[0] eq "admin")
{
print LOGON "NET USE L: \\\\$ARGV[2]\\ADMIN\r\n";
print LOGON "NET USE K: \\\\$ARGV[2]\\MKTING\r\n";