fix API upload

[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',
+  'serial'  => 'number',
 );
 
 my $dbdef_table = dbdef_dist->table($table)
@@ -68,11 +69,11 @@ close DEST;
 
 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;
-print "ok 1\n";
+print "ok 1\\n";
 ENDTEST
 close TEST;
 
@@ -80,6 +81,8 @@ close TEST;
 # 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";