Parent Directory | Revision Log | Patch
revision 1028 by dpavlin, Sun Nov 11 13:47:43 2007 UTC | revision 1029 by dpavlin, Sun Nov 11 17:11:33 2007 UTC | |
---|---|---|
# | Line 42 my $rec = { | Line 42 my $rec = { |
42 | 'w' => 'w-6-1', | 'w' => 'w-6-1', |
43 | },{ | },{ |
44 | 'a' => 'a-7-1', | 'a' => 'a-7-1', |
45 | },{ | |
46 | 'a' => 'a-8-1', | |
47 | 'v' => 'v-8-1', | |
48 | },{ | |
49 | 'v' => 'v-9-1', | |
50 | }], | }], |
51 | }; | }; |
52 | ||
# | Line 63 ok( marc_template( | Line 68 ok( marc_template( |
68 | ], | ], |
69 | marc_template => [ | marc_template => [ |
70 | 'a', | 'a', |
71 | 'a ;|v', | |
72 | 'a.|p', | |
73 | 'a, |x ; |v. |n, |p ; |v', | 'a, |x ; |v. |n, |p ; |v', |
74 | 'a ; |v. |p ; |v', | 'a ; |v. |p ; |v', |
75 | 'v', | |
76 | ], | ], |
77 | ), 'marc_template' ); | ), 'marc_template' ); |
78 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |