From: Dobrica Pavlinusic Date: Sun, 20 May 2007 16:19:19 +0000 (+0000) Subject: r1214@llin: dpavlin | 2007-05-20 18:19:12 +0200 X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=d404521b3ba010beab64cf782fbb31720dfba681;p=webpac2 r1214@llin: dpavlin | 2007-05-20 18:19:12 +0200 more sample data git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@829 07558da8-63fa-0310-ba24-9fe276d99e06 --- diff --git a/t/1-validate-delimiters.t b/t/1-validate-delimiters.t index 9baa5ca..08c74ca 100755 --- a/t/1-validate-delimiters.t +++ b/t/1-validate-delimiters.t @@ -46,7 +46,11 @@ test_v({ { 'a' => 'a : a : a', 'c' => [ 'a : b ; c', 'a : b ; c / d' ] }, { 'a' => 'a : b / c' }, { 'a' => 'a : b / c' }, - ] + ], + '901' => [ + { 'a' => 'a : b / c', 'b' => 'foo' }, + { 'a' => 'a : b / c', 'b' => 'foo' }, + ], }); diag dump($v->{_delimiters_templates}); @@ -57,5 +61,6 @@ is_deeply( $v->{_delimiters_templates}, { "^a : : ^c : ; ^c : ; / " => 1, "^a : = : ; ^b ; ; ; ; : . . " => 1, }, + 901 => { "^a : / ^b" => 2 }, }, 'just subfields and delimiters');