From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Thu, 2 Sep 2010 04:21:19 +0000 (+0000)
Subject: do not indent for the first select
X-Git-Tag: v1.70~91^2~9
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a67e3a081221a2db334654eff110161815120a5;p=dbsrgits%2FSQL-Abstract.git

do not indent for the first select
---

diff --git a/lib/SQL/Abstract/Tree.pm b/lib/SQL/Abstract/Tree.pm
index 5ae9b99..f967dc9 100644
--- a/lib/SQL/Abstract/Tree.pm
+++ b/lib/SQL/Abstract/Tree.pm
@@ -198,6 +198,7 @@ sub whitespace {
    if (defined $ghetto_whitespacemap{lc $keyword}) {
       $before = $self->newline . $self->indent($depth + $ghetto_whitespacemap{lc $keyword});
    }
+   $before = '' if $depth == 0 and lc $keyword eq 'select';
    return [$before, $after];
 }