Comments
authorTim Pope <code@tpope.net>
Thu, 29 Sep 2005 17:56:20 +0000 (17:56 +0000)
committerTim Pope <code@tpope.net>
Thu, 29 Sep 2005 17:56:20 +0000 (17:56 +0000)
perl/relational-schema

index be914f8..883d342 100755 (executable)
@@ -16,10 +16,9 @@ use Image::Imlib2;
 use vars qw($font $maxwidth $pd $fh);
 $font = "Verdana/11";
 $maxwidth = 550;
-$pd = 4;
+$pd = 4; # Padding
 
 my $out = shift or die "No output file specified.\n";
-
 my @rows = @ARGV;
 die "No rows.\n" unless (@rows);