month.rb 0.11.0 → 0.11.2

data/test/tc_Month_plus.rb

@@ -0,0 +1,23 @@
+# test/tc_Month_plus.rb
+
+class TC_Month_plus < Minitest::Test
+  
+  def test_plus_method
+    assert_equal Month.new(2011, 5), Month.new(2011, 1).plus(4)
+    assert_equal Month.new(2012, 1), Month.new(2011, 12).plus(1)
+    assert_equal Month.new(2012, 1), Month.new(2011, 11).plus(2)
+    assert_equal Month.new(2012, 11), Month.new(2011, 11).plus(12)
+    assert_equal Month.new(2013, 11), Month.new(2011, 11).plus(24)
+    assert_equal Month.new(2011, 1), Month.new(2010, 12).plus(1)
+  end
+  
+  def test_plus_literal
+    assert_equal Month.new(2011, 5), Month.new(2011, 1) + 4
+    assert_equal Month.new(2012, 1), Month.new(2011, 12) + 1
+    assert_equal Month.new(2012, 1), Month.new(2011, 11) + 2
+    assert_equal Month.new(2012, 11), Month.new(2011, 11) + 12
+    assert_equal Month.new(2013, 11), Month.new(2011, 11) + 24
+    assert_equal Month.new(2011, 1), Month.new(2010, 12) + 1
+  end
+  
+end

data/test/tc_Month_prev.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_prev.rb
+
+class TC_Month_prev < Minitest::Test
+  
+  def test_prev
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).prev
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).prev
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).prev
+  end
+  
+end

data/test/tc_Month_prev_month.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_prev_month.rb
+
+class TC_Month_prev_month < Minitest::Test
+  
+  def test_prev_month
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).prev_month
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).prev_month
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).prev_month
+  end
+  
+end

data/test/tc_Month_previous.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_previous.rb
+
+class TC_Month_previous < Minitest::Test
+  
+  def test_previous
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).previous
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).previous
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).previous
+  end
+  
+end

data/test/tc_Month_previous_month.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_previous_month.rb
+
+class TC_Month_previous_month < Minitest::Test
+  
+  def test_previous_month
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).previous_month
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).previous_month
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).previous_month
+  end
+  
+end

data/test/tc_Month_prior.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_prior.rb
+
+class TC_Month_prior < Minitest::Test
+  
+  def test_prior
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).prior
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).prior
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).prior
+  end
+  
+end

data/test/tc_Month_prior_month.rb

@@ -0,0 +1,11 @@
+# test/tc_Month_prior_month.rb
+
+class TC_Month_prior_month < Minitest::Test
+  
+  def test_prior_month
+    assert_equal Month.new(2010, 12), Month.new(2011, 1).prior_month
+    assert_equal Month.new(2011, 11), Month.new(2011, 12).prior_month
+    assert_equal Month.new(2011, 10), Month.new(2011, 11).prior_month
+  end
+  
+end

data/test/tc_Month_self.begin_date.rb

@@ -0,0 +1,46 @@
+# test/tc_Month_self.begin_date.rb
+
+class TC_Month_self_begin_date < Minitest::Test
+  
+  def test_no_arguments
+    this_year, this_month = Date.today.year, Date.today.month
+    assert_equal Date.new(this_year, this_month, 1), Month.begin_date
+  end
+  
+  def test_one_argument
+    this_year = Date.today.year
+    assert_equal Date.new(this_year, 1, 1), Month.begin_date(1)
+    assert_equal Date.new(this_year, 2, 1), Month.begin_date(2)
+    assert_equal Date.new(this_year, 3, 1), Month.begin_date(3)
+    assert_equal Date.new(this_year, 4, 1), Month.begin_date(4)
+    assert_equal Date.new(this_year, 5, 1), Month.begin_date(5)
+    assert_equal Date.new(this_year, 6, 1), Month.begin_date(6)
+    assert_equal Date.new(this_year, 7, 1), Month.begin_date(7)
+    assert_equal Date.new(this_year, 8, 1), Month.begin_date(8)
+    assert_equal Date.new(this_year, 9, 1), Month.begin_date(9)
+    assert_equal Date.new(this_year, 10, 1), Month.begin_date(10)
+    assert_equal Date.new(this_year, 11, 1), Month.begin_date(11)
+    assert_equal Date.new(this_year, 12, 1), Month.begin_date(12)
+  end
+  
+  def test_two_arguments
+    assert_equal Date.new(2006, 1, 1), Month.begin_date(2006, 1)
+    assert_equal Date.new(2006, 2, 1), Month.begin_date(2006, 2)
+    assert_equal Date.new(2008, 2, 1), Month.begin_date(2008, 2)
+    assert_equal Date.new(2006, 3, 1), Month.begin_date(2006, 3)
+    assert_equal Date.new(2006, 4, 1), Month.begin_date(2006, 4)
+    assert_equal Date.new(2006, 5, 1), Month.begin_date(2006, 5)
+    assert_equal Date.new(2006, 6, 1), Month.begin_date(2006, 6)
+    assert_equal Date.new(2006, 7, 1), Month.begin_date(2006, 7)
+    assert_equal Date.new(2006, 8, 1), Month.begin_date(2006, 8)
+    assert_equal Date.new(2006, 9, 1), Month.begin_date(2006, 9)
+    assert_equal Date.new(2006, 10, 1), Month.begin_date(2006, 10)
+    assert_equal Date.new(2006, 11, 1), Month.begin_date(2006, 11)
+    assert_equal Date.new(2006, 12, 1), Month.begin_date(2006, 12)
+  end
+  
+  def test_three_arguments
+    assert_raises(ArgumentError){Month.begin_date(1, 2, 3)}
+  end
+  
+end

data/test/tc_Month_self.beginning.rb

@@ -0,0 +1,46 @@
+# test/tc_Month_self.beginning.rb
+
+class TC_Month_self_beginning < Minitest::Test
+  
+  def test_no_arguments
+    this_year, this_month = Date.today.year, Date.today.month
+    assert_equal Date.new(this_year, this_month, 1), Month.beginning
+  end
+  
+  def test_one_argument
+    this_year = Date.today.year
+    assert_equal Date.new(this_year, 1, 1), Month.beginning(1)
+    assert_equal Date.new(this_year, 2, 1), Month.beginning(2)
+    assert_equal Date.new(this_year, 3, 1), Month.beginning(3)
+    assert_equal Date.new(this_year, 4, 1), Month.beginning(4)
+    assert_equal Date.new(this_year, 5, 1), Month.beginning(5)
+    assert_equal Date.new(this_year, 6, 1), Month.beginning(6)
+    assert_equal Date.new(this_year, 7, 1), Month.beginning(7)
+    assert_equal Date.new(this_year, 8, 1), Month.beginning(8)
+    assert_equal Date.new(this_year, 9, 1), Month.beginning(9)
+    assert_equal Date.new(this_year, 10, 1), Month.beginning(10)
+    assert_equal Date.new(this_year, 11, 1), Month.beginning(11)
+    assert_equal Date.new(this_year, 12, 1), Month.beginning(12)
+  end
+  
+  def test_two_arguments
+    assert_equal Date.new(2006, 1, 1), Month.beginning(2006, 1)
+    assert_equal Date.new(2006, 2, 1), Month.beginning(2006, 2)
+    assert_equal Date.new(2008, 2, 1), Month.beginning(2008, 2)
+    assert_equal Date.new(2006, 3, 1), Month.beginning(2006, 3)
+    assert_equal Date.new(2006, 4, 1), Month.beginning(2006, 4)
+    assert_equal Date.new(2006, 5, 1), Month.beginning(2006, 5)
+    assert_equal Date.new(2006, 6, 1), Month.beginning(2006, 6)
+    assert_equal Date.new(2006, 7, 1), Month.beginning(2006, 7)
+    assert_equal Date.new(2006, 8, 1), Month.beginning(2006, 8)
+    assert_equal Date.new(2006, 9, 1), Month.beginning(2006, 9)
+    assert_equal Date.new(2006, 10, 1), Month.beginning(2006, 10)
+    assert_equal Date.new(2006, 11, 1), Month.beginning(2006, 11)
+    assert_equal Date.new(2006, 12, 1), Month.beginning(2006, 12)
+  end
+  
+  def test_three_arguments
+    assert_raises(ArgumentError){Month.beginning(1, 2, 3)}
+  end
+  
+end

data/test/tc_Month_self.beginning_of_month.rb

@@ -0,0 +1,46 @@
+# test/tc_Month_self.beginning_of_month.rb
+
+class TC_Month_self_beginning_of_month < Minitest::Test
+  
+  def test_no_arguments
+    this_year, this_month = Date.today.year, Date.today.month
+    assert_equal Date.new(this_year, this_month, 1), Month.beginning_of_month
+  end
+  
+  def test_one_argument
+    this_year = Date.today.year
+    assert_equal Date.new(this_year, 1, 1), Month.beginning_of_month(1)
+    assert_equal Date.new(this_year, 2, 1), Month.beginning_of_month(2)
+    assert_equal Date.new(this_year, 3, 1), Month.beginning_of_month(3)
+    assert_equal Date.new(this_year, 4, 1), Month.beginning_of_month(4)
+    assert_equal Date.new(this_year, 5, 1), Month.beginning_of_month(5)
+    assert_equal Date.new(this_year, 6, 1), Month.beginning_of_month(6)
+    assert_equal Date.new(this_year, 7, 1), Month.beginning_of_month(7)
+    assert_equal Date.new(this_year, 8, 1), Month.beginning_of_month(8)
+    assert_equal Date.new(this_year, 9, 1), Month.beginning_of_month(9)
+    assert_equal Date.new(this_year, 10, 1), Month.beginning_of_month(10)
+    assert_equal Date.new(this_year, 11, 1), Month.beginning_of_month(11)
+    assert_equal Date.new(this_year, 12, 1), Month.beginning_of_month(12)
+  end
+  
+  def test_two_arguments
+    assert_equal Date.new(2006, 1, 1), Month.beginning_of_month(2006, 1)
+    assert_equal Date.new(2006, 2, 1), Month.beginning_of_month(2006, 2)
+    assert_equal Date.new(2008, 2, 1), Month.beginning_of_month(2008, 2)
+    assert_equal Date.new(2006, 3, 1), Month.beginning_of_month(2006, 3)
+    assert_equal Date.new(2006, 4, 1), Month.beginning_of_month(2006, 4)
+    assert_equal Date.new(2006, 5, 1), Month.beginning_of_month(2006, 5)
+    assert_equal Date.new(2006, 6, 1), Month.beginning_of_month(2006, 6)
+    assert_equal Date.new(2006, 7, 1), Month.beginning_of_month(2006, 7)
+    assert_equal Date.new(2006, 8, 1), Month.beginning_of_month(2006, 8)
+    assert_equal Date.new(2006, 9, 1), Month.beginning_of_month(2006, 9)
+    assert_equal Date.new(2006, 10, 1), Month.beginning_of_month(2006, 10)
+    assert_equal Date.new(2006, 11, 1), Month.beginning_of_month(2006, 11)
+    assert_equal Date.new(2006, 12, 1), Month.beginning_of_month(2006, 12)
+  end
+  
+  def test_three_arguments
+    assert_raises(ArgumentError){Month.beginning_of_month(1, 2, 3)}
+  end
+  
+end

data/test/tc_Month_self.beginning_of_the_month.rb

@@ -0,0 +1,46 @@
+# test/tc_Month_self.beginning_of_the_month.rb
+
+class TC_Month_self_beginning_of_the_month < Minitest::Test
+  
+  def test_no_arguments
+    this_year, this_month = Date.today.year, Date.today.month
+    assert_equal Date.new(this_year, this_month, 1), Month.beginning_of_the_month
+  end
+  
+  def test_one_argument
+    this_year = Date.today.year
+    assert_equal Date.new(this_year, 1, 1), Month.beginning_of_the_month(1)
+    assert_equal Date.new(this_year, 2, 1), Month.beginning_of_the_month(2)
+    assert_equal Date.new(this_year, 3, 1), Month.beginning_of_the_month(3)
+    assert_equal Date.new(this_year, 4, 1), Month.beginning_of_the_month(4)
+    assert_equal Date.new(this_year, 5, 1), Month.beginning_of_the_month(5)
+    assert_equal Date.new(this_year, 6, 1), Month.beginning_of_the_month(6)
+    assert_equal Date.new(this_year, 7, 1), Month.beginning_of_the_month(7)
+    assert_equal Date.new(this_year, 8, 1), Month.beginning_of_the_month(8)
+    assert_equal Date.new(this_year, 9, 1), Month.beginning_of_the_month(9)
+    assert_equal Date.new(this_year, 10, 1), Month.beginning_of_the_month(10)
+    assert_equal Date.new(this_year, 11, 1), Month.beginning_of_the_month(11)
+    assert_equal Date.new(this_year, 12, 1), Month.beginning_of_the_month(12)
+  end
+  
+  def test_two_arguments
+    assert_equal Date.new(2006, 1, 1), Month.beginning_of_the_month(2006, 1)
+    assert_equal Date.new(2006, 2, 1), Month.beginning_of_the_month(2006, 2)
+    assert_equal Date.new(2008, 2, 1), Month.beginning_of_the_month(2008, 2)
+    assert_equal Date.new(2006, 3, 1), Month.beginning_of_the_month(2006, 3)
+    assert_equal Date.new(2006, 4, 1), Month.beginning_of_the_month(2006, 4)
+    assert_equal Date.new(2006, 5, 1), Month.beginning_of_the_month(2006, 5)
+    assert_equal Date.new(2006, 6, 1), Month.beginning_of_the_month(2006, 6)
+    assert_equal Date.new(2006, 7, 1), Month.beginning_of_the_month(2006, 7)
+    assert_equal Date.new(2006, 8, 1), Month.beginning_of_the_month(2006, 8)
+    assert_equal Date.new(2006, 9, 1), Month.beginning_of_the_month(2006, 9)
+    assert_equal Date.new(2006, 10, 1), Month.beginning_of_the_month(2006, 10)
+    assert_equal Date.new(2006, 11, 1), Month.beginning_of_the_month(2006, 11)
+    assert_equal Date.new(2006, 12, 1), Month.beginning_of_the_month(2006, 12)
+  end
+  
+  def test_three_arguments
+    assert_raises(ArgumentError){Month.beginning_of_the_month(1, 2, 3)}
+  end
+  
+end

data/test/tc_Month_self.cdate.rb

@@ -0,0 +1,33 @@
+# test/tc_Month_self.cdate.rb
+
+if __FILE__ == $0
+  require 'minitest/autorun'
+  $LOAD_PATH.unshift(File.expand_path(File.join(File.dirname(__FILE__), '..', 'lib')))
+  require 'Month/Constants'
+  require 'Month/self.cdate'
+end
+
+class TC_Month_self_cdate < Minitest::Test
+  
+  def test_self_cdate
+    assert_equal 3, Month.cdate('First', 'Monday', 2011, 1)
+    assert_equal 14, Month.cdate('Second', 'Monday', 2011, 2)
+    assert_equal 21, Month.cdate('Third', 'Monday', 2011, 3)
+    assert_equal 25, Month.cdate('Fourth', 'Monday', 2011, 4)
+    assert_equal 30, Month.cdate('Fifth', 'Monday', 2011, 5)
+    assert_equal 27, Month.cdate('Last', 'Monday', 2011, 6)
+    assert_equal 18, Month.cdate('Second Last', 'Monday', 2011, 7)
+    assert_equal 15, Month.cdate('Third Last', 'Monday', 2011, 8)
+    assert_equal 5, Month.cdate('Fourth Last', 'Monday', 2011, 9)
+    assert_equal 2, Month.cdate('First', 'Sunday', 2011, 1)
+    assert_equal 13, Month.cdate('Second', 'Sunday', 2011, 2)
+    assert_equal 20, Month.cdate('Third', 'Sunday', 2011, 3)
+    assert_equal 24, Month.cdate('Fourth', 'Sunday', 2011, 4)
+    assert_equal 29, Month.cdate('Fifth', 'Sunday', 2011, 5)
+    assert_equal 26, Month.cdate('Last', 'Sunday', 2011, 6)
+    assert_equal 24, Month.cdate('Second Last', 'Sunday', 2011, 7)
+    assert_equal 14, Month.cdate('Third Last', 'Sunday', 2011, 8)
+    assert_equal 4, Month.cdate('Fourth Last', 'Sunday', 2011, 9)
+  end
+  
+end

data/test/tc_Month_self.cdates.rb

@@ -0,0 +1,325 @@
+# test/tc_Month_self.cdates.rb
+
+if __FILE__ == $0
+  require 'minitest/autorun'
+  $LOAD_PATH.unshift(File.expand_path(File.join(File.dirname(__FILE__), '..', 'lib')))
+  require 'Month/Constants'
+  require 'Month/self.cdates'
+end
+
+class TC_Month_self_cdates < Minitest::Test
+  
+  def test_no_day
+    assert_equal (1..31).collect{|date| date}, Month.cdates(2006, 10)
+  end
+  
+  def test_date_objects_true_no_day
+    assert_equal (1..31).collect{|date| Date.new(2006, 10, date)}, Month.cdates(2006, 10, :date_objects => true)
+  end
+  
+  def test_day_capitalized_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'Sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'Monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'Tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'Wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'Thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'Friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'Saturday')
+  end
+  
+  def test_day_downcase_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'saturday')
+  end
+  
+  def test_day_capitalized_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'Sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'Mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'Tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'Wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'Thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'Fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'Sat')
+  end
+  
+  def test_day_downcase_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'sat')
+  end
+  
+  def test_day_as_num_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 7)
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 1)
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 2)
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 3)
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 4)
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 5)
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 6)
+  end
+  
+  def test_day_as_num_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => '7')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => '1')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => '2')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => '3')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => '4')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => '5')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => '6')
+  end
+  
+  def test_day_capitalized_long_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'Sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'Monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'Tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'Wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'Thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'Friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'Saturday')
+  end
+  
+  def test_day_downcase_long_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'saturday')
+  end
+  
+  def test_day_capitalized_short_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'Sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'Mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'Tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'Wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'Thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'Fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'Sat')
+  end
+  
+  def test_day_downcase_short_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 'sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 'mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 'tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 'wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 'thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 'fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 'sat')
+  end
+  
+  def test_day_as_num_as_num_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => 7)
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => 1)
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => 2)
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => 3)
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => 4)
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => 5)
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => 6)
+  end
+  
+  def test_day_as_num_as_string_with_num_month_as_num
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 10, :day => '7')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 10, :day => '1')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 10, :day => '2')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 10, :day => '3')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 10, :day => '4')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 10, :day => '5')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 10, :day => '6')
+  end
+  
+  def test_day_capitalized_long_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => 'Sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => 'Monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => 'Tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => 'Wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => 'Thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => 'Friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => 'Saturday')
+  end
+  
+  def test_day_downcase_long_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => 'sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => 'monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => 'tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => 'wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => 'thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => 'friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => 'saturday')
+  end
+  
+  def test_day_capitalized_short_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => 'Sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => 'Mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => 'Tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => 'Wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => 'Thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => 'Fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => 'Sat')
+  end
+  
+  def test_day_downcase_short_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => 'sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => 'mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => 'tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => 'wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => 'thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => 'fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => 'sat')
+  end
+  
+  def test_day_as_num_as_num_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => 7)
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => 1)
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => 2)
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => 3)
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => 4)
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => 5)
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => 6)
+  end
+  
+  def test_day_as_num_as_string_with_num_month_as_string
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, '10', :day => '7')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, '10', :day => '1')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, '10', :day => '2')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, '10', :day => '3')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, '10', :day => '4')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, '10', :day => '5')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, '10', :day => '6')
+  end
+  
+  def test_day_capitalized_long_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => 'Sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => 'Monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => 'Tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => 'Wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => 'Thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => 'Friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => 'Saturday')
+  end
+  
+  def test_day_downcase_long_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => 'sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => 'monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => 'tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => 'wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => 'thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => 'friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => 'saturday')
+  end
+  
+  def test_day_capitalized_short_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => 'Sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => 'Mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => 'Tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => 'Wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => 'Thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => 'Fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => 'Sat')
+  end
+  
+  def test_day_downcase_short_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => 'sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => 'mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => 'tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => 'wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => 'thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => 'fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => 'sat')
+  end
+  
+  def test_day_as_num_as_num_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => 7)
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => 1)
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => 2)
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => 3)
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => 4)
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => 5)
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => 6)
+  end
+  
+  def test_day_as_num_as_string_with_month_long
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'October', :day => '7')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'October', :day => '1')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'October', :day => '2')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'October', :day => '3')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'October', :day => '4')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'October', :day => '5')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'October', :day => '6')
+  end
+  
+  def test_day_capitalized_long_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => 'Sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => 'Monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => 'Tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => 'Wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => 'Thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => 'Friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => 'Saturday')
+  end
+  
+  def test_day_downcase_long_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => 'sunday')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => 'monday')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => 'tuesday')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => 'wednesday')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => 'thursday')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => 'friday')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => 'saturday')
+  end
+  
+  def test_day_capitalized_short_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => 'Sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => 'Mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => 'Tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => 'Wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => 'Thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => 'Fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => 'Sat')
+  end
+  
+  def test_day_downcase_short_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => 'sun')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => 'mon')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => 'tue')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => 'wed')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => 'thu')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => 'fri')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => 'sat')
+  end
+  
+  def test_day_as_num_as_num_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => 7)
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => 1)
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => 2)
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => 3)
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => 4)
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => 5)
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => 6)
+  end
+  
+  def test_day_as_num_as_string_with_month_short
+    assert_equal [1, 8, 15, 22, 29], Month.cdates(2006, 'Oct', :day => '7')
+    assert_equal [2, 9, 16, 23, 30], Month.cdates(2006, 'Oct', :day => '1')
+    assert_equal [3, 10, 17, 24, 31], Month.cdates(2006, 'Oct', :day => '2')
+    assert_equal [4, 11, 18, 25], Month.cdates(2006, 'Oct', :day => '3')
+    assert_equal [5, 12, 19, 26], Month.cdates(2006, 'Oct', :day => '4')
+    assert_equal [6, 13, 20, 27], Month.cdates(2006, 'Oct', :day => '5')
+    assert_equal [7, 14, 21, 28], Month.cdates(2006, 'Oct', :day => '6')
+  end
+  
+  def test_crap
+    assert_nil Month.cdates('random')
+    assert_nil Month.cdates(32)
+  end
+  
+end