mods 2.4.0 → 3.0.0

data/spec/lib/subject_spec.rb

@@ -0,0 +1,427 @@
+# encoding: UTF-8
+
+require 'spec_helper'
+
+describe "Mods <subject> Element" do
+  context "subterms for <name> child elements of <subject> element" do
+    before(:all) do
+      @both_types_sub = mods_record("<subject>
+                   <name type='personal'>
+                     <namePart>Bridgens, R.P</namePart>
+                   </name>
+                 </subject><subject authority='lcsh'>
+                    <name type='corporate'>
+                      <namePart>Britton &amp; Rey.</namePart>
+                    </name>
+                  </subject>").subject
+      @pers_name_sub = mods_record("<subject>
+                  <name type='personal' authority='ingest'>
+                      <namePart type='family'>Edward VI , king of England, </namePart>
+                      <displayForm>Edward VI , king of England, 1537-1553</displayForm>
+                  </name></subject>").subject
+      @mult_pers_name_sub = mods_record("<subject authority='lcsh'>
+                   <name type='personal'>
+                     <namePart>Baker, George H</namePart>
+                     <role>
+                       <roleTerm type='text'>lithographer.</roleTerm>
+                     </role>
+                   </name>
+                 </subject><subject>
+                   <name type='personal'>
+                     <namePart>Beach, Ghilion</namePart>
+                     <role>
+                       <roleTerm type='text'>publisher.</roleTerm>
+                     </role>
+                   </name>
+                 </subject><subject>
+                   <name type='personal'>
+                     <namePart>Bridgens, R.P</namePart>
+                   </name>
+                 </subject><subject authority='lcsh'>
+                   <name type='personal'>
+                     <namePart>Couts, Cave Johnson</namePart>
+                     <namePart type='date'>1821-1874</namePart>
+                   </name>
+                 </subject><subject authority='lcsh'>
+                   <name type='personal'>
+                     <namePart>Kuchel, Charles Conrad</namePart>
+                     <namePart type='date'>b. 1820</namePart>
+                   </name>
+                 </subject><subject authority='lcsh'>
+                   <name type='personal'>
+                     <namePart>Nahl, Charles Christian</namePart>
+                     <namePart type='date'>1818-1878</namePart>
+                   </name>
+                 </subject><subject authority='lcsh'>
+                   <name type='personal'>
+                     <namePart>Swasey, W. F. (William F.)</namePart>
+                   </name></subject>").subject
+      @mult_corp_name_sub = mods_record("<subject authority='lcsh'>
+                   <name type='corporate'>
+                     <namePart>Britton &amp; Rey.</namePart>
+                   </name>
+                 </subject><subject>
+                   <name type='corporate'>
+                     <namePart>Gray (W. Vallance) &amp; C.B. Gifford,</namePart>
+                     <role>
+                       <roleTerm type='text'>lithographers.</roleTerm>
+                     </role>
+                   </name></subject>").subject
+    end
+    it "should be able to identify corporate names" do
+      expect(@both_types_sub.corporate_name.namePart.map { |e| e.text }).to eq(['Britton & Rey.'])
+    end
+    it "should be able to identify personal names" do
+      expect(@both_types_sub.personal_name.namePart.map { |e| e.text }).to eq(['Bridgens, R.P'])
+      expect(@pers_name_sub.personal_name.displayForm.map { |e| e.text }).to eq(['Edward VI , king of England, 1537-1553'])
+    end
+    it "should be able to identify roles associated with a name" do
+      expect(@mult_corp_name_sub.corporate_name.role.roleTerm.map { |e| e.text }).to eq(['lithographers.'])
+    end
+    it "should be able to identify dates associated with a name" do
+      expect(@mult_pers_name_sub.personal_name.date.map { |e| e.text }).to include("1818-1878")
+    end
+  end
+
+  before(:all) do
+    @four_subjects = mods_record("<subject authority='lcsh'>
+          <geographic>San Francisco (Calif.)</geographic>
+          <topic>History</topic>
+          <genre>Pictorial works</genre>
+        </subject>
+        <subject authority='lcsh'>
+          <geographic>San Diego (Calif.)</geographic>
+          <topic>History</topic>
+          <genre>Pictorial works</genre>
+        </subject>
+        <subject authority='lcsh'>
+          <topic>History</topic>
+          <genre>Pictorial works</genre>
+        </subject>
+        <subject authority='lcsh'>
+          <geographic>San Luis Rey (Calif.)</geographic>
+          <genre>Pictorial works</genre>
+        </subject>").subject
+    @geo_code_subject = mods_record("<subject>
+              <geographicCode authority='marcgac'>f------</geographicCode></subject>").subject
+    @lcsh_subject = mods_record("<subject authority='lcsh'>
+              <geographic>Africa</geographic>
+              <genre>Maps</genre>
+              <temporal>500-1400</temporal></subject>").subject
+  end
+
+  it "should be a NodeSet" do
+    expect(@four_subjects).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    expect(@lcsh_subject).to be_an_instance_of(Nokogiri::XML::NodeSet)
+  end
+  it "should have as many members as there are <subject> elements in the xml" do
+    expect(@four_subjects.size).to eq(4)
+    expect(@lcsh_subject.size).to eq(1)
+  end
+  it "should recognize authority attribute on <subject> element" do
+    ['lcsh', 'ingest', 'lctgm'].each { |a|
+      expect(mods_record("<subject authority='#{a}'><topic>Ruler, English.</topic></subject>").subject.authority).to eq([a])
+    }
+  end
+
+  context "<topic> child element" do
+    before(:all) do
+      @topic_simple = mods_record(<<-XML).subject.topic
+        <subject authority='lcsh'><topic>History</topic>
+      XML
+
+      @multi_topic = mods_record(<<-XML).subject.topic
+        <subject>
+            <topic>California as an island--Maps--1662?</topic>
+            <topic>North America--Maps--To 1800</topic>
+            <topic>North America--Maps--1662?</topic>
+          </subject>
+      XML
+    end
+    it "should be a NodeSet" do
+      expect(@topic_simple).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@multi_topic).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "topic NodeSet should have as many Nodes as there are <topic> elements in the xml" do
+      expect(@topic_simple.size).to eq(1)
+      expect(@multi_topic.size).to eq(3)
+      expect(@four_subjects.topic.size).to eq(3)
+      expect(@geo_code_subject.topic.size).to eq(0)
+    end
+    it "text should get element value" do
+      expect(@topic_simple.text).to eq("History")
+      expect(@multi_topic.text).to include("California as an island--Maps--1662?")
+      expect(@multi_topic.text).to include("North America--Maps--To 1800")
+      expect(@multi_topic.text).to include("North America--Maps--1662?")
+      expect(@four_subjects.topic.text).to include("History")
+    end
+  end # <topic>
+
+  context "<geographic> child element" do
+    it "should be a NodeSet" do
+      expect(@four_subjects.geographic).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@lcsh_subject.geographic).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@geo_code_subject.geographic).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "geographic NodeSet should have as many Nodes as there are <geographic> elements in the xml" do
+      expect(@four_subjects.geographic.size).to eq(3)
+      expect(@lcsh_subject.geographic.size).to eq(1)
+      expect(@geo_code_subject.geographic.size).to eq(0)
+    end
+    it "text should get element value" do
+      expect(@four_subjects.geographic.text).to include("San Francisco (Calif.)")
+      expect(@four_subjects.geographic.text).to include("San Diego (Calif.)")
+      expect(@four_subjects.geographic.text).to include("San Luis Rey (Calif.)")
+    end
+    it "should not include <geographicCode> element" do
+      expect(@geo_code_subject.geographic.size).to eq(0)
+    end
+  end # <geographic>
+
+  context "<temporal> child element" do
+    before(:all) do
+      @temporal = mods_record("<subject>
+                <temporal encoding='iso8601'>20010203T040506+0700</temporal>
+                <!-- <temporal encoding='iso8601'>197505</temporal> -->
+              </subject>").subject.temporal
+    end
+
+    it "should recognize the date attributes" do
+      expect(@temporal.encoding).to eq(['iso8601'])
+      Mods::DATE_ATTRIBS.each { |a|
+        expect(mods_record("<subject><temporal #{a}='val'>now</temporal></subject>").subject.temporal.send(a.to_sym)).to eq(['val'])
+      }
+    end
+    it "should be a NodeSet" do
+      expect(@lcsh_subject.temporal).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@temporal).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "temporal NodeSet should have as many Nodes as there are <temporal> elements in the xml" do
+      expect(@lcsh_subject.temporal.size).to eq(1)
+      expect(@temporal.size).to eq(1)
+    end
+    it "text should get element value" do
+      expect(@lcsh_subject.temporal.map { |n| n.text }).to eq(['500-1400'])
+      expect(@temporal.map { |n| n.text }).to eq(['20010203T040506+0700'])
+    end
+  end # <temporal>
+
+  context "<genre> child element" do
+    it "should be a NodeSet" do
+      expect(@lcsh_subject.genre).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@four_subjects.genre).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "genre NodeSet should have as many Nodes as there are <genre> elements in the xml" do
+      expect(@lcsh_subject.genre.size).to eq(1)
+      expect(@four_subjects.genre.size).to eq(4)
+    end
+    it "text should get element value" do
+      expect(@lcsh_subject.genre.map { |n| n.text }).to eq(['Maps'])
+      expect(@four_subjects.genre.map { |n| n.text }).to include("Pictorial works")
+    end
+  end # <genre>
+
+  context "<geographicCode> child element" do
+    it "should be a NodeSet" do
+      expect(@geo_code_subject.geographicCode).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "cartographics NodeSet should have as many Nodes as there are <geographicCode> elements in the xml" do
+      expect(@geo_code_subject.geographicCode.size).to eq(1)
+    end
+    it "text should get element value" do
+      expect(@geo_code_subject.geographicCode.map { |n| n.text }).to eq(['f------'])
+    end
+    it "should recognize authority attributes" do
+      Mods::AUTHORITY_ATTRIBS.each { |a|
+        record = mods_record("<subject><geographicCode #{a}='attr_val'>f------</geographicCode></subject>")
+        expect(record.subject.geographicCode.send(a.to_sym)).to eq(['attr_val'])
+      }
+    end
+    it "should recognize the sanctioned authorities" do
+      Mods::Subject::GEO_CODE_AUTHORITIES.each { |a|
+        record = mods_record("<subject><geographicCode authority='#{a}'>f------</geographicCode></subject>")
+        expect(record.subject.geographicCode.authority).to eq([a])
+      }
+    end
+    context "translated_value convenience method" do
+      it "should be the translation of the code if it is a marcgac code" do
+        record = mods_record("<subject><geographicCode authority='marcgac'>e-er</geographicCode></subject>")
+        expect(record.subject.geographicCode.translated_value).to eq(["Estonia"])
+      end
+      it "should be the translation of the code if it is a marccountry code" do
+        record = mods_record("<subject><geographicCode authority='marccountry'>mg</geographicCode></subject>")
+        expect(record.subject.geographicCode.translated_value).to eq(["Madagascar"])
+      end
+      it "should be nil if the code is invalid" do
+        record = mods_record("<subject><geographicCode authority='marcgac'>zzz</geographicCode></subject>")
+        expect(record.subject.geographicCode.translated_value.size).to eq(0)
+      end
+      it "should be nil if we don't have a translation for the authority" do
+        record = mods_record("<subject><geographicCode authority='iso3166'>zzz</geographicCode></subject>")
+        expect(record.subject.geographicCode.translated_value.size).to eq(0)
+      end
+      it "should work with non-ascii characters" do
+        record = mods_record("<subject><geographicCode authority='marccountry'>co</geographicCode></subject>")
+        expect(record.subject.geographicCode.translated_value).to eq(["Curaçao"])
+      end
+    end
+  end # <geographicCode>
+
+  context "<titleInfo> child element" do
+    before(:all) do
+      @title_info = mods_record("<subject>
+        <titleInfo>
+          <nonSort>The</nonSort>
+          <title>Olympics</title>
+          <subTitle>a history</subTitle>
+        </titleInfo>
+      </subject>").subject.titleInfo
+    end
+    it "should understand all attributes allowed on a <titleInfo> element" do
+      Mods::TitleInfo::ATTRIBUTES.each { |a|
+        ti = mods_record("<subject><titleInfo #{a}='attr_val'>THE</titleInfo></subject>").subject.titleInfo
+        if (a == 'type')
+          expect(ti.type_at).to eq(['attr_val'])
+        else
+          expect(ti.send(a.to_sym)).to eq(['attr_val'])
+        end
+      }
+    end
+    it "should understand all immediate child elements allowed on a <titleInfo> element" do
+      Mods::TitleInfo::CHILD_ELEMENTS.each { |e|
+        expect(mods_record("<subject><titleInfo><#{e}>el_val</#{e}></titleInfo></subject>").subject.titleInfo.send(e.to_sym).text).to eq('el_val')
+      }
+      expect(@title_info.nonSort.map {|n| n.text}).to eq(["The"])
+    end
+
+    it "should recognize authority attribute on the <titleInfo> element" do
+      expect(mods_record("<subject>
+          <titleInfo type='uniform' authority='naf'>
+              <title>Missale Carnotense</title>
+          </titleInfo></subject>").subject.titleInfo.authority).to eq(["naf"])
+    end
+  end # <titleInfo>
+
+  context "<name> child element" do
+    it "should understand all attributes allowed on a <name> element" do
+      Mods::Name::ATTRIBUTES.each { |a|
+        name = mods_record("<subject><name #{a}='attr_val'>Obadiah</name></subject>").subject.name_el
+        if (a == 'type')
+          expect(name.type_at).to eq(['attr_val'])
+        else
+          expect(name.send(a.to_sym)).to eq(['attr_val'])
+        end
+      }
+    end
+    it "should understand all immediate child elements allowed on a <name> element" do
+      Mods::Name::CHILD_ELEMENTS.each { |e|
+        name = mods_record("<subject><name><#{e}>el_val</#{e}></name></subject>").subject.name_el
+        if (e == 'description')
+          expect(name.description_el.text).to eq('el_val')
+        elsif (e != 'role')
+          expect(name.send(e.to_sym).text).to eq('el_val')
+        end
+      }
+    end
+    it "should recognize authority attribute on the <name> element" do
+      expect(mods_record("<subject>
+          <name type='personal' authority='lcsh'>
+            <namePart>Nahl, Charles Christian</namePart>
+            <namePart type='date'>1818-1878</namePart>
+          </name>").subject.name_el.authority).to eq(["lcsh"])
+    end
+  end # <name>
+
+  context "<hiearchicalGeographic> child element" do
+    it "should recognize authority attributes" do
+      Mods::AUTHORITY_ATTRIBS.each { |a|
+        record = mods_record("<subject><hierarchicalGeographic #{a}='attr_val'><country>Albania</country></hierarchicalGeographic></subject>")
+        expect(record.subject.hierarchicalGeographic.send(a.to_sym)).to eq(['attr_val'])
+      }
+    end
+    it "should recognize allowed child elements" do
+      Mods::Subject::HIER_GEO_CHILD_ELEMENTS.each { |e|
+        record = mods_record("<subject><hierarchicalGeographic><#{e}>el_val</#{e}></hierarchicalGeographic></subject>")
+        expect(record.subject.hierarchicalGeographic.send(e.to_sym).text).to eq('el_val')
+      }
+      expect(Mods::Subject::HIER_GEO_CHILD_ELEMENTS.size).to eq(12)
+    end
+  end # <hierarchicalGeographic>
+
+  context "<cartographics> child element" do
+    before(:all) do
+      @carto_scale = mods_record("<subject>
+                <cartographics>
+                  <scale>[ca.1:90,000,000], [173</scale>
+                </cartographics>
+              </subject>").subject.cartographics
+      @carto_empties = mods_record("<subject authority=''>
+                  <cartographics>
+                    <scale/>
+                    <coordinates>W1730000 W0100000 N840000 N071000</coordinates>
+                    <projection/>
+                  </cartographics>
+                </subject>").subject.cartographics
+      @multi_carto = mods_record("<subject>
+                  <cartographics>
+                      <coordinates>W0180000 E0510000 N370000 S350000</coordinates>
+                  </cartographics>
+                </subject><subject>
+                  <cartographics>
+                      <scale>Scale [ca. 1:50,000,000]</scale>
+                  </cartographics>
+                  <cartographics>
+                      <coordinates>(W18&#xB0;--E51&#xB0;/N37&#xB0;--S35&#xB0;).</coordinates>
+                  </cartographics>
+                </subject>").subject.cartographics
+    end
+    it "should be a NodeSet" do
+      expect(@carto_scale).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@carto_empties).to be_an_instance_of(Nokogiri::XML::NodeSet)
+      expect(@multi_carto).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "cartographics NodeSet should have as many Nodes as there are <cartographics> elements in the xml" do
+      expect(@carto_scale.size).to eq(1)
+      expect(@carto_empties.size).to eq(1)
+      expect(@multi_carto.size).to eq(3)
+    end
+    it "should recognize allowed child elements" do
+      Mods::Subject::CARTOGRAPHICS_CHILD_ELEMENTS.each { |e|
+        record = mods_record("<subject><cartographics><#{e}>el_val</#{e}></cartographics></subject>")
+        expect(record.subject.cartographics.send(e.to_sym).text).to eq('el_val')
+      }
+      expect(Mods::Subject::CARTOGRAPHICS_CHILD_ELEMENTS.size).to eq(3)
+    end
+    it "should get the number of populated <coordinates> elements for coordinates term" do
+      @multi_carto.coordinates.size == 2
+    end
+    it "should be able to get the value of populated elements" do
+      expect(@carto_scale.scale.map { |n| n.text }).to eq(['[ca.1:90,000,000], [173'])
+      expect(@carto_empties.coordinates.map { |n| n.text }).to eq(['W1730000 W0100000 N840000 N071000'])
+    end
+    it "should get the empty string for empty elements?" do
+      expect(@carto_empties.projection.map { |n| n.text }).to eq([''])
+    end
+  end # <cartographics>
+
+  context "<occupation> child element" do
+    before(:all) do
+      @occupation = mods_record("<subject><occupation>Migrant laborers</occupation>").subject.occupation
+    end
+    it "should be a NodeSet" do
+      expect(@occupation).to be_an_instance_of(Nokogiri::XML::NodeSet)
+    end
+    it "occupation NodeSet should have as many Nodes as there are <occupation> elements in the xml" do
+      expect(@occupation.size).to eq(1)
+    end
+    it "text should get element value" do
+      expect(@occupation.map { |n| n.text }).to eq(['Migrant laborers'])
+    end
+    it "should recognize authority attributes" do
+      Mods::AUTHORITY_ATTRIBS.each { |a|
+        record = mods_record("<subject><occupation #{a}='attr_val'>Flunkie</occupation></subject>")
+        expect(record.subject.occupation.send(a.to_sym)).to eq(['attr_val'])
+      }
+    end
+  end
+end

data/spec/lib/title_spec.rb

@@ -0,0 +1,108 @@
+require 'spec_helper'
+
+describe "Mods <titleInfo> element" do
+  it "should recognize type attribute on titleInfo element" do
+    Mods::TitleInfo::TYPES.each { |t|
+      record = mods_record("<titleInfo type='#{t}'>hi</titleInfo>")
+      expect(record.title_info.type_at).to eq([t])
+    }
+  end
+  it "should recognize subelements" do
+    Mods::TitleInfo::CHILD_ELEMENTS.each { |e|
+      record = mods_record("<titleInfo><#{e}>oofda</#{e}></titleInfo>")
+      expect(record.title_info.send(e).text).to eq('oofda')
+    }
+  end
+
+  context "short_title" do
+    it "should start with nonSort element" do
+      record = mods_record("<titleInfo><title>Jerk</title><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.short_title).to eq(["The Jerk"])
+    end
+    it "should not include subtitle" do
+      record = mods_record("<titleInfo><title>Jerk</title><subTitle>A Tale of Tourettes</subTitle><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.short_title).to eq(["The Jerk"])
+    end
+    it "Mods::Record.short_titles convenience method should return an Array (multiple titles are legal in Mods)" do
+      record = mods_record("<titleInfo><title>Jerk</title><nonSort>The</nonSort></titleInfo><titleInfo><title>Joke</title></titleInfo>")
+      expect(record.short_titles).to eq(["The Jerk", "Joke"])
+    end
+    it "should not include alternative titles" do
+      record = mods_record("<titleInfo type='alternative'><title>ta da!</title></titleInfo>")
+      expect(record.short_titles).not_to include("ta da!")
+      record = mods_record("<titleInfo type='alternative'><title>1</title></titleInfo><titleInfo><title>2</title></titleInfo>")
+      expect(record.short_titles).to eq(['2'])
+    end
+    # note that Mods::Record.short_title tests are in record_spec
+  end
+
+  context "full_title" do
+    it "should start with nonSort element" do
+      record = mods_record("<titleInfo><title>Jerk</title><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.full_title).to eq(["The Jerk"])
+    end
+    it "should include subtitle" do
+      record = mods_record("<titleInfo><title>Jerk</title><subTitle>A Tale of Tourettes</subTitle><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.full_title).to eq(["The Jerk A Tale of Tourettes"])
+    end
+    it "Mods::Record.full_titles convenience method should return an Array (multiple titles are legal in Mods)" do
+      record = mods_record("<titleInfo><title>Jerk</title><nonSort>The</nonSort></titleInfo><titleInfo><title>Joke</title></titleInfo>")
+      expect(record.full_titles).to eq(["The Jerk", "Joke"])
+    end
+    # note that Mods::Record.full_title tests are in record_spec
+  end
+
+  context "sort_title" do
+    it "should skip nonSort element" do
+      record = mods_record("<titleInfo><title>Jerk</title><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.sort_title).to eq(["Jerk"])
+    end
+    it "should contain title and subtitle" do
+      record = mods_record("<titleInfo><title>Jerk</title><subTitle>A Tale of Tourettes</subTitle><nonSort>The</nonSort></titleInfo>")
+      expect(record.title_info.sort_title).to eq(["Jerk A Tale of Tourettes"])
+    end
+    it "should be an alternative title if there are no other choices" do
+      record = mods_record("<titleInfo type='alternative'><title>1</title></titleInfo>")
+      expect(record.title_info.sort_title).to eq(['1'])
+    end
+    it "should not be an alternative title if there are other choices" do
+      record = mods_record("<titleInfo type='alternative'><title>1</title></titleInfo><titleInfo><title>2</title></titleInfo>")
+      expect(record.title_info.sort_title).to eq(['2'])
+      expect(record.sort_title).to eq('2')
+    end
+    it "should have a configurable delimiter between title and subtitle" do
+      m = Mods::Record.new(' : ')
+      m.from_str("<mods xmlns='#{Mods::MODS_NS}'><titleInfo><title>Jerk</title><subTitle>A Tale of Tourettes</subTitle><nonSort>The</nonSort></titleInfo></mods>")
+      expect(m.title_info.sort_title).to eq(["Jerk : A Tale of Tourettes"])
+    end
+    context "Mods::Record.sort_title convenience method" do
+      it "convenience method sort_title in Mods::Record should return a string" do
+        record = mods_record("<titleInfo><title>Jerk</title><subTitle>A Tale of Tourettes</subTitle><nonSort>The</nonSort></titleInfo>")
+        expect(record.sort_title).to eq("Jerk A Tale of Tourettes")
+      end
+    end
+    # note that Mods::Record.sort_title tests are in record_spec
+  end
+
+  context "alternative_title" do
+    it "should get an alternative title, if it exists" do
+      record = mods_record("<titleInfo type='alternative'><title>ta da!</title></titleInfo>")
+      expect(record.title_info.alternative_title).to eq(["ta da!"])
+    end
+    it "Mods::Record.alternative_titles convenience method for getting an Array of alternative titles when there are multiple elements" do
+      record = mods_record("<titleInfo type='alternative'><title>1</title></titleInfo><titleInfo type='alternative'><title>2</title></titleInfo>")
+      expect(record.alternative_titles).to eq(['1', '2'])
+      record = mods_record("<titleInfo type='alternative'><title>1</title><title>2</title></titleInfo>")
+      expect(record.alternative_titles).to eq(['12'])
+    end
+    it "should not get an alternative title if type attribute is absent from titleInfo" do
+      record = mods_record("<titleInfo><title>ta da!</title></titleInfo>")
+      expect(record.alternative_titles).to eq([])
+    end
+    it "should not get an alternative title if type attribute from titleInfo is not 'alternative'" do
+      record = mods_record("<titleInfo type='uniform'><title>ta da!</title></titleInfo>")
+      expect(record.alternative_titles).to eq([])
+    end
+    # note that Mods::Record.alternative_title tests are in record_spec
+  end
+end