projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
69ebc28
)
dies if it isn't running as the freeside user
author
ivan
<ivan>
Tue, 15 Dec 1998 04:33:27 +0000
(
04:33
+0000)
committer
ivan
<ivan>
Tue, 15 Dec 1998 04:33:27 +0000
(
04:33
+0000)
bin/fs-setup
patch
|
blob
|
history
diff --git
a/bin/fs-setup
b/bin/fs-setup
index
b3fc5c5
..
621c426
100755
(executable)
--- a/
bin/fs-setup
+++ b/
bin/fs-setup
@@
-1,6
+1,6
@@
#!/usr/bin/perl -Tw
#
#!/usr/bin/perl -Tw
#
-#
create database and necessary tables, etc. DBI version.
+#
$Id: fs-setup,v 1.8 1998-12-15 04:33:27 ivan Exp $
#
# ivan@sisd.com 97-nov-8,9
#
#
# ivan@sisd.com 97-nov-8,9
#
@@
-32,7
+32,10
@@
# fix radius attributes ivan@sisd.com 98-sep-27
#
# $Log: fs-setup,v $
# fix radius attributes ivan@sisd.com 98-sep-27
#
# $Log: fs-setup,v $
-# Revision 1.7 1998-11-18 09:01:31 ivan
+# 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
# i18n! i18n!
#
# Revision 1.6 1998/11/15 13:18:02 ivan
# i18n! i18n!
#
# Revision 1.6 1998/11/15 13:18:02 ivan
@@
-54,10
+57,12
@@
BEGIN { $FS::Record::setup_hack = 1; }
use strict;
use DBI;
use FS::dbdef;
use strict;
use DBI;
use FS::dbdef;
-use FS::UID qw(adminsuidsetup datasrc);
+use FS::UID qw(adminsuidsetup datasrc
checkeuid
);
use FS::Record;
use FS::cust_main_county;
use FS::Record;
use FS::cust_main_county;
+croak "Not running uid freeside!" unless checkeuid();
+
my $user = shift or die &usage;
FS::UID::getsecrets $user;
my $user = shift or die &usage;
FS::UID::getsecrets $user;