The short arg for "font-size" was colliding with the "f" for the parser.
Ken Youens-Clark [Thu, 30 Jun 2005 01:03:29 +0000 (01:03 +0000)]
bin/sqlt-diagram

index 930759c..91b4400 100755 (executable)
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 # -------------------------------------------------------------------
-# $Id: sqlt-diagram,v 1.4 2004-08-30 19:05:32 kycl4rk Exp $
+# $Id: sqlt-diagram,v 1.5 2005-06-30 01:03:29 kycl4rk Exp $
 # -------------------------------------------------------------------
 # Copyright (C) 2002-4 SQLFairy Authors
 #
@@ -76,7 +76,7 @@ use Pod::Usage;
 use SQL::Translator;
 
 use vars '$VERSION';
-$VERSION = sprintf "%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/;
+$VERSION = sprintf "%d.%02d", q$Revision: 1.5 $ =~ /(\d+)\.(\d+)/;
 
 #
 # Get arguments.
@@ -94,7 +94,7 @@ GetOptions(
     't|title:s'       => \$title,
     'c|columns:i'     => \$no_columns,
     'n|no-lines'      => \$no_lines,
-    'f|font-size:s'   => \$font_size,
+    'font-size:s'   => \$font_size,
     'gutter:i'        => \$gutter,
     'color'           => \$add_color,
     'show-fk-only'    => \$show_fk_only,