summaryrefslogtreecommitdiff
path: root/bin/generate-table-module
diff options
context:
space:
mode:
Diffstat (limited to 'bin/generate-table-module')
-rwxr-xr-xbin/generate-table-module10
1 files changed, 6 insertions, 4 deletions
diff --git a/bin/generate-table-module b/bin/generate-table-module
index b3204fa06..509feeded 100755
--- a/bin/generate-table-module
+++ b/bin/generate-table-module
@@ -31,10 +31,12 @@ while (my $line = <SRC>) {
if ( $line =~ /^=item\s+field\s+-\s+description\s*$/ ) {
foreach my $column ( $dbdef_table->columns ) {
- print DEST "=item $column - ";
- print DEST "primary key"
- if $column eq $primary_key;
- print DEST "\n\n";
+ print DEST "=item $column\n\n";
+ if ( $column eq $primary_key ) {
+ print DEST "primary key\n\n";
+ } else {
+ print DEST "$column\n\n";
+ }
}
next;