X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FSQL-Abstract.git;a=blobdiff_plain;f=t%2F23_is_X_value.t;h=c43b3a369e1e6cbf97b7598f060d68ba65d07010;hp=b06501ed8f5781e057e928ad3826fc526a9baeec;hb=52ce7dca90a7626ea18d6c6030ae8f803cdafeb9;hpb=0ca23f3b8e7614421c0ea9d2bf04bc060e7c7ec5

diff --git a/t/23_is_X_value.t b/t/23_is_X_value.t
index b06501e..c43b3a3 100644
--- a/t/23_is_X_value.t
+++ b/t/23_is_X_value.t
@@ -229,15 +229,15 @@ for (undef, { -value => undef }) {
 }
 
 is_deeply
-  is_literal_value { -ident => 'foo' },
-  [ 'foo' ],
-  '-ident recognized as literal'
+  is_literal_value \'sql',
+  [ 'sql' ],
+  'literal correctly recognized and unpacked'
 ;
 
 is_deeply
   is_literal_value \[ 'sql', 'bind1', [ {} => 'bind2' ] ],
   [ 'sql', 'bind1', [ {} => 'bind2' ] ],
-  'literal correctly unpacked'
+  'literal with binds correctly recognized and unpacked'
 ;