--- trunk/lib/SQLSession/Action/DoSQL.pm 2006/12/04 19:22:48 24 +++ trunk/lib/SQLSession/Action/DoSQL.pm 2006/12/07 19:56:41 28 @@ -21,9 +21,9 @@ param sql_query => label is 'SQL', render as 'textarea', - is mandatory, ajax validates, - ajax canonicalizes; + ajax canonicalizes, + is mandatory; param database => label is 'Database', @@ -71,10 +71,12 @@ my $w = join('|', @words); - warn "canonicalize SQL: $sql"; + warn "original SQL:\t$sql"; $sql =~ s/\b($w)\b/uc($1)/egis; + warn "canonicalize SQL:\t$sql"; + return $sql; }