summaryrefslogtreecommitdiff
path: root/bin/passwd.import
diff options
context:
space:
mode:
authorivan <ivan>2002-06-21 09:57:05 +0000
committerivan <ivan>2002-06-21 09:57:05 +0000
commit1e14a5e07df71cf985921cefac53b8873e813bcb (patch)
treef34d81b56b46a247eca02509d4a90ff8492c201d /bin/passwd.import
parent78f11947cf539b3e258e7a7804c13dcd2a2f1160 (diff)
no, don't check for duplicates like this by default... not new-export style
Diffstat (limited to 'bin/passwd.import')
-rwxr-xr-xbin/passwd.import10
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/passwd.import b/bin/passwd.import
index d8fc01344..fbf27370f 100755
--- a/bin/passwd.import
+++ b/bin/passwd.import
@@ -1,5 +1,5 @@
#!/usr/bin/perl -Tw
-# $Id: passwd.import,v 1.4 2002-06-21 09:15:59 ivan Exp $
+# $Id: passwd.import,v 1.5 2002-06-21 09:57:05 ivan Exp $
use strict;
use vars qw(%part_svc);
@@ -86,10 +86,10 @@ while (<PASSWD>) {
my $svcpart = $shell_svcpart;
- if ( qsearchs('svc_acct', { 'username' => $username } ) ) {
- warn "warning: $username already exists; skipping\n";
- next;
- }
+ #if ( qsearchs('svc_acct', { 'username' => $username } ) ) {
+ # warn "warning: $username already exists; skipping\n";
+ # next;
+ #}
my($svc_acct) = new FS::svc_acct ({
'svcpart' => $svcpart,