From: Tim Pope <code@tpope.net>
Date: Thu, 29 Sep 2005 17:56:20 +0000 (+0000)
Subject: Comments
X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=commitdiff_plain;h=8c167e189c9d136496622da617ce1c42d3580a50

Comments
---

diff --git a/perl/relational-schema b/perl/relational-schema
index be914f8..883d342 100755
--- a/perl/relational-schema
+++ b/perl/relational-schema
@@ -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);