From: Arthur Axel 'fREW' Schmidt Date: Fri, 20 Apr 2012 18:24:11 +0000 (-0500) Subject: Stop filling in placeholders in `format-sql` X-Git-Tag: v1.73_01~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0bfe80fd71fede78fe8de141bc1dd2e7fdf338f2;p=dbsrgits%2FSQL-Abstract.git Stop filling in placeholders in `format-sql` --- diff --git a/Changes b/Changes index 674d881..f42564f 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,7 @@ Revision history for SQL::Abstract + - Stop filling in placeholders in `format-sql` since it does not support + passing values for them anyway - Fix parsing of NOT EXISTS - Fix over-eager parenthesis unrolling - Fix deep recursion warnings while parsing obnoxiously long sql statements diff --git a/script/format-sql b/script/format-sql index 6254e83..06bd65e 100755 --- a/script/format-sql +++ b/script/format-sql @@ -11,6 +11,6 @@ my ($opt, $usage) = describe_options( print($usage->text), exit if $opt->help; -my $sqlat = SQL::Abstract::Tree->new({ profile => $opt->profile }); +my $sqlat = SQL::Abstract::Tree->new({ profile => $opt->profile, fill_in_placeholders => 0 }); print $sqlat->format($_) . "\n" while <>;