summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorivan <ivan>1998-12-15 04:36:29 +0000
committerivan <ivan>1998-12-15 04:36:29 +0000
commit5633a7534d0319ce016092523d4ad7ff453a9726 (patch)
tree30667779c503fc3fd02b1c03f6c6c81fe93f16e7 /bin
parent0057d8bd24476fc9a50c82a94f39b168f46b0a28 (diff)
s/croak/die/; #oops
Diffstat (limited to 'bin')
-rwxr-xr-xbin/fs-setup9
1 files changed, 6 insertions, 3 deletions
diff --git a/bin/fs-setup b/bin/fs-setup
index 621c426c4..19ac53377 100755
--- a/bin/fs-setup
+++ b/bin/fs-setup
@@ -1,6 +1,6 @@
#!/usr/bin/perl -Tw
#
-# $Id: fs-setup,v 1.8 1998-12-15 04:33:27 ivan Exp $
+# $Id: fs-setup,v 1.9 1998-12-15 04:36:29 ivan Exp $
#
# ivan@sisd.com 97-nov-8,9
#
@@ -32,7 +32,10 @@
# fix radius attributes ivan@sisd.com 98-sep-27
#
# $Log: fs-setup,v $
-# Revision 1.8 1998-12-15 04:33:27 ivan
+# Revision 1.9 1998-12-15 04:36:29 ivan
+# s/croak/die/; #oops
+#
+# Revision 1.8 1998/12/15 04:33:27 ivan
# dies if it isn't running as the freeside user
#
# Revision 1.7 1998/11/18 09:01:31 ivan
@@ -61,7 +64,7 @@ use FS::UID qw(adminsuidsetup datasrc checkeuid);
use FS::Record;
use FS::cust_main_county;
-croak "Not running uid freeside!" unless checkeuid();
+die "Not running uid freeside!" unless checkeuid();
my $user = shift or die &usage;
FS::UID::getsecrets $user;