X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FPOD.pm;h=cfbf5cd094c75c04a42a5c792b835237a8f7c0a5;hb=d0fcb05d6b4b6126e080ff90558da0cc31c06b78;hp=e692f3ad3d028d92318c9d8f4d47fa9dba58367f;hpb=20770e440e301fdaed3315f56e2f87867081b54f;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Producer/POD.pm b/lib/SQL/Translator/Producer/POD.pm index e692f3a..cfbf5cd 100644 --- a/lib/SQL/Translator/Producer/POD.pm +++ b/lib/SQL/Translator/Producer/POD.pm @@ -1,9 +1,9 @@ package SQL::Translator::Producer::POD; # ------------------------------------------------------------------- -# $Id: POD.pm,v 1.4 2003-10-15 19:04:19 kycl4rk Exp $ +# $Id$ # ------------------------------------------------------------------- -# Copyright (C) 2003 Ken Y. Clark +# Copyright (C) 2002-2009 SQLFairy Authors # # This program is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License as @@ -41,8 +41,6 @@ interesting formats using Pod::POM or Template::Toolkit's POD plugin. =cut use strict; -use vars qw[ $VERSION ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/; use SQL::Translator::Schema::Constants; use SQL::Translator::Utils qw(header_comment); @@ -116,11 +114,11 @@ sub produce { } if ( my $update = $c->on_update ) { - $pod .= "=item * On update = $update"; + $pod .= "=item * On update = $update\n\n"; } if ( my $delete = $c->on_delete ) { - $pod .= "=item * On delete = $delete"; + $pod .= "=item * On delete = $delete\n\n"; } $pod .= "=back\n\n"; @@ -148,6 +146,10 @@ sub produce { Ken Y. Clark Ekclark@cpan.orgE. +=head2 CONTRIBUTORS + +Jonathan Yu Efrequency@cpan.orgE + =head1 SEE ALSO perldoc, perlpod, Pod::POM, Template::Manual::Plugins.