X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01generate.t;h=4fa38edc6ac49dd39b589b44cef3810ed8ea876a;hb=c7e9c808fa4346e2c2692f107852626c0ccde404;hp=f328981b9406cc9cfc3a3aa6086c2bdb3c136e90;hpb=155b004fd0abc35017ee52f414150098b6cbeb0b;p=dbsrgits%2FSQL-Abstract.git diff --git a/t/01generate.t b/t/01generate.t index f328981..4fa38ed 100644 --- a/t/01generate.t +++ b/t/01generate.t @@ -16,7 +16,6 @@ use SQL::Abstract; # ################# - my @tests = ( { func => 'select', @@ -75,6 +74,14 @@ my @tests = ( bind => ['boom'] }, { + # this is maybe wrong but a single arg doesn't get quoted + func => 'select', + args => ['test', 'id', { a => { '!=', 'boom' } }], + stmt => 'SELECT id FROM test WHERE ( a != ? )', + stmt_q => 'SELECT id FROM `test` WHERE ( `a` != ? )', + bind => ['boom'] + }, + { func => 'update', args => ['test', {a => 'boom'}, {a => undef}], stmt => 'UPDATE test SET a = ? WHERE ( a IS NULL )', @@ -83,6 +90,13 @@ my @tests = ( }, { func => 'update', + args => ['test', {a => undef }, {a => 'boom'}], + stmt => 'UPDATE test SET a = ? WHERE ( a = ? )', + stmt_q => 'UPDATE `test` SET `a` = ? WHERE ( `a` = ? )', + bind => [undef,'boom'] + }, + { + func => 'update', args => ['test', {a => 'boom'}, { a => {'!=', "bang" }} ], stmt => 'UPDATE test SET a = ? WHERE ( a != ? )', stmt_q => 'UPDATE `test` SET `a` = ? WHERE ( `a` != ? )',