projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
refactor cch tax import to remove tons of false laziness and improve flexibility...
[freeside.git]
/
FS
/
FS
/
Setup.pm
diff --git
a/FS/FS/Setup.pm
b/FS/FS/Setup.pm
index
d87668c
..
f8c59c5
100644
(file)
--- a/
FS/FS/Setup.pm
+++ b/
FS/FS/Setup.pm
@@
-146,7
+146,7
@@
sub populate_initial_data {
foreach my $table ( keys %$data ) {
foreach my $table ( keys %$data ) {
- warn "popuilating $table\n";
+
#
warn "popuilating $table\n";
my $class = "FS::$table";
eval "use $class;";
my $class = "FS::$table";
eval "use $class;";
@@
-165,9
+165,9
@@
sub populate_initial_data {
die "error inserting record into $table: $error\n"
if $error;
die "error inserting record into $table: $error\n"
if $error;
- my $pkey = $object->primary_key;
- my $pkeyvalue = $object->$pkey();
- warn " inserted $pkeyvalue\n";
+
#
my $pkey = $object->primary_key;
+
#
my $pkeyvalue = $object->$pkey();
+
#
warn " inserted $pkeyvalue\n";
}
}
@@
-348,11
+348,12
@@
sub initial_data {
#not yet....
#not yet....
- #)
-
#usage classes
'usage_class' => [],
#usage classes
'usage_class' => [],
+ #phone types
+ 'phone_type' => [],
+
;
\%hash;
;
\%hash;
@@
-364,7
+365,7
@@
sub populate_access {
use FS::AccessRight;
use FS::access_right;
use FS::AccessRight;
use FS::access_right;
- foreach my $rightname ( FS::AccessRight->rights ) {
+ foreach my $rightname ( FS::AccessRight->
default_superuser_
rights ) {
my $access_right = new FS::access_right {
'righttype' => 'FS::access_group',
'rightobjnum' => 1, #$supergroup->groupnum,
my $access_right = new FS::access_right {
'righttype' => 'FS::access_group',
'rightobjnum' => 1, #$supergroup->groupnum,