From: Arthur Axel 'fREW' Schmidt Date: Wed, 3 Nov 2010 02:36:14 +0000 (-0500) Subject: Fix missing doc (RT#62587) X-Git-Tag: v1.70~9 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FSQL-Abstract.git;a=commitdiff_plain;h=b912ee1e3ff72a0194e4d41b886627c4b8219cbd Fix missing doc (RT#62587) --- diff --git a/Changes b/Changes index 01a5662..4ae8f69 100644 --- a/Changes +++ b/Changes @@ -7,6 +7,7 @@ Revision history for SQL::Abstract - Add EXECUTING for clarity of long running SQL - Add "squash_repeats" option to fix it such that repeated SQL gets ellided except for placeholders + - Fix missing doc (RT#62587) revision 1.69 2010-10-22 ---------------------------- diff --git a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm index 59ffe42..023499e 100644 --- a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm +++ b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm @@ -97,6 +97,10 @@ sub query_end { =pod +=head1 NAME + +DBIx::Class::Storage::Debug::PrettyPrint - Pretty Printing DebugObj + =head1 SYNOPSIS DBIC_TRACE_PROFILE=~/dbic.json perl -Ilib ./foo.pl diff --git a/lib/SQL/Abstract/Tree.pm b/lib/SQL/Abstract/Tree.pm index f6076ba..1c3a82f 100644 --- a/lib/SQL/Abstract/Tree.pm +++ b/lib/SQL/Abstract/Tree.pm @@ -515,6 +515,10 @@ sub format { my $self = shift; $self->unparse($self->parse($_[0]), $_[1]) } =pod +=head1 NAME + +SQL::Abstract::Tree - Represent SQL as an AST + =head1 SYNOPSIS my $sqla_tree = SQL::Abstract::Tree->new({ profile => 'console' });