From c82d349f864e6bd9f96fd1156903bc1f7193a203 Mon Sep 17 00:00:00 2001 From: cvs2git Date: Mon, 27 Dec 2010 00:04:45 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'TORRUS_1_0_9'. --- bin/freeside-create-initial-data | 31 ------------------------------- 1 file changed, 31 deletions(-) delete mode 100755 bin/freeside-create-initial-data (limited to 'bin/freeside-create-initial-data') diff --git a/bin/freeside-create-initial-data b/bin/freeside-create-initial-data deleted file mode 100755 index 410208978..000000000 --- a/bin/freeside-create-initial-data +++ /dev/null @@ -1,31 +0,0 @@ -#!/usr/bin/perl -Tw - -#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_d $opt_v); -use Getopt::Std; -use FS::UID qw(adminsuidsetup); -use FS::Setup qw(create_initial_data); - -getopts("d:"); - -my $dbh = adminsuidsetup shift; -create_initial_data('domain' => $opt_d); - -warn "Freeside initial data inserted - commiting transaction\n" if $opt_v; - -$dbh->commit or die $dbh->errstr; -$dbh->disconnect or die $dbh->errstr; - -warn "Database initialization committed successfully\n" if $opt_v; - -sub usage { - die "Usage:\n freeside-create-initial-data -d domain.name [ -v ] user\n" -} - -1; - -- cgit v1.2.1