marc4j4r 0.1.6 → 0.2.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (54) hide show
  1. data/README.rdoc +17 -0
  2. data/Rakefile +26 -13
  3. data/VERSION +1 -1
  4. data/jars/marc4j.jar +0 -0
  5. data/lib/marc4j4r/controlfield.rb +32 -0
  6. data/lib/marc4j4r/datafield.rb +196 -0
  7. data/lib/marc4j4r/reader.rb +71 -0
  8. data/lib/marc4j4r/record.rb +214 -0
  9. data/lib/marc4j4r/writer.rb +29 -0
  10. data/lib/marc4j4r.rb +26 -485
  11. data/lib/original_monolithic_file.rb +518 -0
  12. data/spec/batch.dat +1 -0
  13. data/spec/batch.txt +193 -0
  14. data/spec/batch.xml +13 -0
  15. data/spec/controlfield_spec.rb +40 -0
  16. data/spec/datafield_spec.rb +56 -0
  17. data/spec/one.dat +1 -0
  18. data/spec/one.txt +17 -0
  19. data/spec/one.xml +4 -0
  20. data/spec/reader_spec.rb +49 -0
  21. data/spec/record_spec.rb +101 -0
  22. data/{test/helper.rb → spec/spec_helper.rb} +9 -5
  23. metadata +74 -80
  24. data/.document +0 -5
  25. data/.gitignore +0 -21
  26. data/README.markdown +0 -41
  27. data/doc/ControlFieldImpl.html +0 -314
  28. data/doc/DataFieldImpl.html +0 -875
  29. data/doc/Java/OrgMarc4j/MarcReader.html +0 -184
  30. data/doc/MARC4J4R/Reader.html +0 -245
  31. data/doc/MARC4J4R.html +0 -281
  32. data/doc/RecordImpl.html +0 -686
  33. data/doc/SubfieldImpl.html +0 -252
  34. data/doc/_index.html +0 -153
  35. data/doc/class_list.html +0 -36
  36. data/doc/css/common.css +0 -1
  37. data/doc/css/full_list.css +0 -50
  38. data/doc/css/style.css +0 -268
  39. data/doc/file.README.html +0 -90
  40. data/doc/file_list.html +0 -38
  41. data/doc/frames.html +0 -13
  42. data/doc/index.html +0 -90
  43. data/doc/js/app.js +0 -99
  44. data/doc/js/full_list.js +0 -106
  45. data/doc/js/jquery.js +0 -19
  46. data/doc/method_list.html +0 -219
  47. data/doc/top-level-namespace.html +0 -87
  48. data/jars/MarcImporter.jar +0 -0
  49. data/test/batch.seq +0 -118
  50. data/test/bench.rb +0 -63
  51. data/test/one.dat +0 -1
  52. data/test/one.seq +0 -30
  53. data/test/one.xml +0 -55
  54. data/test/test_marc4j4r.rb +0 -76
data/spec/batch.txt ADDED
@@ -0,0 +1,193 @@
1
+ LEADER 00755cam 22002414a 4500
2
+ 001 fol05731351
3
+ 003 IMchF
4
+ 005 20000613133448.0
5
+ 008 000107s2000 nyua 001 0 eng
6
+ 010 $a 00020737
7
+ 020 $a 0471383147 (paper/cd-rom : alk. paper)
8
+ 040 $a DLC $c DLC $d DLC
9
+ 042 $a pcc
10
+ 050 00 $a QA76.73.P22 $b M33 2000
11
+ 082 00 $a 005.13/3 $2 21
12
+ 100 1 $a Martinsson, Tobias, $d 1976-
13
+ 245 10 $a ActivePerl with ASP and ADO / $c Tobias Martinsson.
14
+ 260 $a New York : $b John Wiley & Sons, $c 2000.
15
+ 300 $a xxi, 289 p. : $b ill. ; $c 23 cm. + $e 1 computer laser disc (4 3/4 in.)
16
+ 500 $a "Wiley Computer Publishing."
17
+ 630 00 $a Active server pages.
18
+ 630 00 $a ActiveX.
19
+ 650 0 $a Perl (Computer program language)
20
+
21
+ LEADER 00647pam 2200241 a 4500
22
+ 001 fol05754809
23
+ 003 IMchF
24
+ 005 20000601115601.0
25
+ 008 000203s2000 mau 001 0 eng
26
+ 010 $a 00022023
27
+ 020 $a 1565926994
28
+ 040 $a DLC $c DLC $d DLC
29
+ 042 $a pcc
30
+ 050 00 $a QA76.73.P22 $b D47 2000
31
+ 082 00 $a 005.74 $2 21
32
+ 100 1 $a Descartes, Alligator.
33
+ 245 10 $a Programming the Perl DBI / $c Alligator Descartes and Tim Bunce.
34
+ 260 $a Cmabridge, MA : $b O'Reilly, $c 2000.
35
+ 263 $a 1111
36
+ 300 $a p. cm.
37
+ 650 0 $a Perl (Computer program language)
38
+ 650 0 $a Database management.
39
+ 700 1 $a Bunce, Tim.
40
+
41
+ LEADER 00605cam 22002054a 4500
42
+ 001 fol05843555
43
+ 003 IMchF
44
+ 005 20000525142739.0
45
+ 008 000318s1999 cau b 001 0 eng
46
+ 010 $a 00501349
47
+ 040 $a DLC $c DLC $d DLC
48
+ 042 $a pcc
49
+ 050 00 $a QA76.73.P22 $b B763 1999
50
+ 082 00 $a 005.13/3 $2 21
51
+ 100 1 $a Brown, Martin C.
52
+ 245 10 $a Perl : $b programmer's reference / $c Martin C. Brown.
53
+ 260 $a Berkeley : $b Osborne/McGraw-Hill, $c c1999.
54
+ 300 $a xix, 380 p. ; $c 22 cm.
55
+ 504 $a Includes bibliographical references and index.
56
+ 650 0 $a Perl (Computer program language)
57
+
58
+ LEADER 00579cam 22002054a 4500
59
+ 001 fol05843579
60
+ 003 IMchF
61
+ 005 20000525142716.0
62
+ 008 000318s1999 caua 001 0 eng
63
+ 010 $a 00502116
64
+ 020 $a 0072120002
65
+ 040 $a DLC $c DLC $d DLC
66
+ 042 $a pcc
67
+ 050 00 $a QA76.73.P22 $b B762 1999
68
+ 082 00 $a 005.13/3 $2 21
69
+ 100 1 $a Brown, Martin C.
70
+ 245 10 $a Perl : $b the complete reference / $c Martin C. Brown.
71
+ 260 $a Berkeley : $b Osborne/McGraw-Hill, $c c1999.
72
+ 300 $a xxxv, 1179 p. : $b ill. ; $c 24 cm.
73
+ 650 0 $a Perl (Computer program language)
74
+
75
+ LEADER 00801nam 22002778a 4500
76
+ 001 fol05848297
77
+ 003 IMchF
78
+ 005 20000524125727.0
79
+ 008 000518s2000 mau 001 0 eng
80
+ 010 $a 00041664
81
+ 020 $a 1565924193
82
+ 040 $a DLC $c DLC
83
+ 042 $a pcc
84
+ 050 00 $a QA76.73.P22 $b G84 2000
85
+ 082 00 $a 005.2/762 $2 21
86
+ 100 1 $a Guelich, Scott.
87
+ 245 10 $a CGI programming with Perl / $c Scott Guelich, Shishir Gundavaram & Gunther Birznieks.
88
+ 250 $a 2nd ed., expanded & updated
89
+ 260 $a Cambridge, Mass. : $b O'Reilly, $c 2000.
90
+ 263 $a 0006
91
+ 300 $a p. cm.
92
+ 650 0 $a Perl (Computer program language)
93
+ 650 0 $a CGI (Computer network protocol)
94
+ 650 0 $a Internet programming.
95
+ 700 1 $a Gundavaram, Shishir.
96
+ 700 1 $a Birznieks, Gunther.
97
+
98
+ LEADER 00665nam 22002298a 4500
99
+ 001 fol05865950
100
+ 003 IMchF
101
+ 005 20000615103017.0
102
+ 008 000612s2000 mau 100 0 eng
103
+ 010 $a 00055759
104
+ 020 $a 0596000138
105
+ 040 $a DLC $c DLC
106
+ 042 $a pcc
107
+ 050 00 $a QA76.73.P22 $b P475 2000
108
+ 082 00 $a 005.13/3 $2 21
109
+ 111 2 $a Perl Conference 4.0 $d (2000 : $c Monterey, Calif.)
110
+ 245 10 $a Proceedings of the Perl Conference 4.0 : $b July 17-20, 2000, Monterey, California.
111
+ 250 $a 1st ed.
112
+ 260 $a Cambridge, Mass. : $b O'Reilly, $c 2000.
113
+ 263 $a 0006
114
+ 300 $a p. cm.
115
+ 650 0 $a Perl (Computer program language) $v Congresses.
116
+
117
+ LEADER 00579nam 22002178a 4500
118
+ 001 fol05865956
119
+ 003 IMchF
120
+ 005 20000615102948.0
121
+ 008 000612s2000 mau 000 0 eng
122
+ 010 $a 00055770
123
+ 020 $a 1565926099
124
+ 040 $a DLC $c DLC
125
+ 042 $a pcc
126
+ 050 00 $a QA76.73.P22 $b B43 2000
127
+ 082 00 $a 005.13/3 $2 21
128
+ 100 1 $a Blank-Edelman, David N.
129
+ 245 10 $a Perl for system administration / $c David N. Blank-Edelman.
130
+ 260 $a Cambridge, Mass. : $b O'Reilly, $c 2000.
131
+ 263 $a 0006
132
+ 300 $a p. cm.
133
+ 650 0 $a Perl (Computer program language)
134
+
135
+ LEADER 00661nam 22002538a 4500
136
+ 001 fol05865967
137
+ 003 IMchF
138
+ 005 20000615102611.0
139
+ 008 000614s2000 mau 000 0 eng
140
+ 010 $a 00055799
141
+ 020 $a 0596000278
142
+ 040 $a DLC $c DLC
143
+ 042 $a pcc
144
+ 050 00 $a QA76.73.P22 $b W35 2000
145
+ 082 00 $a 005.13/3 $2 21
146
+ 100 1 $a Wall, Larry.
147
+ 245 10 $a Programming Perl / $c Larry Wall, Tom Christiansen & Jon Orwant.
148
+ 250 $a 3rd ed.
149
+ 260 $a Cambridge, Mass. : $b O'Reilly, $c 2000.
150
+ 263 $a 0007
151
+ 300 $a p. cm.
152
+ 650 0 $a Perl (Computer program language)
153
+ 700 1 $a Christiansen, Tom.
154
+ 700 1 $a Orwant, Jon.
155
+
156
+ LEADER 00603cam 22002054a 4500
157
+ 001 fol05872355
158
+ 003 IMchF
159
+ 005 20000706095105.0
160
+ 008 000315s1999 njua 001 0 eng
161
+ 010 $a 00500678
162
+ 020 $a 013020868X
163
+ 040 $a DLC $c DLC $d DLC
164
+ 042 $a pcc
165
+ 050 00 $a QA76.73.P22 $b L69 1999
166
+ 082 00 $a 005.13/3 $2 21
167
+ 100 1 $a Lowe, Vincent $q (Vincent D.)
168
+ 245 10 $a Perl programmer's interactive workbook / $c Vincent Lowe.
169
+ 260 $a Upper Saddle River, NJ : $b Prentice Hall PTP, $c c1999.
170
+ 300 $a xx, 633 p. : $b ill. ; $c 23 cm.
171
+ 650 0 $a Perl (Computer program language)
172
+
173
+ LEADER 00696nam 22002538a 4500
174
+ 001 fol05882032
175
+ 003 IMchF
176
+ 005 20000707091904.0
177
+ 008 000630s2000 cau 001 0 eng
178
+ 010 $a 00058174
179
+ 020 $a 0764547291 (alk. paper)
180
+ 040 $a DLC $c DLC
181
+ 042 $a pcc
182
+ 050 00 $a QA76.73.P22 $b F64 2000
183
+ 082 00 $a 005.13/3 $2 21
184
+ 100 2 $a Foster-Johnson, Eric.
185
+ 245 10 $a Cross-platform Perl / $c Eric F. Johnson.
186
+ 260 $a Foster City, CA : $b IDG Books Worldwide, $c 2000.
187
+ 263 $a 0009
188
+ 300 $a p. cm.
189
+ 500 $a Includes index.
190
+ 650 0 $a Perl (Computer program language)
191
+ 650 0 $a Web servers.
192
+ 650 0 $a Cross-platform software development.
193
+
data/spec/batch.xml ADDED
@@ -0,0 +1,13 @@
1
+ <?xml version='1.0'?>
2
+ <collection xmlns='http://www.loc.gov/MARC21/slim' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd'>
3
+ <record><leader>00755cam 22002414a 4500</leader><controlfield tag='001'>fol05731351 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000613133448.0</controlfield><controlfield tag='008'>000107s2000 nyua 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00020737 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>0471383147 (paper/cd-rom : alk. paper)</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield><subfield code='d'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>M33 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Martinsson, Tobias,</subfield><subfield code='d'>1976-</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>ActivePerl with ASP and ADO /</subfield><subfield code='c'>Tobias Martinsson.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>New York :</subfield><subfield code='b'>John Wiley &amp; Sons,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>xxi, 289 p. :</subfield><subfield code='b'>ill. ;</subfield><subfield code='c'>23 cm. +</subfield><subfield code='e'>1 computer laser disc (4 3/4 in.)</subfield></datafield><datafield tag='500' ind1=' ' ind2=' '><subfield code='a'>&quot;Wiley Computer Publishing.&quot;</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield><datafield tag='630' ind1='0' ind2='0'><subfield code='a'>Active server pages.</subfield></datafield><datafield tag='630' ind1='0' ind2='0'><subfield code='a'>ActiveX.</subfield></datafield></record>
4
+ <record><leader>00647pam 2200241 a 4500</leader><controlfield tag='001'>fol05754809 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000601115601.0</controlfield><controlfield tag='008'>000203s2000 mau 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00022023 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>1565926994</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield><subfield code='d'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>D47 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.74</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Descartes, Alligator.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Programming the Perl DBI /</subfield><subfield code='c'>Alligator Descartes and Tim Bunce.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Cmabridge, MA :</subfield><subfield code='b'>O&apos;Reilly,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>1111</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Database management.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Bunce, Tim.</subfield></datafield></record>
5
+ <record><leader>00605cam 22002054a 4500</leader><controlfield tag='001'>fol05843555 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000525142739.0</controlfield><controlfield tag='008'>000318s1999 cau b 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00501349 </subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield><subfield code='d'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>B763 1999</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Brown, Martin C.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Perl :</subfield><subfield code='b'>programmer&apos;s reference /</subfield><subfield code='c'>Martin C. Brown.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Berkeley :</subfield><subfield code='b'>Osborne/McGraw-Hill,</subfield><subfield code='c'>c1999.</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>xix, 380 p. ;</subfield><subfield code='c'>22 cm.</subfield></datafield><datafield tag='504' ind1=' ' ind2=' '><subfield code='a'>Includes bibliographical references and index.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield></record>
6
+ <record><leader>00579cam 22002054a 4500</leader><controlfield tag='001'>fol05843579 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000525142716.0</controlfield><controlfield tag='008'>000318s1999 caua 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00502116 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>0072120002</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield><subfield code='d'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>B762 1999</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Brown, Martin C.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Perl :</subfield><subfield code='b'>the complete reference /</subfield><subfield code='c'>Martin C. Brown.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Berkeley :</subfield><subfield code='b'>Osborne/McGraw-Hill,</subfield><subfield code='c'>c1999.</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>xxxv, 1179 p. :</subfield><subfield code='b'>ill. ;</subfield><subfield code='c'>24 cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield></record>
7
+ <record><leader>00801nam 22002778a 4500</leader><controlfield tag='001'>fol05848297 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000524125727.0</controlfield><controlfield tag='008'>000518s2000 mau 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00041664 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>1565924193</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>G84 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.2/762</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Guelich, Scott.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>CGI programming with Perl /</subfield><subfield code='c'>Scott Guelich, Shishir Gundavaram &amp; Gunther Birznieks.</subfield></datafield><datafield tag='250' ind1=' ' ind2=' '><subfield code='a'>2nd ed., expanded &amp; updated</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Cambridge, Mass. :</subfield><subfield code='b'>O&apos;Reilly,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>0006</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>CGI (Computer network protocol)</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Internet programming.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Gundavaram, Shishir.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Birznieks, Gunther.</subfield></datafield></record>
8
+ <record><leader>00665nam 22002298a 4500</leader><controlfield tag='001'>fol05865950 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000615103017.0</controlfield><controlfield tag='008'>000612s2000 mau 100 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00055759 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>0596000138</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>P475 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='111' ind1='2' ind2=' '><subfield code='a'>Perl Conference 4.0</subfield><subfield code='d'>(2000 :</subfield><subfield code='c'>Monterey, Calif.)</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Proceedings of the Perl Conference 4.0 :</subfield><subfield code='b'>July 17-20, 2000, Monterey, California.</subfield></datafield><datafield tag='250' ind1=' ' ind2=' '><subfield code='a'>1st ed.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Cambridge, Mass. :</subfield><subfield code='b'>O&apos;Reilly,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>0006</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield><subfield code='v'>Congresses.</subfield></datafield></record>
9
+ <record><leader>00579nam 22002178a 4500</leader><controlfield tag='001'>fol05865956 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000615102948.0</controlfield><controlfield tag='008'>000612s2000 mau 000 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00055770 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>1565926099</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>B43 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Blank-Edelman, David N.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Perl for system administration /</subfield><subfield code='c'>David N. Blank-Edelman.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Cambridge, Mass. :</subfield><subfield code='b'>O&apos;Reilly,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>0006</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield></record>
10
+ <record><leader>00661nam 22002538a 4500</leader><controlfield tag='001'>fol05865967 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000615102611.0</controlfield><controlfield tag='008'>000614s2000 mau 000 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00055799 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>0596000278</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>W35 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Wall, Larry.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Programming Perl /</subfield><subfield code='c'>Larry Wall, Tom Christiansen &amp; Jon Orwant.</subfield></datafield><datafield tag='250' ind1=' ' ind2=' '><subfield code='a'>3rd ed.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Cambridge, Mass. :</subfield><subfield code='b'>O&apos;Reilly,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>0007</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Christiansen, Tom.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Orwant, Jon.</subfield></datafield></record>
11
+ <record><leader>00603cam 22002054a 4500</leader><controlfield tag='001'>fol05872355 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000706095105.0</controlfield><controlfield tag='008'>000315s1999 njua 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00500678 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>013020868X</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield><subfield code='d'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>L69 1999</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='1' ind2=' '><subfield code='a'>Lowe, Vincent</subfield><subfield code='q'>(Vincent D.)</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Perl programmer&apos;s interactive workbook /</subfield><subfield code='c'>Vincent Lowe.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Upper Saddle River, NJ :</subfield><subfield code='b'>Prentice Hall PTP,</subfield><subfield code='c'>c1999.</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>xx, 633 p. :</subfield><subfield code='b'>ill. ;</subfield><subfield code='c'>23 cm.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield></record>
12
+ <record><leader>00696nam 22002538a 4500</leader><controlfield tag='001'>fol05882032 </controlfield><controlfield tag='003'>IMchF</controlfield><controlfield tag='005'>20000707091904.0</controlfield><controlfield tag='008'>000630s2000 cau 001 0 eng </controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'> 00058174 </subfield></datafield><datafield tag='020' ind1=' ' ind2=' '><subfield code='a'>0764547291 (alk. paper)</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='042' ind1=' ' ind2=' '><subfield code='a'>pcc</subfield></datafield><datafield tag='050' ind1='0' ind2='0'><subfield code='a'>QA76.73.P22</subfield><subfield code='b'>F64 2000</subfield></datafield><datafield tag='082' ind1='0' ind2='0'><subfield code='a'>005.13/3</subfield><subfield code='2'>21</subfield></datafield><datafield tag='100' ind1='2' ind2=' '><subfield code='a'>Foster-Johnson, Eric.</subfield></datafield><datafield tag='245' ind1='1' ind2='0'><subfield code='a'>Cross-platform Perl /</subfield><subfield code='c'>Eric F. Johnson.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Foster City, CA :</subfield><subfield code='b'>IDG Books Worldwide,</subfield><subfield code='c'>2000.</subfield></datafield><datafield tag='263' ind1=' ' ind2=' '><subfield code='a'>0009</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>p. cm.</subfield></datafield><datafield tag='500' ind1=' ' ind2=' '><subfield code='a'>Includes index.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Perl (Computer program language)</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Web servers.</subfield></datafield><datafield tag='650' ind1=' ' ind2='0'><subfield code='a'>Cross-platform software development.</subfield></datafield></record>
13
+ </collection>
data/spec/controlfield_spec.rb ADDED
@@ -0,0 +1,40 @@
1
+ require 'spec_helper'
2
+
3
+ describe "MARC4J4R::ControlField basics" do
4
+ it "can create a controlfield via the alias" do
5
+ cf = MARC4J4R::ControlField.new('001')
6
+ cf.tag.should.equal '001'
7
+ end
8
+
9
+ it "allows get/set of tag and value" do
10
+ cf = MARC4J4R::ControlField.new
11
+ cf.tag = '001'
12
+ cf.value = 'Value'
13
+ cf.tag.should.equal '001'
14
+ cf.value.should.equal 'Value'
15
+ end
16
+
17
+ it "can create a cf with both arguments" do
18
+ cf = MARC4J4R::ControlField.new('001', 'Test')
19
+ cf.value.should.equal 'Test'
20
+ cf.tag.should.equal '001'
21
+ end
22
+
23
+ it "can identify good/bad tags" do
24
+ MARC4J4R::ControlField.control_tag?('000').should.equal true
25
+ MARC4J4R::ControlField.control_tag?('001').should.equal true
26
+ MARC4J4R::ControlField.control_tag?('009').should.equal true
27
+ MARC4J4R::ControlField.control_tag?('010').should.equal false
28
+ MARC4J4R::ControlField.control_tag?('011').should.equal false
29
+ end
30
+
31
+ it "provides a working ==" do
32
+ cf = MARC4J4R::ControlField.new('001', 'Test')
33
+ clone = MARC4J4R::ControlField.new('001', 'Test')
34
+ mutant = MARC4J4R::ControlField.new('001', 'DDDDD')
35
+ cf.should.equal clone
36
+ clone.should.equal cf
37
+ cf.should.not.equal mutant
38
+ mutant.should.not.equal clone
39
+ end
40
+ end
data/spec/datafield_spec.rb ADDED
@@ -0,0 +1,56 @@
1
+ require 'spec_helper'
2
+
3
+ describe "MARC4J4R::DataField & SubField basics" do
4
+ it "proivdes a trivial ==" do
5
+ df1 = MARC4J4R::DataField.new('010', '1', '2')
6
+ df2 = MARC4J4R::DataField.new('010', '1', '2')
7
+
8
+ df1.should.equal df2
9
+ df2.should.equal df1
10
+
11
+ df3 = MARC4J4R::DataField.new('010', '0', '0')
12
+ df4 = MARC4J4R::DataField.new('011', '1', '2')
13
+
14
+ df1.should.not.equal df3
15
+ df1.should.not.equal df4
16
+ df3.should.not.equal df4
17
+ end
18
+
19
+ it "proivdes a deep ==" do
20
+ df1 = MARC4J4R::DataField.new('010', '1', '2')
21
+ df2 = MARC4J4R::DataField.new('010', '1', '2')
22
+ df3 = MARC4J4R::DataField.new('010', '1', '2')
23
+ df4 = MARC4J4R::DataField.new('010', '1', '2')
24
+ [df1, df2, df3, df4].each do |df|
25
+ df << MARC4J4R::SubField.new('a', 'one')
26
+ df << MARC4J4R::SubField.new('b', 'two')
27
+ df << MARC4J4R::SubField.new('c', 'three')
28
+ end
29
+ df3 << MARC4J4R::SubField.new('d', 'four')
30
+ df4 << MARC4J4R::SubField.new('d', 'five')
31
+ df1.should.equal df2
32
+ df2.should.equal df1
33
+ df1.should.not.equal df3
34
+ df1.should.equal df1
35
+ df3.should.equal df3
36
+ df3.should.not.equal df4
37
+ end
38
+
39
+ it "can round-trip tags and indicators" do
40
+ df = MARC4J4R::DataField.new('010', '1', '2')
41
+ df.tag.should.equal '010'
42
+ df.ind1.should.equal '1'
43
+ df.ind2.should.equal '2'
44
+ df.ind1 = '0'
45
+ df.ind1.should.equal '0'
46
+ end
47
+
48
+
49
+ it "should defalt to spaces in ind1/ind2" do
50
+ df = MARC4J4R::DataField.new('010')
51
+ df.ind1.should.equal ' '
52
+ df.ind2.should.equal ' '
53
+ end
54
+ end
55
+
56
+
data/spec/one.dat ADDED
@@ -0,0 +1 @@
1
+ 00734njm a2200217uu 4500001001500000003000400015005001700019007001500036008004100051010001900092040001300111245006800124260002600192300005600218651004500274700005400319700005500373700003000428852005000458852000800508afc99990058366DLC20071104155141.9sd ummunniauub071103s1939 xxufmnne||||||||| u eng|| aafc99990058366 aDLCcDLC04aThe Texas rangerh[sound recording] /cSung by Beale D. Taylor. aMedina, Texas,c1939. a1 sound disc :banalog, 33 1/3 rpm, mono. ;c12 in. 0aMedinazTexaszUnited States of America.1 aLomax, John Avery, 1867-1948eRecording engineer.1 aLomax, Ruby T. (Ruby Terrill)eRecording engineer.1 aTaylor, Beale D.eSinger. aAmerican Folklife Center, Library of Congress aDLC
data/spec/one.txt ADDED
@@ -0,0 +1,17 @@
1
+ LEADER 00734njm a2200217uu 4500
2
+ 001 afc99990058366
3
+ 003 DLC
4
+ 005 20071104155141.9
5
+ 007 sd ummunniauub
6
+ 008 071103s1939 xxufmnne||||||||| u eng||
7
+ 010 $a afc99990058366
8
+ 040 $a DLC $c DLC
9
+ 245 04 $a The Texas ranger $h [sound recording] / $c Sung by Beale D. Taylor.
10
+ 260 $a Medina, Texas, $c 1939.
11
+ 300 $a 1 sound disc : $b analog, 33 1/3 rpm, mono. ; $c 12 in.
12
+ 651 0 $a Medina $z Texas $z United States of America.
13
+ 700 1 $a Lomax, John Avery, 1867-1948 $e Recording engineer.
14
+ 700 1 $a Lomax, Ruby T. (Ruby Terrill) $e Recording engineer.
15
+ 700 1 $a Taylor, Beale D. $e Singer.
16
+ 852 $a American Folklife Center, Library of Congress
17
+ 852 $a DLC
data/spec/one.xml ADDED
@@ -0,0 +1,4 @@
1
+ <?xml version='1.0'?>
2
+ <collection xmlns='http://www.loc.gov/MARC21/slim' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd'>
3
+ <record><leader>00734njm a2200217uu 4500</leader><controlfield tag='001'>afc99990058366</controlfield><controlfield tag='003'>DLC</controlfield><controlfield tag='005'>20071104155141.9</controlfield><controlfield tag='007'>sd ummunniauub</controlfield><controlfield tag='008'>071103s1939 xxufmnne||||||||| u eng||</controlfield><datafield tag='010' ind1=' ' ind2=' '><subfield code='a'>afc99990058366</subfield></datafield><datafield tag='040' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield><subfield code='c'>DLC</subfield></datafield><datafield tag='245' ind1='0' ind2='4'><subfield code='a'>The Texas ranger</subfield><subfield code='h'>[sound recording] /</subfield><subfield code='c'>Sung by Beale D. Taylor.</subfield></datafield><datafield tag='260' ind1=' ' ind2=' '><subfield code='a'>Medina, Texas,</subfield><subfield code='c'>1939.</subfield></datafield><datafield tag='300' ind1=' ' ind2=' '><subfield code='a'>1 sound disc :</subfield><subfield code='b'>analog, 33 1/3 rpm, mono. ;</subfield><subfield code='c'>12 in.</subfield></datafield><datafield tag='651' ind1=' ' ind2='0'><subfield code='a'>Medina</subfield><subfield code='z'>Texas</subfield><subfield code='z'>United States of America.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Lomax, John Avery, 1867-1948</subfield><subfield code='e'>Recording engineer.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Lomax, Ruby T. (Ruby Terrill)</subfield><subfield code='e'>Recording engineer.</subfield></datafield><datafield tag='700' ind1='1' ind2=' '><subfield code='a'>Taylor, Beale D.</subfield><subfield code='e'>Singer.</subfield></datafield><datafield tag='852' ind1=' ' ind2=' '><subfield code='a'>American Folklife Center, Library of Congress</subfield></datafield><datafield tag='852' ind1=' ' ind2=' '><subfield code='a'>DLC</subfield></datafield></record>
4
+ </collection>
data/spec/reader_spec.rb ADDED
@@ -0,0 +1,49 @@
1
+ require 'spec_helper'
2
+
3
+ describe "MARC4J4R_reader" do
4
+ it "can read binary" do
5
+ reader = MARC4J4R::Reader.new("#{DIR}/one.dat")
6
+ rec = reader.first
7
+ rec['245']['a'].should.equal "The Texas ranger"
8
+ end
9
+
10
+ it "can read XML" do
11
+ reader = MARC4J4R::Reader.new("#{DIR}/one.xml", :marcxml)
12
+ rec = reader.first
13
+ rec['245']['a'].should.equal "The Texas ranger"
14
+ end
15
+
16
+ it "enumerates through all binary records" do
17
+ reader = MARC4J4R::Reader.new("#{DIR}/batch.dat")
18
+ recs = reader.collect
19
+ recs.size.should.equal 10
20
+ end
21
+
22
+ it "enumerates through all XML records" do
23
+ reader = MARC4J4R::Reader.new("#{DIR}/batch.xml", :marcxml)
24
+ recs = reader.collect
25
+ recs.size.should.equal 10
26
+ end
27
+
28
+ end
29
+
30
+ describe "Reader round-tripping" do
31
+ before do
32
+ @one = MARC4J4R::Reader.new("#{DIR}/one.dat").first
33
+ end
34
+
35
+ it "should round-trip binary" do
36
+ rt = MARC4J4R::Reader.new(StringIO.new(@one.to_marc)).first
37
+ rt.should.equal @one
38
+ end
39
+
40
+ it "should round-trip xml" do
41
+ rt = MARC4J4R::Reader.new(StringIO.new(@one.to_xml), :marcxml).first
42
+ rt.should.equal @one
43
+ end
44
+
45
+ it "should show xml and binary forms equal after parsing" do
46
+ rt = MARC4J4R::Reader.new("#{DIR}/one.xml", :marcxml).first
47
+ rt.should.equal @one
48
+ end
49
+ end
data/spec/record_spec.rb ADDED
@@ -0,0 +1,101 @@
1
+ require 'spec_helper'
2
+
3
+ # LEADER 00734njm a2200217uu 4500
4
+ # 001 afc99990058366
5
+ # 003 DLC
6
+ # 005 20071104155141.9
7
+ # 007 sd ummunniauub
8
+ # 008 071103s1939 xxufmnne||||||||| u eng||
9
+ # 010 $a afc99990058366
10
+ # 040 $a DLC $c DLC
11
+ # 245 04 $a The Texas ranger $h [sound recording] / $c Sung by Beale D. Taylor.
12
+ # 260 $a Medina, Texas, $c 1939.
13
+ # 300 $a 1 sound disc : $b analog, 33 1/3 rpm, mono. ; $c 12 in.
14
+ # 651 0 $a Medina $z Texas $z United States of America.
15
+ # 700 1 $a Lomax, John Avery, 1867-1948 $e Recording engineer.
16
+ # 700 1 $a Lomax, Ruby T. (Ruby Terrill) $e Recording engineer.
17
+ # 700 1 $a Taylor, Beale D. $e Singer.
18
+ # 852 $a American Folklife Center, Library of Congress
19
+ # 852 $a DLC
20
+
21
+
22
+
23
+
24
+
25
+ describe "MARC4J4R_basic_retrieval_stuff" do
26
+ before do
27
+ @one = MARC4J4R::Reader.new("#{DIR}/one.dat").first
28
+ @batch = MARC4J4R::Reader.new("#{DIR}/batch.dat").collect
29
+ end
30
+
31
+ it "can get the leader" do
32
+ @one.leader.should.equal "00734njm a2200217uu 4500"
33
+ end
34
+
35
+ it "can read a control field correctly" do
36
+ @one['001'].value.should.equal "afc99990058366"
37
+ end
38
+
39
+ it "can find all the fields" do
40
+ fields = @one.collect
41
+ fields.size.should.equal 16
42
+ end
43
+
44
+ it "should get the first 245 for this record" do
45
+ @one['245'].to_s.should.equal "245 04 $a The Texas ranger $h [sound recording] / $c Sung by Beale D. Taylor."
46
+ end
47
+
48
+ end
49
+
50
+ describe "MARC4J4R::Record #find_by_tag" do
51
+ before do
52
+ @one = MARC4J4R::Reader.new("#{DIR}/one.dat").first
53
+ @df = MARC4J4R::DataField.new('260')
54
+ @df << MARC4J4R::SubField.new('a', 'Medina, Texas,')
55
+ @df << MARC4J4R::SubField.new('c', '1939.')
56
+
57
+ @cf = MARC4J4R::ControlField.new('005', '20071104155141.9')
58
+
59
+ end
60
+
61
+ it "gets an empty array for non-existant tag(s)" do
62
+ @one.find_by_tag('999').should.equal []
63
+ end
64
+
65
+ it "gets an empty arry for set of non-existant tags" do
66
+ @one.find_by_tag(['998', '999']).should.equal []
67
+ end
68
+
69
+ it "gets a single field for the 260 as string" do
70
+ onetag = @one.find_by_tag('260')
71
+ onetag.should.equal [@df]
72
+ end
73
+
74
+ it "gets a single field for the 260 as an array" do
75
+ onetag = @one.find_by_tag('260')
76
+ @one.find_by_tag(['260']).should.equal [@df]
77
+ end
78
+
79
+ it "gets both the 260 and 005" do
80
+ @one.find_by_tag(['005', '260']).should.equal [@cf, @df]
81
+ end
82
+
83
+ it "returns fields in the order their tags were requested" do
84
+ @one.find_by_tag(['260', '005']).should.equal [@df, @cf]
85
+ end
86
+
87
+ it "allows caller to force return of tags in original order" do
88
+ @one.find_by_tag(['260', '005'], true).should.equal [@cf, @df]
89
+ end
90
+
91
+ it "finds all instances of requested tags" do
92
+ @one.find_by_tag('700').size.should.equal 3
93
+ @one.find_by_tag('852').size.should.equal 2
94
+ @one.find_by_tag(['852', '700']).size.should.equal 5
95
+ end
96
+
97
+ it "returns duplicate-tag fields in the order from the record" do
98
+ first = @one['700']
99
+ @one.find_by_tag('700')[0].should.equal first
100
+ end
101
+ end
data/{test/helper.rb → spec/spec_helper.rb} RENAMED
@@ -1,10 +1,14 @@
1
1
  require 'rubygems'
2
- require 'test/unit'
3
- require 'shoulda'
2
+ require 'bacon'
3
+ begin
4
+ require 'greeneggs'
5
+ rescue LoadError
6
+ end
4
7
 
5
- $LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
6
8
  $LOAD_PATH.unshift(File.dirname(__FILE__))
9
+ $LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
7
10
  require 'marc4j4r'
11
+ DIR = File.dirname(__FILE__)
8
12
 
9
- class Test::Unit::TestCase
10
- end
13
+
14
+ Bacon.summary_on_exit