tyop
authorivan <ivan>
Thu, 12 Jun 2003 14:06:06 +0000 (14:06 +0000)
committerivan <ivan>
Thu, 12 Jun 2003 14:06:06 +0000 (14:06 +0000)
bin/passwd.import

index 304499e..a56be3a 100755 (executable)
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -Tw
 #!/usr/bin/perl -Tw
-# $Id: passwd.import,v 1.6 2003-06-12 13:57:08 ivan Exp $
+# $Id: passwd.import,v 1.7 2003-06-12 14:06:06 ivan Exp $
 
 use strict;
 use vars qw(%part_svc);
 
 use strict;
 use vars qw(%part_svc);
@@ -14,7 +14,7 @@ use FS::part_svc;
 my $user = shift or die &usage;
 adminsuidsetup $user;
 
 my $user = shift or die &usage;
 adminsuidsetup $user;
 
-push @FS::svc_acct::shells, qw(/bin/sync /sbin/shuddown /bin/halt); #others?
+push @FS::svc_acct::shells, qw(/bin/sync /sbin/shutdown /bin/halt); #others?
 
 my($spooldir)="/usr/local/etc/freeside/export.". datasrc;
 
 
 my($spooldir)="/usr/local/etc/freeside/export.". datasrc;