diff options
author | Michael Adam <obnox@samba.org> | 2008-01-14 15:44:41 +0100 |
---|---|---|
committer | Michael Adam <obnox@samba.org> | 2008-01-14 15:46:01 +0100 |
commit | f326cd2be51f2d83de4f5fcb656a9ffc9073d987 (patch) | |
tree | 4a26f4df1500c1c55d641baf427a030667b4e148 /examples | |
parent | c6f2bbb59f9585bddfe1f3c23452aa61346e7e39 (diff) | |
download | samba-f326cd2be51f2d83de4f5fcb656a9ffc9073d987.tar.gz samba-f326cd2be51f2d83de4f5fcb656a9ffc9073d987.tar.bz2 samba-f326cd2be51f2d83de4f5fcb656a9ffc9073d987.zip |
Fix bug #5171 (perl syntax error) found by Jason Filley <jason@snakelegs.org>
Michael
(This used to be commit dcb5034acd35d219106e1d855f4c4d36b3c8d83b)
Diffstat (limited to 'examples')
-rw-r--r-- | examples/logon/genlogon/genlogon.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/logon/genlogon/genlogon.pl b/examples/logon/genlogon/genlogon.pl index 8ebf392141..4799ac8452 100644 --- a/examples/logon/genlogon/genlogon.pl +++ b/examples/logon/genlogon/genlogon.pl @@ -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"; |