From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
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?p=dbsrgits%2FSQL-Abstract.git;a=commitdiff_plain;h=0bfe80fd71fede78fe8de141bc1dd2e7fdf338f2

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 <>;