motion-support 0.1.0 → 0.2.0

data/spec/motion-support/core_ext/class/attribute_spec.rb

@@ -0,0 +1,92 @@
+describe "class" do
+  describe "class_attribute" do
+    before do
+      @klass = Class.new
+      @klass.class_eval { class_attribute :setting }
+      @sub = Class.new(@klass)
+    end
+
+    it "should default to nil" do
+      @klass.setting.should.be.nil
+      @sub.setting.should.be.nil
+    end
+
+    it "should be inheritable" do
+      @klass.setting = 1
+      @sub.setting.should == 1
+    end
+    
+    it "should be overridable" do
+      @sub.setting = 1
+      @klass.setting.should.be.nil
+      
+      @klass.setting = 2
+      @sub.setting.should == 1
+      
+      Class.new(@sub).setting.should == 1
+    end
+    
+    it "should define a query method" do
+      @klass.setting?.should.be.false
+      @klass.setting = 1
+      @klass.setting?.should.be.true
+    end
+    
+    it "should define an instance reader that delegates to class" do
+      @klass.new.setting.should.be.nil
+    
+      @klass.setting = 1
+      @klass.new.setting.should == 1
+    end
+    
+    it "should allow to override per instance" do
+      object = @klass.new
+      object.setting = 1
+      @klass.setting.should == nil
+      @klass.setting = 2
+      object.setting.should == 1
+    end
+    
+    it "should define query method on instance" do
+      object = @klass.new
+      object.setting?.should.be.false
+      object.setting = 1
+      object.setting?.should.be.true
+    end
+    
+    describe "instance_writer => false" do
+      it "should not create instance writer" do
+        object = Class.new { class_attribute :setting, :instance_writer => false }.new
+        lambda { object.setting = 'boom' }.should.raise NoMethodError
+      end
+    end
+    
+    describe "instance_reader => false" do
+      it "should not create instance reader" do
+        object = Class.new { class_attribute :setting, :instance_reader => false }.new
+        lambda { object.setting }.should.raise NoMethodError
+        lambda { object.setting? }.should.raise NoMethodError
+      end
+    end
+    
+    describe "instance_accessor => false" do
+      it "should not create reader or writer" do
+        object = Class.new { class_attribute :setting, :instance_accessor => false }.new
+        lambda { object.setting }.should.raise NoMethodError
+        lambda { object.setting? }.should.raise NoMethodError
+        lambda { object.setting = 'boom' }.should.raise NoMethodError
+      end
+    end
+    
+    it "should work well with singleton classes" do
+      object = @klass.new
+      object.singleton_class.setting = 'foo'
+      object.setting.should == "foo"
+    end
+    
+    it "should return set value through setter" do
+      val = @klass.send(:setting=, 1)
+      val.should == 1
+    end
+  end
+end

data/spec/motion-support/core_ext/date/acts_like_spec.rb

@@ -0,0 +1,11 @@
+describe "Date" do
+  describe "acts_like" do
+    it "should act like date" do
+      Date.new.should.acts_like(:date)
+    end
+    
+    it "should not act like time" do
+      Date.new.should.not.acts_like(:time)
+    end
+  end
+end

data/spec/motion-support/core_ext/date/calculation_spec.rb

@@ -0,0 +1,186 @@
+describe "Date" do
+  describe "calculations" do
+    describe "yesterday" do
+      it "should calculate yesterday's date" do
+        Date.new(1982,10,15).yesterday.should == Date.new(1982,10,14)
+      end
+      
+      it "should construct yesterday's date" do
+        Date.yesterday.should == Date.current - 1
+      end
+    end
+    
+    describe "tomorrow" do
+      it "should calculate tomorrow's date" do
+        Date.new(1982,10,4).tomorrow.should == Date.new(1982,10,5)
+      end
+      
+      it "should construct tomorrow's date" do
+        Date.tomorrow.should == Date.current + 1
+      end
+    end
+    
+    describe "change" do
+      it "should change correctly" do
+        Date.new(2005,2,11).change(:day => 21).should == Date.new(2005,2,21)
+        Date.new(2005,2,11).change(:year => 2007, :month => 5).should == Date.new(2007,5,11)
+        Date.new(2005,2,22).change(:year => 2006).should == Date.new(2006,2,22)
+        Date.new(2005,2,22).change(:month => 6).should == Date.new(2005,6,22)
+      end
+    end
+    
+    describe "sunday" do
+      it "should calculate correctly" do
+        Date.new(2008,3,02).sunday.should == Date.new(2008,3,2)
+        Date.new(2008,2,29).sunday.should == Date.new(2008,3,2)
+      end
+    end
+    
+    describe "beginning_of_week" do
+      it "should calculate correctly" do
+        Date.new(1982,10,15).beginning_of_week.should == Date.new(1982,10,11)
+      end
+    end
+    
+    describe "end_of_week" do
+      it "should calculate correctly" do
+        Date.new(1982,10,4).end_of_week.should == Date.new(1982,10,10)
+      end
+    end
+    
+    describe "end_of_year" do
+      it "should calculate correctly" do
+        Date.new(2008,2,22).end_of_year.should == Date.new(2008,12,31)
+      end
+    end
+    
+    describe "end_of_month" do
+      it "should calculate correctly" do
+        Date.new(2005,3,20).end_of_month.should == Date.new(2005,3,31)
+        Date.new(2005,2,20).end_of_month.should == Date.new(2005,2,28)
+        Date.new(2005,4,20).end_of_month.should == Date.new(2005,4,30)
+      end
+    end
+    
+    describe "prev_year" do
+      it "should calculate correctly" do
+        Date.new(1983,10,14).prev_year.should == Date.new(1982,10,14)
+      end
+      
+      it "should work with leap years" do
+        Date.new(2000,2,29).prev_year.should == Date.new(1999,2,28)
+      end
+    end
+    
+    describe "last_year" do
+      it "should calculate correctly" do
+        Date.new(2005,6,5).last_year.should == Date.new(2004,6,5)
+        Date.new(1983,10,14).last_year.should == Date.new(1982,10,14)
+      end
+      
+      it "should work with leap years" do
+        Date.new(2000,2,29).last_year.should == Date.new(1999,2,28)
+      end
+    end
+    
+    describe "next_year" do
+      it "should calculate correctly" do
+        Date.new(1981,10,10).next_year.should == Date.new(1982,10,10)
+      end
+      
+      it "should work with leap years" do
+        Date.new(2000,2,29).next_year.should == Date.new(2001,2,28)
+      end
+    end
+    
+    describe "advance" do
+      it "should calculate correctly" do
+        Date.new(2005,2,28).advance(:years => 1).should == Date.new(2006,2,28)
+        Date.new(2005,2,28).advance(:months => 4).should == Date.new(2005,6,28)
+        Date.new(2005,2,28).advance(:weeks => 3).should == Date.new(2005,3,21)
+        Date.new(2005,2,28).advance(:days => 5).should == Date.new(2005,3,5)
+        Date.new(2005,2,28).advance(:years => 7, :months => 7).should == Date.new(2012,9,28)
+        Date.new(2005,2,28).advance(:years => 7, :months => 19, :days => 5).should == Date.new(2013,10,3)
+        Date.new(2005,2,28).advance(:years => 7, :months => 19, :weeks => 2, :days => 5).should == Date.new(2013,10,17)
+        Date.new(2004,2,29).advance(:years => 1).should == Date.new(2005,2,28)
+      end
+      
+      it "should advance years before days" do
+        Date.new(2011, 2, 28).advance(:years => 1, :days => 1).should == Date.new(2012, 2, 29)
+      end
+      
+      it "should advance months before days" do
+        Date.new(2010, 2, 28).advance(:months => 1, :days => 1).should == Date.new(2010, 3, 29)
+      end
+      
+      it "should not change passed option hash" do
+        options = { :years => 3, :months => 11, :days => 2 }
+        Date.new(2005,2,28).advance(options)
+        options.should == { :years => 3, :months => 11, :days => 2 }
+      end
+    end
+    
+    describe "last_week" do
+      it "should calculate correctly" do
+        Date.new(2005,5,17).last_week.should == Date.new(2005,5,9)
+        Date.new(2007,1,7).last_week.should == Date.new(2006,12,25)
+        Date.new(2010,2,19).last_week(:friday).should == Date.new(2010,2,12)
+        Date.new(2010,2,19).last_week(:saturday).should == Date.new(2010,2,13)
+        Date.new(2010,3,4).last_week(:saturday).should == Date.new(2010,2,27)
+      end
+    end
+    
+    describe "last_month" do
+      it "should calculate correctly on the 31st" do
+        Date.new(2004, 3, 31).last_month.should == Date.new(2004, 2, 29)
+        
+      end
+    end
+    
+    describe "last_quarter" do
+      it "should calculate correctly on the 31st" do
+        Date.new(2004, 5, 31).last_quarter.should == Date.new(2004, 2, 29)
+      end
+    end
+    
+    describe "since" do
+      it "should calculate correctly" do
+        Date.new(2005,2,21).since(45).should == Time.local(2005,2,21,0,0,45)
+      end
+    end
+    
+    describe "ago" do
+      it "should calculate correctly" do
+        Date.new(2005,2,21).ago(45).should == Time.local(2005,2,20,23,59,15)
+      end
+    end
+    
+    describe "beginning_of_day" do
+      it "should calculate correctly" do
+        Date.new(2005,2,21).beginning_of_day.should == Time.local(2005,2,21,0,0,0)
+      end
+    end
+    
+    describe "end_of_day" do
+      it "should calculate correctly" do
+        Date.new(2005,2,21).end_of_day.should == Time.local(2005,2,21,23,59,59,Rational(999999999, 1000))
+      end
+    end
+    
+    describe "past?" do
+      it "should calculate correctly" do
+        Date.yesterday.should.be.past
+        Date.today.last_week.should.be.past
+        Date.tomorrow.should.not.be.past
+      end
+    end
+    
+    describe "future?" do
+      it "should calculate correctly" do
+        Date.tomorrow.should.be.future
+        Date.today.next_week.should.be.future
+        Date.yesterday.should.not.be.future
+      end
+    end
+  end
+end

data/spec/motion-support/core_ext/date/conversion_spec.rb

@@ -0,0 +1,18 @@
+describe "date" do
+  describe "conversions" do
+    it "should convert date to string" do
+      date = Date.new(2005, 2, 21)
+      date.to_s.should == "2005-2-21"
+      date.to_s(:short).should == "21 Feb"
+      date.to_s(:long).should == "February 21, 2005"
+      date.to_s(:long_ordinal).should == "February 21st, 2005"
+      date.to_s(:db).should == "2005-02-21"
+      date.to_s(:rfc822).should == "21 Feb 2005"
+    end
+    
+    it "should make inspect readable" do
+      Date.new(2005, 2, 21).readable_inspect.should == "Mon, 21 Feb 2005"
+      Date.new(2005, 2, 21).readable_inspect.should == Date.new(2005, 2, 21).inspect
+    end
+  end
+end

data/spec/motion-support/core_ext/date_and_time/calculation_spec.rb

@@ -0,0 +1,336 @@
+class Date
+  def self.for_spec(year, month, day, hour, minute, second, usec)
+    new(year, month, day)
+  end
+end
+
+class Time
+  def self.for_spec(year, month, day, hour, minute, second, usec)
+    local(year, month, day, hour, minute, second, usec)
+  end
+end
+
+[Date, Time].each do |klass|
+  describe klass do
+    @klass = klass
+    def date_or_time(year, month, day, hour, minute, second, usec = nil)
+      @klass.for_spec(year, month, day, hour, minute, second, usec)
+    end
+    
+    def with_bw_default(bw = :monday)
+      old_bw = Date.beginning_of_week
+      Date.beginning_of_week = bw
+      yield
+    ensure
+      Date.beginning_of_week = old_bw
+    end
+    
+    describe "yesterday" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,22,10,10,10).yesterday.should == date_or_time(2005,2,21,10,10,10)
+        date_or_time(2005,3,2,10,10,10).yesterday.yesterday.should == date_or_time(2005,2,28,10,10,10)
+      end
+    end
+    
+    describe "tomorrow" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,22,10,10,10).tomorrow.should == date_or_time(2005,2,23,10,10,10)
+        date_or_time(2005,2,28,10,10,10).tomorrow.tomorrow.should == date_or_time(2005,3,2,10,10,10)
+      end
+    end
+    
+    describe "days_ago" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).days_ago(1).should == date_or_time(2005,6,4,10,10,10)
+        date_or_time(2005,6,5,10,10,10).days_ago(5).should == date_or_time(2005,5,31,10,10,10)
+      end
+    end
+    
+    describe "days_since" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).days_since(1).should == date_or_time(2005,6,6,10,10,10)
+        date_or_time(2004,12,31,10,10,10).days_since(1).should == date_or_time(2005,1,1,10,10,10)
+      end
+    end
+    
+    describe "weeks_ago" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).weeks_ago(1).should == date_or_time(2005,5,29,10,10,10)
+        date_or_time(2005,6,5,10,10,10).weeks_ago(5).should == date_or_time(2005,5,1,10,10,10)
+        date_or_time(2005,6,5,10,10,10).weeks_ago(6).should == date_or_time(2005,4,24,10,10,10)
+        date_or_time(2005,6,5,10,10,10).weeks_ago(14).should == date_or_time(2005,2,27,10,10,10)
+        date_or_time(2005,1,1,10,10,10).weeks_ago(1).should == date_or_time(2004,12,25,10,10,10)
+      end
+    end
+    
+    describe "weeks_since" do
+      it "should be calculated correctly" do
+        date_or_time(2005,7,7,10,10,10).weeks_since(1).should == date_or_time(2005,7,14,10,10,10)
+        date_or_time(2005,7,7,10,10,10).weeks_since(1).should == date_or_time(2005,7,14,10,10,10)
+        date_or_time(2005,6,27,10,10,10).weeks_since(1).should == date_or_time(2005,7,4,10,10,10)
+        date_or_time(2004,12,28,10,10,10).weeks_since(1).should == date_or_time(2005,1,4,10,10,10)
+      end
+    end
+    
+    describe "months_ago" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).months_ago(1).should == date_or_time(2005,5,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_ago(7).should == date_or_time(2004,11,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_ago(6).should == date_or_time(2004,12,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_ago(12).should == date_or_time(2004,6,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_ago(24).should == date_or_time(2003,6,5,10,10,10)
+      end
+    end
+    
+    describe "months_since" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).months_since(1).should == date_or_time(2005,7,5,10,10,10)
+        date_or_time(2005,12,5,10,10,10).months_since(1).should == date_or_time(2006,1,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_since(6).should == date_or_time(2005,12,5,10,10,10)
+        date_or_time(2005,12,5,10,10,10).months_since(6).should == date_or_time(2006,6,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_since(7).should == date_or_time(2006,1,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_since(12).should == date_or_time(2006,6,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).months_since(24).should == date_or_time(2007,6,5,10,10,10)
+        date_or_time(2005,3,31,10,10,10).months_since(1).should == date_or_time(2005,4,30,10,10,10)
+        date_or_time(2005,1,29,10,10,10).months_since(1).should == date_or_time(2005,2,28,10,10,10)
+        date_or_time(2005,1,30,10,10,10).months_since(1).should == date_or_time(2005,2,28,10,10,10)
+        date_or_time(2005,1,31,10,10,10).months_since(1).should == date_or_time(2005,2,28,10,10,10)
+      end
+    end
+    
+    describe "years_ago" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).years_ago(1).should == date_or_time(2004,6,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).years_ago(7).should == date_or_time(1998,6,5,10,10,10)
+         # 1 year ago from leap day
+        date_or_time(2004,2,29,10,10,10).years_ago(1).should == date_or_time(2003,2,28,10,10,10)
+      end
+    end
+    
+    describe "years_since" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).years_since(1).should == date_or_time(2006,6,5,10,10,10)
+        date_or_time(2005,6,5,10,10,10).years_since(7).should == date_or_time(2012,6,5,10,10,10)
+        # 1 year since leap day
+        date_or_time(2004,2,29,10,10,10).years_since(1).should == date_or_time(2005,2,28,10,10,10)
+      end
+    end
+    
+    describe "beginning_of_month" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,22,10,10,10).beginning_of_month.should == date_or_time(2005,2,1,0,0,0)
+      end
+    end
+    
+    describe "beginning_of_quarter" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,15,10,10,10).beginning_of_quarter.should == date_or_time(2005,1,1,0,0,0)
+        date_or_time(2005,1,1,0,0,0).beginning_of_quarter.should == date_or_time(2005,1,1,0,0,0)
+        date_or_time(2005,12,31,10,10,10).beginning_of_quarter.should == date_or_time(2005,10,1,0,0,0)
+        date_or_time(2005,6,30,23,59,59).beginning_of_quarter.should == date_or_time(2005,4,1,0,0,0)
+      end
+    end
+    
+    describe "end_of_quarter" do
+      it "should be calculated correctly" do
+        date_or_time(2007,2,15,10,10,10).end_of_quarter.should == date_or_time(2007,3,31,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,3,31,0,0,0).end_of_quarter.should == date_or_time(2007,3,31,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,12,21,10,10,10).end_of_quarter.should == date_or_time(2007,12,31,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,4,1,0,0,0).end_of_quarter.should == date_or_time(2007,6,30,23,59,59,Rational(999999999, 1000))
+        date_or_time(2008,5,31,0,0,0).end_of_quarter.should == date_or_time(2008,6,30,23,59,59,Rational(999999999, 1000))
+      end
+    end
+    
+    describe "beginning_of_year" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,22,10,10,10).beginning_of_year.should == date_or_time(2005,1,1,0,0,0)
+      end
+    end
+    
+    describe "next_week" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,22,15,15,10).next_week.should == date_or_time(2005,2,28,0,0,0)
+        date_or_time(2005,2,22,15,15,10).next_week(:friday).should == date_or_time(2005,3,4,0,0,0)
+        date_or_time(2006,10,23,0,0,0).next_week.should == date_or_time(2006,10,30,0,0,0)
+        date_or_time(2006,10,23,0,0,0).next_week(:wednesday).should == date_or_time(2006,11,1,0,0,0)
+      end
+      
+      it "should be calculated correctly with default beginning of week" do
+        # calling with_bw_default produces LocalJumpError, even though a block is given
+        begin
+          old_bw = Date.beginning_of_week
+          Date.beginning_of_week = :tuesday
+        
+          date_or_time(2012,3,21,0,0,0).next_week(:wednesday).should == date_or_time(2012,3,28,0,0,0)
+          date_or_time(2012,3,21,0,0,0).next_week(:saturday).should == date_or_time(2012,3,31,0,0,0)
+          date_or_time(2012,3,21,0,0,0).next_week(:tuesday).should == date_or_time(2012,3,27,0,0,0)
+          date_or_time(2012,3,21,0,0,0).next_week(:monday).should == date_or_time(2012,4,02,0,0,0)
+        ensure
+          Date.beginning_of_week = old_bw
+        end
+      end
+    end
+    
+    describe "next_month" do
+      it "should be calculated correctly" do
+        date_or_time(2005,8,31,15,15,10).next_month.should == date_or_time(2005,9,30,15,15,10)
+      end
+    end
+    
+    describe "next_quarter" do
+      it "should be calculated correctly" do
+        date_or_time(2005,8,31,15,15,10).next_quarter.should == date_or_time(2005,11,30,15,15,10)
+      end
+    end
+    
+    describe "next_year" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).next_year.should == date_or_time(2006,6,5,10,10,10)
+      end
+    end
+    
+    describe "prev_week" do
+      it "should be calculated correctly" do
+        date_or_time(2005,3,1,15,15,10).prev_week.should == date_or_time(2005,2,21,0,0,0)
+        date_or_time(2005,3,1,15,15,10).prev_week(:tuesday).should == date_or_time(2005,2,22,0,0,0)
+        date_or_time(2005,3,1,15,15,10).prev_week(:friday).should == date_or_time(2005,2,25,0,0,0)
+        date_or_time(2006,11,6,0,0,0).prev_week.should == date_or_time(2006,10,30,0,0,0)
+        date_or_time(2006,11,23,0,0,0).prev_week(:wednesday).should == date_or_time(2006,11,15,0,0,0)
+      end
+      
+      it "should be calculated correctly with default beginning of week" do
+        begin
+          old_bw = Date.beginning_of_week
+          Date.beginning_of_week = :tuesday
+        
+          date_or_time(2012,3,21,0,0,0).prev_week(:wednesday).should == date_or_time(2012,3,14,0,0,0)
+          date_or_time(2012,3,21,0,0,0).prev_week(:saturday).should == date_or_time(2012,3,17,0,0,0)
+          date_or_time(2012,3,21,0,0,0).prev_week(:tuesday).should == date_or_time(2012,3,13,0,0,0)
+          date_or_time(2012,3,21,0,0,0).prev_week(:monday).should == date_or_time(2012,3,19,0,0,0)
+        ensure
+          Date.beginning_of_week = old_bw
+        end
+      end
+    end
+    
+    describe "prev_month" do
+      it "should be calculated correctly" do
+        date_or_time(2004,3,31,10,10,10).prev_month.should == date_or_time(2004,2,29,10,10,10)
+      end
+    end
+    
+    describe "prev_quarter" do
+      it "should be calculated correctly" do
+        date_or_time(2004,5,31,10,10,10).prev_quarter.should == date_or_time(2004,2,29,10,10,10)
+      end
+    end
+    
+    describe "prev_year" do
+      it "should be calculated correctly" do
+        date_or_time(2005,6,5,10,10,10).prev_year.should == date_or_time(2004,6,5,10,10,10)
+      end
+    end
+    
+    describe "days_to_week_start" do
+      it "should be calculated correctly" do
+        date_or_time(2011,11,01,0,0,0).days_to_week_start(:tuesday).should == 0
+        date_or_time(2011,11,02,0,0,0).days_to_week_start(:tuesday).should == 1
+        date_or_time(2011,11,03,0,0,0).days_to_week_start(:tuesday).should == 2
+        date_or_time(2011,11,04,0,0,0).days_to_week_start(:tuesday).should == 3
+        date_or_time(2011,11,05,0,0,0).days_to_week_start(:tuesday).should == 4
+        date_or_time(2011,11,06,0,0,0).days_to_week_start(:tuesday).should == 5
+        date_or_time(2011,11,07,0,0,0).days_to_week_start(:tuesday).should == 6
+
+        date_or_time(2011,11,03,0,0,0).days_to_week_start(:monday).should == 3
+        date_or_time(2011,11,04,0,0,0).days_to_week_start(:tuesday).should == 3
+        date_or_time(2011,11,05,0,0,0).days_to_week_start(:wednesday).should == 3
+        date_or_time(2011,11,06,0,0,0).days_to_week_start(:thursday).should == 3
+        date_or_time(2011,11,07,0,0,0).days_to_week_start(:friday).should == 3
+        date_or_time(2011,11,8,0,0,0).days_to_week_start(:saturday).should == 3
+        date_or_time(2011,11,9,0,0,0).days_to_week_start(:sunday).should == 3
+      end
+      
+      it "should be calculated correctly with default beginning of week" do
+        begin
+          old_bw = Date.beginning_of_week
+          Date.beginning_of_week = :friday
+        
+          date_or_time(2012,03,8,0,0,0).days_to_week_start.should == 6
+          date_or_time(2012,03,7,0,0,0).days_to_week_start.should == 5
+          date_or_time(2012,03,6,0,0,0).days_to_week_start.should == 4
+          date_or_time(2012,03,5,0,0,0).days_to_week_start.should == 3
+          date_or_time(2012,03,4,0,0,0).days_to_week_start.should == 2
+          date_or_time(2012,03,3,0,0,0).days_to_week_start.should == 1
+          date_or_time(2012,03,2,0,0,0).days_to_week_start.should == 0
+        ensure
+          Date.beginning_of_week = old_bw
+        end
+      end
+    end
+    
+    describe "beginning_of_week" do
+      it "should be calculated correctly" do
+        date_or_time(2005,2,4,10,10,10).beginning_of_week.should == date_or_time(2005,1,31,0,0,0)
+        date_or_time(2005,11,28,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,11,29,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,11,30,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,12,01,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,12,02,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,12,03,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+        date_or_time(2005,12,04,0,0,0).beginning_of_week.should == date_or_time(2005,11,28,0,0,0)
+      end
+    end
+    
+    describe "end_of_week" do
+      it "should be calculated correctly" do
+        date_or_time(2007,12,31,10,10,10).end_of_week.should == date_or_time(2008,1,6,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,8,27,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,8,28,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,8,29,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,8,30,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,8,31,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,9,01,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,9,02,0,0,0).end_of_week.should == date_or_time(2007,9,2,23,59,59,Rational(999999999, 1000))
+      end
+    end
+    
+    describe "end_of_month" do
+      it "should be calculated correctly" do
+        date_or_time(2005,3,20,10,10,10).end_of_month.should == date_or_time(2005,3,31,23,59,59,Rational(999999999, 1000))
+        date_or_time(2005,2,20,10,10,10).end_of_month.should == date_or_time(2005,2,28,23,59,59,Rational(999999999, 1000))
+        date_or_time(2005,4,20,10,10,10).end_of_month.should == date_or_time(2005,4,30,23,59,59,Rational(999999999, 1000))
+      end
+    end
+    
+    describe "end_of_year" do
+      it "should be calculated correctly" do
+        date_or_time(2007,2,22,10,10,10).end_of_year.should == date_or_time(2007,12,31,23,59,59,Rational(999999999, 1000))
+        date_or_time(2007,12,31,10,10,10).end_of_year.should == date_or_time(2007,12,31,23,59,59,Rational(999999999, 1000))
+      end
+    end
+    
+    describe "weekdays" do
+      it "should return monday with default beginning of week" do
+        begin
+          old_bw = Date.beginning_of_week
+          Date.beginning_of_week = :saturday
+        
+          date_or_time(2012,9,18,0,0,0).monday.should == date_or_time(2012,9,17,0,0,0)
+        ensure
+          Date.beginning_of_week = old_bw
+        end
+      end
+      
+      it "should return sunday with default beginning of week" do
+        begin
+          old_bw = Date.beginning_of_week
+          Date.beginning_of_week = :wednesday
+        
+          date_or_time(2012,9,19,0,0,0).sunday.should == date_or_time(2012,9,23,23,59,59, Rational(999999999, 1000))
+        ensure
+          Date.beginning_of_week = old_bw
+        end
+      end
+    end
+  end
+end