black magic to edit Mason.pm as well

diff --git a/bin/generate-table-module b/bin/generate-table-module
index 509feed..7635962 100755 (executable)
--- a/bin/generate-table-module
+++ b/bin/generate-table-module
@@ -65,6 +65,13 @@ while (my $line = <SRC>) {
 close SRC;
 close DEST;
 
+###
+# add to FS/FS/Mason.pm
+###
+
+my $magic = '# Sammath Naur';
+system("perl -pi -e 's/$magic/use FS::$table;\n  $magic/' FS/FS/Mason.pm");
+
 ###
 # add FS/t/table.t
 ###