]> Frank Brehm's Git Trees - my-stuff/sql-parse.git/commitdiff
Bugfix in Doku
authorFrank Brehm <frank@brehm-online.com>
Thu, 7 May 2009 15:34:57 +0000 (15:34 +0000)
committerFrank Brehm <frank@brehm-online.com>
Thu, 7 May 2009 15:34:57 +0000 (15:34 +0000)
git-svn-id: http://svn.brehm-online.com/svn/my-stuff/sql-parse/trunk@34 ec8d2aa5-1599-4edb-8739-2b3a1bc399aa

lib/Text/Parse/SQL.pm

index 7f2d8120e04aadf6412706ad470814ab59214483..a49ac80e00204093ebe3f0d236a3986adeabecd4 100644 (file)
@@ -22,7 +22,7 @@ All quotings will preserved.
 
   use Text::Parse::SQL;
 
-  my $parser = new Text::Parse::SQL( 'terminator' => ';', 'remove_block_comments' => 1 );
+  my $parser = new Text::Parse::SQL( { 'terminator' => ';', 'remove_block_comments' => 1, } );
   my $statements = $parser->parse_file( 'create_db.sql' );
 
 =cut