calendarium-romanum 0.2.1 → 0.3.0

data/spec/rank_spec.rb

@@ -29,7 +29,7 @@ describe CR::Rank do
   end
 
   describe '#desc' do
-    it { expect(CR::Ranks[1.1].desc).to eq 'Easter triduum' }
+    it { expect(CR::Ranks[1.1].desc).to have_translation 'Easter triduum' }
   end
 
   describe '#short_desc' do
@@ -37,6 +37,6 @@ describe CR::Rank do
       expect(CR::Ranks[1.1].short_desc).to be_nil
     end
 
-    it { expect(CR::Ranks[2.8].short_desc).to eq 'feast' }
+    it { expect(CR::Ranks[2.8].short_desc).to have_translation 'feast' }
   end
 end

data/spec/readme_spec.rb

@@ -34,16 +34,18 @@ class MarkdownDocument
   end
 end
 
-describe 'README.md' do
-  readme_path = File.expand_path('../../README.md', __FILE__)
-  readme = File.read readme_path
-  doc = MarkdownDocument.new readme
+%w(README.md data/README.md).each do |path|
+  describe path do
+    readme_path = File.expand_path('../../' + path, __FILE__)
+    readme = File.read readme_path
+    doc = MarkdownDocument.new readme
 
-  doc.each_ruby_example do |code, line|
-    describe "example L#{line}" do
-      it 'executes without failure' do
-        cls = Class.new
-        cls.class_eval(code, readme_path, line)
+    doc.each_ruby_example do |code, line|
+      describe "example L#{line}" do
+        it 'executes without failure' do
+          cls = Class.new
+          cls.class_eval(code, readme_path, line)
+        end
       end
     end
   end

data/spec/spec_helper.rb

@@ -5,7 +5,6 @@
 #
 # See http://rubydoc.info/gems/rspec-core/RSpec/Core/Configuration
 RSpec.configure do |config|
-  config.treat_symbols_as_metadata_keys_with_true_values = true
   config.run_all_when_everything_filtered = true
   config.filter_run :focus
 
@@ -16,5 +15,21 @@ RSpec.configure do |config|
   config.order = 'random'
 end
 
+RSpec::Matchers.define :have_translation do |expected, locale|
+  match do |actual|
+    locale ||= :en
+    if I18n.locale == locale
+      actual == expected
+    else
+      # with locale different from the one the spec is written for
+      # just test that the string isn't left untranslated
+      !(actual.empty? || actual.include?('translation missing'))
+    end
+  end
+end
+
 require 'calendarium-romanum'
 CR = CalendariumRomanum
+
+I18n.enforce_available_locales = true
+I18n.locale = ENV['LOCALE'] || :en

data/spec/temporale_spec.rb

@@ -1,3 +1,4 @@
+# coding: utf-8
 require_relative 'spec_helper'
 
 describe CR::Temporale do
@@ -13,110 +14,73 @@ describe CR::Temporale do
         [Date.new(2014, 11, 1), 2013],
         [Date.new(2014, 12, 1), 2014]
       ].each do |date, year|
-        described_class.liturgical_year(date).should eq year
+        expect(described_class.liturgical_year(date)).to eq year
       end
     end
   end
 
-  describe '#weekday_before' do
-    it 'works well for all 7 weekdays' do
-      today = Date.new 2014, 3, 16
-      @t.weekday_before(0, today).should eq Date.new(2014, 3, 9)
-      @t.weekday_before(1, today).should eq Date.new(2014, 3, 10)
-      @t.weekday_before(2, today).should eq Date.new(2014, 3, 11)
-      @t.weekday_before(3, today).should eq Date.new(2014, 3, 12)
-      @t.weekday_before(4, today).should eq Date.new(2014, 3, 13)
-      @t.weekday_before(5, today).should eq Date.new(2014, 3, 14)
-      @t.weekday_before(6, today).should eq Date.new(2014, 3, 15)
-    end
-  end
-
-  describe '#weekday_after' do
-    it 'works well for all 7 weekdays' do
-      today = Date.new 2014, 3, 16
-      @t.monday_after(today).should eq Date.new(2014, 3, 17)
-      @t.tuesday_after(today).should eq Date.new(2014, 3, 18)
-      @t.wednesday_after(today).should eq Date.new(2014, 3, 19)
-      @t.thursday_after(today).should eq Date.new(2014, 3, 20)
-      @t.friday_after(today).should eq Date.new(2014, 3, 21)
-      @t.saturday_after(today).should eq Date.new(2014, 3, 22)
-      @t.sunday_after(today).should eq Date.new(2014, 3, 23)
-    end
-  end
-
-  describe '#advent_sunday' do
-    it 'determines first Sunday of Advent' do
-      [
-       [2004, [11, 28]],
-       [2010, [11, 28]],
-       [2011, [11, 27]],
-       [2012, [12, 2]],
-       [2013, [12, 1]]
-      ].each do |d|
-        year, date = d
-        @t.advent_sunday(1, year).should eq Date.new(year, *date)
+  describe '#first_advent_sunday determines first Sunday of Advent' do
+    [
+      [2004, [11, 28]],
+      [2010, [11, 28]],
+      [2011, [11, 27]],
+      [2012, [12, 2]],
+      [2013, [12, 1]]
+    ].each do |d|
+      year, date = d
+      it year do
+        temporale = described_class.new(year)
+        expect(temporale.first_advent_sunday).to eq Date.new(year, *date)
       end
     end
-
-    it 'determines second Sunday of Advent' do
-      @t.advent_sunday(2, 2013).should eq Date.new(2013,12,8)
-    end
-  end
-
-  describe '#second_advent_sunday' do
-    # alias of advent_sunday through method_missing
-
-    it 'determines second Sunday of Advent' do
-      @t.second_advent_sunday(2013).should eq Date.new(2013,12,8)
-    end
   end
 
-  describe '#easter_sunday' do
-    it 'determines Easter Sunday' do
-      [
-       [2003, [2004, 4, 11]],
-       [2004, [2005, 3, 27]],
-       [2005, [2006, 4, 16]],
-       [2006, [2007, 4, 8]],
-       [2014, [2015, 4, 5]]
-      ].each do |d|
-        year, date = d
-        @t.easter_sunday(year).should eq Date.new(*date)
+  describe '#easter_sunday determines Easter Sunday' do
+    [
+      [2003, [2004, 4, 11]],
+      [2004, [2005, 3, 27]],
+      [2005, [2006, 4, 16]],
+      [2006, [2007, 4, 8]],
+      [2014, [2015, 4, 5]]
+    ].each do |d|
+      year, date = d
+      it year do
+        temporale = described_class.new(year)
+        expect(temporale.easter_sunday).to eq Date.new(*date)
       end
     end
   end
 
   describe '#date_range' do
     it 'includes days of the year' do
-      @t.date_range.should include Date.new(2012, 12, 3)
-      @t.date_range.should include Date.new(2013, 11, 5)
+      expect(@t.date_range).to include Date.new(2012, 12, 3)
+      expect(@t.date_range).to include Date.new(2013, 11, 5)
     end
   end
 
   describe '#season' do
     it 'determines Advent' do
-      @t13.season(Date.new(2013, 12, 15)).should eq :advent
-      @t13.season(Date.new(2013, 12, 1)).should eq :advent
-      @t13.season(Date.new(2013, 12, 24)).should eq :advent
+      expect(@t13.season(Date.new(2013, 12, 1))).to eq CR::Seasons::ADVENT
+      expect(@t13.season(Date.new(2013, 12, 24))).to eq CR::Seasons::ADVENT
     end
 
     it 'determines Christmas' do
-      @t13.season(Date.new(2013, 12, 25)).should eq :christmas
-      @t13.season(Date.new(2014, 1, 12)).should eq :christmas
-      @t13.season(Date.new(2014, 1, 13)).should eq :ordinary
+      expect(@t13.season(Date.new(2013, 12, 25))).to eq CR::Seasons::CHRISTMAS
+      expect(@t13.season(Date.new(2014, 1, 12))).to eq CR::Seasons::CHRISTMAS
+      expect(@t13.season(Date.new(2014, 1, 13))).to eq CR::Seasons::ORDINARY
     end
 
     it 'determines Lent' do
-      @t13.season(Date.new(2014, 3, 4)).should eq :ordinary
-      @t13.season(Date.new(2014, 3, 5)).should eq :lent
-      @t13.season(Date.new(2014, 4, 19)).should eq :lent
-      @t13.season(Date.new(2014, 4, 20)).should eq :easter
+      expect(@t13.season(Date.new(2014, 3, 4))).to eq CR::Seasons::ORDINARY
+      expect(@t13.season(Date.new(2014, 3, 5))).to eq CR::Seasons::LENT
+      expect(@t13.season(Date.new(2014, 4, 19))).to eq CR::Seasons::LENT
+      expect(@t13.season(Date.new(2014, 4, 20))).to eq CR::Seasons::EASTER
     end
 
     it 'determines Easter time' do
-      @t13.season(Date.new(2014, 4, 20)).should eq :easter
-      @t13.season(Date.new(2014, 6, 8)).should eq :easter
-      @t13.season(Date.new(2014, 6, 9)).should eq :ordinary
+      expect(@t13.season(Date.new(2014, 4, 20))).to eq CR::Seasons::EASTER
+      expect(@t13.season(Date.new(2014, 6, 8))).to eq CR::Seasons::EASTER
+      expect(@t13.season(Date.new(2014, 6, 9))).to eq CR::Seasons::ORDINARY
     end
   end
 
@@ -206,7 +170,7 @@ describe CR::Temporale do
         it 'Nativity' do
           c = @t13.get(12, 25)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'The Nativity of the Lord'
+          expect(c.title).to have_translation 'The Nativity of the Lord'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
@@ -219,7 +183,7 @@ describe CR::Temporale do
         it 'Holy Family' do
           c = @t13.get(12, 29)
           expect(c.rank).to eq CR::Ranks::FEAST_LORD_GENERAL
-          expect(c.title).to eq 'The Holy Family of Jesus, Mary and Joseph'
+          expect(c.title).to have_translation 'The Holy Family of Jesus, Mary and Joseph'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
@@ -227,146 +191,308 @@ describe CR::Temporale do
           it 'is Holy Family on Friday Dec 30' do
             @t16 = described_class.new 2016
             c = @t16.get(12, 30)
-            expect(c.title).to eq 'The Holy Family of Jesus, Mary and Joseph'
+            expect(c.title).to have_translation 'The Holy Family of Jesus, Mary and Joseph'
           end
         end
 
         it 'Epiphany' do
           c = @t13.get(1, 6)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'The Epiphany of the Lord'
+          expect(c.title).to have_translation 'The Epiphany of the Lord'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Baptism of the Lord' do
           c = @t13.get(1, 12)
           expect(c.rank).to eq CR::Ranks::FEAST_LORD_GENERAL
-          expect(c.title).to eq 'The Baptism of the Lord'
+          expect(c.title).to have_translation 'The Baptism of the Lord'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Ash Wednesday' do
           c = @t13.get(3, 5)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'Ash Wednesday'
+          expect(c.title).to have_translation 'Ash Wednesday'
           expect(c.colour).to eq CR::Colours::VIOLET
         end
 
         it 'Palm Sunday' do
           c = @t13.get(4, 13)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'Palm Sunday of the Passion of the Lord'
+          expect(c.title).to have_translation 'Palm Sunday of the Passion of the Lord'
           expect(c.colour).to eq CR::Colours::RED
         end
 
         it 'Good Friday' do
           c = @t13.get(4, 18)
           expect(c.rank).to eq CR::Ranks::TRIDUUM
-          expect(c.title).to eq 'Friday of the Passion of the Lord'
+          expect(c.title).to have_translation 'Friday of the Passion of the Lord'
           expect(c.colour).to eq CR::Colours::RED
         end
 
         it 'Holy Saturday' do
           c = @t13.get(4, 19)
           expect(c.rank).to eq CR::Ranks::TRIDUUM
-          expect(c.title).to eq 'Holy Saturday'
+          expect(c.title).to have_translation 'Holy Saturday'
           expect(c.colour).to eq CR::Colours::VIOLET
         end
 
         it 'Resurrection' do
           c = @t13.get(4, 20)
           expect(c.rank).to eq CR::Ranks::TRIDUUM
-          expect(c.title).to eq 'Easter Sunday of the Resurrection of the Lord'
-          expect(c.colour).to eq CR::Colours::WHITE
-        end
-
-        it 'day in the Easter Octave' do
-          c = @t13.get(4, 22)
-          expect(c.rank).to eq CR::Ranks::PRIMARY
+          expect(c.title).to have_translation 'Easter Sunday of the Resurrection of the Lord'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Ascension' do
           c = @t13.get(5, 29)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'Ascension of the Lord'
+          expect(c.title).to have_translation 'Ascension of the Lord'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Pentecost' do
           c = @t13.get(6, 8)
           expect(c.rank).to eq CR::Ranks::PRIMARY
-          expect(c.title).to eq 'Pentecost Sunday'
+          expect(c.title).to have_translation 'Pentecost Sunday'
           expect(c.colour).to eq CR::Colours::RED
         end
 
         it 'Trinity' do
           c = @t13.get(6, 15)
           expect(c.rank).to eq CR::Ranks::SOLEMNITY_GENERAL
-          expect(c.title).to eq 'The Most Holy Trinity'
+          expect(c.title).to have_translation 'The Most Holy Trinity'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Body of Christ' do
           c = @t13.get(6, 19)
           expect(c.rank).to eq CR::Ranks::SOLEMNITY_GENERAL
-          expect(c.title).to eq 'The Most Holy Body and Blood of Christ'
+          expect(c.title).to have_translation 'The Most Holy Body and Blood of Christ'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Sacred Heart' do
           c = @t13.get(6, 27)
           expect(c.rank).to eq CR::Ranks::SOLEMNITY_GENERAL
-          expect(c.title).to eq 'The Most Sacred Heart of Jesus'
+          expect(c.title).to have_translation 'The Most Sacred Heart of Jesus'
           expect(c.colour).to eq CR::Colours::WHITE
         end
 
         it 'Christ the King' do
           c = @t13.get(11, 23)
           expect(c.rank).to eq CR::Ranks::SOLEMNITY_GENERAL
-          expect(c.title).to eq 'Our Lord Jesus Christ, King of the Universe'
+          expect(c.title).to have_translation 'Our Lord Jesus Christ, King of the Universe'
           expect(c.colour).to eq CR::Colours::WHITE
         end
+
+        describe 'other locales' do
+          it 'Latin' do
+            I18n.with_locale(:la) do
+              c = @t13.get(11, 23)
+              expect(c.title).to eq 'Domini nostri Iesu Christi universorum regis'
+            end
+          end
+
+          it 'Czech' do
+            I18n.with_locale(:cs) do
+              c = @t13.get(11, 23)
+              expect(c.title).to eq 'Ježíše Krista krále'
+            end
+          end
+
+          it 'Italian' do
+            I18n.with_locale(:it) do
+              c = @t13.get(11, 23)
+              expect(c.title).to eq "Nostro Signore Gesù Cristo Re dell'universo"
+            end
+          end
+        end
       end
-    end
-  end
 
-  describe 'initialized without a year' do
-    before :each do
-      @tny = described_class.new
+      # movable sanctorale feasts don't really belong in Temporale, but ...
+      describe 'movable sanctorale feasts' do
+        it 'Immaculate Heart' do
+          c = @t13.get(6, 28)
+          expect(c.title).to have_translation 'Immaculate Heart of Mary'
+          expect(c.rank).to eq CR::Ranks::MEMORIAL_GENERAL
+        end
+      end
     end
 
-    it 'is possible to initialize a Temporale without a year' do
-      expect { described_class.new }.not_to raise_exception
+    describe 'titles of Sundays and ferials' do
+      def title_for(month, day)
+        @t13.get(month, day).title
+      end
+
+      describe 'Ordinary time' do
+        it 'Sunday' do
+          expect(title_for(1, 19)).to have_translation '2nd Sunday in Ordinary Time'
+        end
+
+        it 'ferial' do
+          expect(title_for(1, 13)).to have_translation 'Monday, 1st week in Ordinary Time'
+        end
+      end
+
+      describe 'Advent' do
+        it 'Sunday' do
+          expect(title_for(12, 1)).to have_translation '1st Sunday of Advent'
+        end
+
+        it 'ferial' do
+          expect(title_for(12, 2)).to have_translation 'Monday, 1st week of Advent'
+        end
+      end
+
+      describe 'Christmas time' do
+        describe 'Octave of Christmas' do
+          it 'ferial' do
+            day = @t13.get(12, 30)
+            expect(day.rank).to eq CR::Ranks::FERIAL_PRIVILEGED
+            expect(day.title).to have_translation '6th day of Christmas Octave'
+          end
+        end
+
+        describe 'after Octave of Christmas' do
+          it 'ferial' do
+            expect(title_for(1, 2)).to have_translation 'Thursday after Christmas Octave'
+          end
+
+          it 'Sunday' do
+            expect(title_for(1, 5)).to have_translation '2nd Sunday after the Nativity of the Lord'
+          end
+        end
+
+        describe 'after Epiphany' do
+          it 'ferial' do
+            expect(title_for(1, 7)).to have_translation 'Tuesday after Epiphany'
+          end
+        end
+      end
+
+      describe 'Lent' do
+        describe 'before first Sunday' do
+          it 'ferial' do
+            expect(title_for(3, 6)).to have_translation 'Thursday after Ash Wednesday'
+          end
+        end
+
+        it 'Sunday' do
+          expect(title_for(3, 9)).to have_translation '1st Sunday of Lent'
+        end
+
+        it 'ferial' do
+          expect(title_for(3, 10)).to have_translation 'Monday, 1st week of Lent'
+        end
+
+        describe 'Holy Week' do
+          it 'ferial' do
+            day = @t13.get(4, 14)
+            expect(day.rank).to eq CR::Ranks::PRIMARY
+            expect(day.title).to have_translation 'Monday of Holy Week'
+          end
+        end
+      end
+
+      describe 'Easter' do
+        describe 'Easter Octave' do
+          it 'ferial' do
+            c = @t13.get(4, 22)
+            expect(c.rank).to eq CR::Ranks::PRIMARY
+            expect(c.title).to have_translation 'Easter Tuesday'
+          end
+
+          it 'Sunday (the octave day)' do
+            c = @t13.get(4, 27)
+            expect(c.rank).to eq CR::Ranks::PRIMARY
+            expect(c.title).to have_translation '2nd Sunday of Easter'
+          end
+        end
+
+        it 'Sunday' do
+          expect(title_for(5, 4)).to have_translation '3rd Sunday of Easter'
+        end
+
+        it 'ferial' do
+          expect(title_for(5, 5)).to have_translation 'Monday, 3rd week of Easter'
+        end
+      end
+
+      describe 'other locales' do
+        it 'Latin' do
+          I18n.with_locale(:la) do
+            expect(title_for(5, 5)).to eq 'Feria secunda, hebdomada III temporis paschalis'
+          end
+        end
+
+        it 'Czech' do
+          I18n.with_locale(:cs) do
+            expect(title_for(5, 5)).to eq 'Pondělí po 3. neděli velikonoční'
+          end
+        end
+
+        it 'Italian' do
+          I18n.with_locale(:it) do
+            expect(title_for(5, 5)).to eq 'Lunedì, III di Pasqua'
+          end
+        end
+      end
     end
+  end
 
-    it 'crashes when a date is requested without year' do
-      expect { @tny.first_advent_sunday }.to raise_exception
+  describe '.add_celebration' do
+    let(:celebration) { CR::Celebration.new('Monday after Pentecost', CR::Ranks::FEAST_PROPER, CR::Colours::WHITE) }
+    let(:date_proc) { proc { pentecost + 1 } }
+    let(:subclass) { Class.new(described_class) }
+    let(:date) { Date.new(2017, 6, 5) }
+
+    describe 'on Temporale itself' do
+      it 'fails' do
+        expect do
+          described_class.add_celebration date_proc, celebration
+        end.to raise_exception(RuntimeError, /Don't add celebrations to Temporale itself/)
+      end
     end
 
-    it 'computes dates as expected if year is given' do
-      days = %i(first_advent_sunday nativity holy_family mother_of_god
-      epiphany baptism_of_lord ash_wednesday easter_sunday good_friday
-      holy_saturday pentecost
-      holy_trinity body_blood sacred_heart christ_king
+    describe 'on a subclass' do
+      describe 'with date method' do
+        it 'adds the celebration' do
+          subclass.instance_eval do
+            define_method :date_method do
+              pentecost + 1
+            end
+          end
+
+          subclass.add_celebration :date_method, celebration
 
-      date_range)
-      days.each do |msg|
-        @tny.send(msg, 2012).should eq @t12.send(msg)
+          instance = subclass.new 2016
+          expect(instance.get(date)).to eq celebration
+        end
+      end
+
+      describe 'with date Proc' do
+        it 'adds the celebration' do
+          subclass.add_celebration date_proc, celebration
+
+          instance = subclass.new 2016
+          expect(instance.get(date)).to eq celebration
+        end
       end
     end
+  end
 
-    describe '#get' do
-      it 'always raises an exception' do
-        # for get to work well is imoportant to have precomputed
-        # solemnity dates. That is only possible when a year
-        # is specified on initialization.
-        [
-          Date.new(2015, 1, 1),
-          Date.new(2015, 9, 23),
-          Date.new(2015, 3, 4)
-        ].each do |date|
-          expect { @tny.get(date) }.to raise_exception
+  describe 'packaged extensions' do
+    describe 'ChristEternalPriest' do
+      let(:klass) { described_class.with_extensions(CR::Temporale::Extensions::ChristEternalPriest) }
+      let(:t) { klass.new(2016) }
+
+      it 'adds the feast' do
+        I18n.with_locale(:cs) do
+          c = t.get(6, 8)
+          expect(c.title).to eq 'Ježíše Krista, nejvyššího a věčného kněze'
+          expect(c.rank).to eq CR::Ranks::FEAST_PROPER
+          expect(c.colour).to eq CR::Colours::WHITE
         end
       end
     end