X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-setup;h=ddff81ef9ce69bec38fcf68b5f6de6f5a1c05285;hb=3e9d87cff65fea3973ecc00c648454b5f58a9c78;hp=d813e76e2921b37a0feb10dc6e4f58f15b171f79;hpb=6726ccd411b87ab1c92942201ebd0677f79dd59d;p=freeside.git diff --git a/FS/bin/freeside-setup b/FS/bin/freeside-setup index d813e76e2..ddff81ef9 100755 --- a/FS/bin/freeside-setup +++ b/FS/bin/freeside-setup @@ -3,6 +3,11 @@ #to delay loading dbdef until we're ready BEGIN { $FS::Schema::setup_hack = 1; } +#to allow initial insert +use FS::part_pkg; +$FS::part_pkg::setup_hack = 1; +$FS::part_pkg::setup_hack = 1; + use strict; use vars qw($opt_u $opt_d $opt_v); use Getopt::Std; @@ -21,7 +26,7 @@ die "Not running uid freeside!" unless checkeuid(); getopts("u:vd:"); my $config_dir = shift || '%%%DIST_CONF%%%' ; -$config_dir =~ /^([\w.:=]+)$/ +$config_dir =~ /^([\w.:=\/]+)$/ or die "unacceptable configuration directory name"; $config_dir = $1;