projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add PTR to sort order for DNS entries
[freeside.git]
/
bin
/
generate-table-module
diff --git
a/bin/generate-table-module
b/bin/generate-table-module
index
0baf23d
..
b3204fa
100755
(executable)
--- a/
bin/generate-table-module
+++ b/
bin/generate-table-module
@@
-13,6
+13,7
@@
my %ut = ( #just guesses
'number' => 'float',
'varchar' => 'text',
'text' => 'text',
'number' => 'float',
'varchar' => 'text',
'text' => 'text',
+ 'serial' => 'number',
);
my $dbdef_table = dbdef_dist->table($table)
);
my $dbdef_table = dbdef_dist->table($table)
@@
-68,11
+69,11
@@
close DEST;
open(TEST,">FS/t/$table.t") or die $!;
print TEST <<ENDTEST;
open(TEST,">FS/t/$table.t") or die $!;
print TEST <<ENDTEST;
-BEGIN { \$| = 1; print "1..1\n" }
-END {print "not ok 1\n" unless \$loaded;}
+BEGIN { \$| = 1; print "1..1\
\
n" }
+END {print "not ok 1\
\
n" unless \$loaded;}
use FS::$table;
\$loaded=1;
use FS::$table;
\$loaded=1;
-print "ok 1\n";
+print "ok 1\
\
n";
ENDTEST
close TEST;
ENDTEST
close TEST;
@@
-80,6
+81,8
@@
close TEST;
# add them to MANIFEST
###
# add them to MANIFEST
###
+system('cvs edit FS/MANIFEST');
+
open(MANIFEST,">>FS/MANIFEST") or die $!;
print MANIFEST "FS/$table.pm\n",
"t/$table.t\n";
open(MANIFEST,">>FS/MANIFEST") or die $!;
print MANIFEST "FS/$table.pm\n",
"t/$table.t\n";