semanticgap_date_time_form 0.1

data/rails/uninstall.rb

@@ -0,0 +1 @@
+# Uninstall hook code here

data/semanticgap_date_time_form.gemspec

@@ -0,0 +1,36 @@
+Gem::Specification.new do |s|
+  s.name = "semanticgap_date_time_form"
+  s.version = "0.1"
+
+  s.authors = ["SemanticGap"]
+  s.date = "2010-05-08"
+  s.description = "An improved date time selector for Rails."
+  s.email = "info@semanticgap.com"
+  s.add_dependency "nayutaya-active-form"
+  s.files = [ "./lib/semanticgap_date_time_form/active_record_mixin.rb",
+              "./lib/semanticgap_date_time_form/form.rb",
+              "./lib/semanticgap_date_time_form/form_builder_mixin.rb",
+              "./lib/semanticgap_date_time_form/spec.rb",
+              "./lib/semanticgap_date_time_form.rb",
+              "./MIT-LICENSE",
+              "./public/stylesheets/semanticgap_date_time_form.css",
+              "./rails/init.rb",
+              "./rails/install.rb",
+              "./rails/uninstall.rb",
+              "./Rakefile",
+              "./README",
+              "./semanticgap_date_time_form.gemspec",
+              "./semanticgap_date_time_form.gemspec~",
+              "./spec/application.rb",
+              "./spec/integration/post_spec.rb",
+              "./spec/spec_helper.rb",
+              "./spec/unit/active_record_mixin_spec.rb",
+              "./spec/unit/form_builder_mixin_spec.rb",
+              "./spec/unit/form_spec.rb",
+              "./tasks/semanticgap_datetime_fields_tasks.rake" ]
+  s.homepage = "http://git.oss.semanticgap.com/ruby/semanticgap_date_time_form.git
+"
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = "Improved date time selector"
+end

data/semanticgap_date_time_form.gemspec~

@@ -0,0 +1,39 @@
+Gem::Specification.new do |s|
+  s.name = "refinerycms-events"
+  s.version = "0.0.1"
+
+  s.authors = ["SemanticGap"]
+  s.date = "2010-05-07"
+  s.default_executable = "refinerycms-events-install"
+  s.description = "A really straightforward open source Ruby on Rails events plugin designed for integration with RefineryCMS."
+  s.email = "info@semanticgap.com"
+  s.add_dependency "nayutaya-active-form"
+  s.add_dependency "elevation_event_calendar"
+  s.executables = ["refinerycms-events-install"]
+  s.files = [ "db/migrate/20100430163757_create_events.rb",
+              "db/migrate/20100501234548_add_color_to_events.rb",
+              "db/migrate/20100502004451_add_all_day_to_events.rb",
+              "app/models/calendar.rb",
+              "app/models/event.rb",
+              "app/controllers/events_controller.rb",
+              "app/controllers/admin/events_controller.rb",
+              "app/helpers/calendars_helper.rb",
+              "app/views/events/index.html.erb",
+              "app/views/events/show.html.erb",
+              "app/views/events/_event_list.html.erb",
+              "app/views/admin/events/_event.html.erb",
+              "app/views/admin/events/_form.html.erb",
+              "app/views/admin/events/_sortable_list.html.erb",
+              "app/views/admin/events/edit.html.erb",
+              "app/views/admin/events/index.html.erb",
+              "app/views/admin/events/new.html.erb",
+              "config/routes.rb",
+              "public/stylesheets/event_calendar.css",
+              "public/javascripts/event_calendar.js",
+              "rails/init.rb",
+              "bin/refinerycms-events-install" ]
+  s.homepage = "http://github.com/semanticgap/refinerycms-events"
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = "Ruby on Rails events plugin for RefineryCMS."
+end

data/spec/application.rb

@@ -0,0 +1,2 @@
+class ApplicationController < ActionController::Base
+end

data/spec/integration/post_spec.rb

@@ -0,0 +1,36 @@
+require File.join(File.dirname(__FILE__), '../spec_helper')
+require 'semanticgap_date_time_form/spec'
+
+class Post < ActiveRecord::Base
+  class Migration < ActiveRecord::Migration
+    def self.up
+      create_table :posts do |t|
+        t.datetime :published_at
+        t.datetime :created_at
+      end
+    end
+  end
+
+  datetime_fields_for :created_at
+  datetime_fields_for :published_at, :allow_blank => true
+end
+
+describe Post do
+  include SemanticGap::DateTimeForm::Spec
+
+  before(:all) do
+    ActiveRecord::Base.establish_connection(:adapter => 'sqlite3', :database => 'test.sqlite3')
+    Post::Migration.up
+  end
+
+  after(:all) do
+    FileUtils.rm('test.sqlite3')
+  end
+
+  before(:each) do
+    subject.created_at = DateTime.now
+  end
+
+  it_has_datetime_fields_for :published_at, :allow_blank => true
+  it_has_datetime_fields_for :created_at
+end

data/spec/spec_helper.rb

@@ -0,0 +1,18 @@
+RAILS_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+module Rails
+  module VERSION
+    STRING = '0.0.1'
+  end
+end
+
+$: << File.expand_path(File.join(File.dirname(__FILE__), '..', 'vendor', 'active_form', 'lib'))
+
+require 'rubygems'
+require 'active_record'
+require 'active_form'
+require 'action_controller'
+require 'action_view'
+require 'semanticgap_date_time_form'
+
+require 'spec'
+require 'spec/rails'

data/spec/unit/active_record_mixin_spec.rb

@@ -0,0 +1,41 @@
+require File.join(File.dirname(__FILE__), '../spec_helper')
+
+describe SemanticGap::DateTimeForm::ActiveRecordMixin::ClassMethods do
+  describe '#datetime_fields_for' do
+    before(:each) do
+      @klass = Class.new do
+        def self.validate(meth); end
+        def self.before_save(meth); end
+
+        include SemanticGap::DateTimeForm::ActiveRecordMixin
+        datetime_fields_for :published_at
+      end
+    end
+
+    subject { @klass.new }
+
+    context 'for a field named "published_at"' do
+      it "defines 'published_at_fields'" do
+        subject.should respond_to(:published_at_fields)
+      end
+
+      it "defines 'publihsed_at_fields='" do
+        subject.should respond_to(:published_at_fields=)
+      end
+    end
+  end
+end
+
+describe SemanticGap::DateTimeForm::ActiveRecordMixin do
+  it "is included into ActiveRecord::Base" do
+    ActiveRecord::Base.should include(SemanticGap::DateTimeForm::ActiveRecordMixin)
+  end
+
+  describe '.included' do
+    it "adds #datetime_fields_for to the class" do
+      klass = Class.new
+      klass.send(:include, SemanticGap::DateTimeForm::ActiveRecordMixin)
+      klass.should respond_to(:datetime_fields_for)
+    end
+  end
+end

data/spec/unit/form_builder_mixin_spec.rb

@@ -0,0 +1,98 @@
+require File.join(File.dirname(__FILE__), '../spec_helper')
+
+describe SemanticGap::DateTimeForm::FormBuilderMixin do
+  include ActionController::Assertions::SelectorAssertions
+
+  def build_view
+    v = ActionView::Base.new
+    v.send(:extend, ActionView::Helpers::FormHelper)
+    v.send(:extend, ActionView::Helpers::DateHelper)
+    v.send(:extend, ActionView::Helpers::FormOptionsHelper)
+    v.send(:extend, ActionView::Helpers::TagHelper)
+    v
+  end
+
+  before(:each) do
+    @fields = SemanticGap::DateTimeForm::Form.new(:time_zone => ActiveSupport::TimeZone.new('Eastern Time (US & Canada)'))
+    @object = mock('object', :published_at_fields => @fields)
+    @template = build_view
+    @options = { }
+  end
+
+  subject { ActionView::Helpers::FormBuilder.new('object', @object, @template, @options, nil) }
+
+  it "is included into ActionView::Helpers::FormBuilder" do
+    ActionView::Helpers::FormBuilder.should include(SemanticGap::DateTimeForm::FormBuilderMixin)
+  end
+
+  describe '#datetime_form' do
+    TagArgs = {
+      :year => [ 'input[type=?][size=?][name=?]', 'text', '4', 'object[published_at_fields][year]' ],
+      :month => [ 'select[name=?]', 'object[published_at_fields][month]' ],
+      :day => [ 'input[type=?][size=?][name=?]', 'text', '2', 'object[published_at_fields][day]' ],
+      :hour => [ 'input[type=?][size=?][name=?]', 'text', '2', 'object[published_at_fields][hour]' ],
+      :minute => [ 'input[type=?][size=?][name=?]', 'text', '2', 'object[published_at_fields][minute]' ],
+      :ampm => [ 'select[name=?]', 'object[published_at_fields][ampm]' ],
+      :time_zone => [ 'span[class=?]', 'timezone', 'Eastern Time (US & Canada)' ]
+    }
+
+    context 'basic datetime form' do
+      before(:each) do
+        @result = subject.datetime_form(:published_at)
+      end
+
+      it "returns a div with class 'sg-datetime-form'" do
+        @result.should have_tag('div', :class => 'sg-datetime-form') do
+          with_tag(*TagArgs[:year])
+          with_tag(*TagArgs[:month])
+          with_tag(*TagArgs[:day])
+          with_tag(*TagArgs[:hour])
+          with_tag(*TagArgs[:minute])
+          with_tag(*TagArgs[:ampm])
+          with_tag(*TagArgs[:time_zone])
+        end
+      end
+
+      it "has a text field for the year" do
+        @result.should have_tag(*TagArgs[:year])
+      end
+
+      it "has a select field for the month" do
+        @result.should have_tag(*TagArgs[:month])
+      end
+
+      it "has a text field for the day" do
+        @result.should have_tag(*TagArgs[:day])
+      end
+
+      it "has a text field for the hour" do
+        @result.should have_tag(*TagArgs[:hour])
+      end
+
+      it "has a text field for the minute" do
+        @result.should have_tag(*TagArgs[:minute])
+      end
+
+      it "has a select field for ampm" do
+        @result.should have_tag(*TagArgs[:ampm])
+      end
+
+      it "has shows the time zone" do
+        @result.should have_tag(*TagArgs[:time_zone])
+      end
+    end
+
+    context 'when the fields allow blank' do
+      before(:each) do
+        @fields.stub!(:allow_blank?).and_return(true)
+        @result = subject.datetime_form(:published_at)
+      end
+
+      it "includes a blank option in the month select field" do
+        @result.should have_tag(*TagArgs[:month]) do
+          with_tag('option[value=?]', '')
+        end
+      end
+    end
+  end
+end

data/spec/unit/form_spec.rb

@@ -0,0 +1,583 @@
+require File.join(File.dirname(__FILE__), '../spec_helper')
+
+describe SemanticGap::DateTimeForm::Form do
+  def self.it_has_the_attributes(*attrs)
+    attrs.each do |attr|
+      describe "\##{attr}" do
+        it "is an accessor for @#{attr}" do
+          subject.send(:instance_variable_set, "@#{attr}", :hello)
+          subject.send(attr).should == :hello
+        end
+      end
+
+      describe "\##{attr}=" do
+        it "changes @#{attr}" do
+          lambda { subject.send("#{attr}=", :hello) }.
+            should change { subject.send(:instance_variable_get, "@#{attr}") }.
+            to(:hello)
+        end
+      end
+    end
+  end
+
+  Attributes = [ :year, :month, :day, :hour, :minute, :ampm ]
+
+  it "is an active form" do
+    subject.should be_kind_of(ActiveForm)
+  end
+
+  it_has_the_attributes :year, :month, :day
+  it_has_the_attributes :hour, :minute, :ampm
+  it_has_the_attributes :time_zone
+
+  describe '#initialize' do
+    context 'no arguments' do
+      subject { described_class.new }
+
+      context 'when Time.zone is set' do
+        before(:each) do
+          @old_zone = Time.zone
+          Time.zone = ActiveSupport::TimeZone.new('Eastern Time (US & Canada)')
+          Time.zone.should_not be_nil
+        end
+
+        after(:each) do
+          Time.zone = @old_zone
+        end
+
+        it "sets the time zone to Time.zone" do
+          subject.time_zone.should == Time.zone
+        end
+      end
+
+      context 'when Time.zone is unset' do
+        before(:each) do
+          @old_zone = Time.zone
+          Time.zone = nil
+        end
+
+        after(:each) do
+          Time.zone = @old_zone
+        end
+
+        it "sets the time zone to UTC" do
+          subject.time_zone.should == ActiveSupport::TimeZone.new('UTC')
+        end
+      end
+
+      it "does NOT allow blanks" do
+        subject.should_not be_allow_blank
+      end
+
+      it "is not valid" do
+        subject.should_not be_valid
+      end
+
+      it "leaves the attributes blank" do
+        Attributes.each do |attr|
+          subject.send(attr).should be_nil
+        end
+      end
+    end
+
+    context 'options hash' do
+      context 'with :allow_blank' do
+        subject { described_class.new(:allow_blank => true) }
+
+        it "allows blanks" do
+          subject.should be_allow_blank
+        end
+
+        it "is valid" do
+          subject.should be_valid
+        end
+      end
+
+      context 'with :time_zone' do
+        before(:each) do
+          @zone = ActiveSupport::TimeZone.new('Eastern (US & Canada)')
+        end
+
+        subject do
+          described_class.new(:time_zone => @zone)
+        end
+
+        it "sets the time zone to the supplied value" do
+          subject.time_zone.should == @zone
+        end
+      end
+    end
+
+    context 'with a DateTime' do
+      { DateTime.new(2010, 5, 6, 20, 1) => %W(2010 5 6 08 01 PM),
+        DateTime.new(2010, 5, 6, 8, 59) => %W(2010 5 6 08 59 AM),
+      }.each do |date, (year, month, day, hour, minute, ampm)|
+        context "with #{date}" do
+          subject { described_class.new(date) }
+
+          it "sets the attributes to the DateTime's components" do
+            subject.year.should == year.to_i
+            subject.month.should == month.to_i
+            subject.day.should == day.to_i
+            subject.hour.should == hour
+            subject.minute.should == minute
+            subject.ampm.should == ampm
+          end
+        end
+      end
+    end
+
+    context 'with a DateTime and options Hash' do
+      before(:each) do
+        @date = DateTime.new(2010, 5, 6, 20, 1)
+        @zone = ActiveSupport::TimeZone.new('Eastern Time (US & Canada)')
+      end
+
+      subject { described_class.new(@date, :allow_blank => true, :time_zone => @zone) }
+
+      it "sets the date to the DateTime" do
+        subject.to_datetime.should == @date
+      end
+
+      it "sets the options" do
+        subject.should be_allow_blank
+        subject.time_zone.should == @zone
+      end
+    end
+  end
+
+  describe 'validations' do
+    describe 'when blanks are allowed' do
+      subject { described_class.new(:allow_blank => true) }
+
+      it "is valid when all attributes are blank" do
+        subject.should be_valid
+      end
+
+      it "is valid when all attributes are blank except ampm" do
+        subject.ampm = 'AM'
+        subject.should be_valid
+      end
+
+      [ :year, :month, :day, :hour, :minute ].each do |attr|
+        it "is invalid if #{attr} has a value" do
+          subject.send("#{attr}=", 1)
+          subject.should_not be_valid
+        end
+      end
+    end
+
+    describe 'on year' do
+      { 1 => true,
+        2010 => true,
+        0 => true,
+        14 => true,
+        -1 => true,
+        '-10' => true,
+        '-1' => true,
+        'A' => false,
+        'abcd' => false,
+        '' => false,
+        ' ' => false
+      }.each do |value, valid|
+        it "is #{valid ? 'valid' : 'invalid'} for #{value}" do
+          subject.year = value
+
+          if valid
+            subject.should_not have(:any).errors_on(:year)
+          else
+            subject.should have_at_least(1).error_on(:year)
+          end
+        end
+      end
+    end
+
+    describe 'on month' do
+      it "must be between 1 and 12" do
+        (1..12).each do |i|
+          subject.month = i
+          subject.should_not have(:any).errors_on(:month)
+        end
+      end
+
+      { 1 => true,
+        12 => true,
+        '10' => true,
+        0 => false,
+        14 => false,
+        -1 => false,
+        '-10' => false,
+        '-1' => false,
+        'A' => false,
+        '' => false,
+        ' ' => false
+      }.each do |value, valid|
+        it "is #{valid ? 'valid' : 'invalid'} for #{value}" do
+          subject.month = value
+
+          if valid
+            subject.should_not have(:any).errors_on(:month)
+          else
+            subject.should have_at_least(1).error_on(:month)
+          end
+        end
+      end
+    end
+
+    describe 'on day' do
+      context 'with a blank month' do
+        before(:each) do
+          subject.month = nil
+        end
+
+        it "must be between 1 and 31" do
+          (1..31).each do |i|
+            subject.day = i
+            subject.should_not have(:any).errors_on(:day)
+          end
+        end
+
+        { '1' => true,
+          '31' => true,
+          '10' => true,
+          0 => false,
+          32 => false,
+          -1 => false,
+          '-10' => false,
+          '-1' => false,
+          'A' => false,
+          '' => false,
+          ' ' => false
+        }.each do |value, valid|
+          it "is #{valid ? 'valid' : 'invalid'} for #{value}" do
+            subject.day = value
+
+            if valid
+              subject.should_not have(:any).errors_on(:day)
+            else
+              subject.should have_at_least(1).error_on(:day)
+            end
+          end
+        end
+      end
+
+      { 2010 => {
+          1 => 31,
+          2 => 28,
+          3 => 31,
+          4 => 30,
+          5 => 31,
+          6 => 30,
+          7 => 31,
+          8 => 31,
+          9 => 30,
+          10 => 31,
+          11 => 30,
+          12 => 31
+        },
+        2008 => {
+          1 => 31,
+          2 => 29,
+          3 => 31,
+          4 => 30,
+          5 => 31,
+          6 => 30,
+          7 => 31,
+          8 => 31,
+          9 => 30,
+          10 => 31,
+          11 => 30,
+          12 => 31
+        }
+      }.each do |year, months|
+        context "in the year #{year}" do
+          subject { described_class.new(:allow_blank => true) }
+
+          before(:each) do
+            subject.year = year
+          end
+
+          months.each do |month, num_days|
+            context "with month set to #{month}" do
+              before(:each) do
+                subject.month = month
+              end
+
+              it "is valid when day is set to #{num_days - 1}" do
+                subject.day = num_days - 1
+                subject.should be_valid
+              end
+
+              it "is valid when day is set to #{num_days}" do
+                subject.day = num_days
+                subject.should be_valid
+              end
+
+              it "is invalid when day is set to #{num_days + 1}" do
+                subject.day = num_days + 1
+                subject.should_not be_valid
+                subject.should have_at_least(1).error_on(:day)
+              end
+            end
+          end
+        end
+      end
+    end
+
+    describe 'hour' do
+      it "must be between 0 and 23" do
+        (0..23).each do |i|
+          subject.hour = i
+          subject.should_not have(:any).errors_on(:hour)
+        end
+      end
+
+      { '0' => true,
+        '12' => true,
+        23 => true,
+        '10' => true,
+        24 => false,
+        25 => false,
+        -1 => false,
+        '-10' => false,
+        '-1' => false,
+        'A' => false,
+        '' => false,
+        ' ' => false
+      }.each do |value, valid|
+        it "is #{valid ? 'valid' : 'invalid'} for #{value.inspect}" do
+          subject.hour = value
+
+          if valid
+            subject.should_not have(:any).errors_on(:hour)
+          else
+            subject.should have_at_least(1).error_on(:hour)
+          end
+        end
+      end
+    end
+
+    describe 'minute' do
+      it "must be between 0 and 59" do
+        (0..59).each do |i|
+          subject.minute = i
+          subject.should_not have(:any).errors_on(:minute)
+        end
+      end
+
+      { '0' => true,
+        '59' => true,
+        59 => true,
+        '10' => true,
+        60 => false,
+        61 => false,
+        -1 => false,
+        '-10' => false,
+        '-1' => false,
+        'A' => false,
+        '' => false,
+        ' ' => false
+      }.each do |value, valid|
+        it "is #{valid ? 'valid' : 'invalid'} for #{value.inspect}" do
+          subject.minute = value
+
+          if valid
+            subject.should_not have(:any).errors_on(:minute)
+          else
+            subject.should have_at_least(1).error_on(:minute)
+          end
+        end
+      end
+    end
+
+    describe 'ampm' do
+      %W(am AM aM Am pm PM pM Pm).each do |value|
+        it "is valid with #{value.inspect}" do
+          subject.ampm = value
+          subject.should_not have(:any).errors_on(:ampm)
+        end
+      end
+
+      values = %W(a p A P AB JM Hello hello pay)
+      values << "" << " " << "   "
+      values.each do |value|
+        it "is invalid with #{value.inspect}" do
+          subject.ampm = value
+          subject.should have_at_least(1).errors_on(:ampm)
+        end
+      end
+    end
+  end
+
+  describe '#date=' do
+    it "adjusts the date to local time" do
+      @utc = DateTime.parse("2010/05/06 16:00 PM UTC")
+      @zone = ActiveSupport::TimeZone.new('Eastern Time (US & Canada)')
+      subject.time_zone = @zone
+
+      subject.date = @utc
+      subject.hour.should == '12'
+      subject.should be_pm
+    end
+
+    { DateTime.new(2010, 5, 6, 20, 1) => %W(2010 5 6 08 01 PM),
+      DateTime.new(2010, 5, 6, 8, 59) => %W(2010 5 6 08 59 AM),
+      DateTime.new(2010, 5, 6, 12, 1) => %W(2010 5 6 12 01 PM),
+      DateTime.new(2010, 5, 6, 0, 59) => %W(2010 5 6 12 59 AM),
+      Date.new(2010, 5, 6) => %W(2010 5 6 12 00 AM),
+      Time.parse('2010/5/6 0:00 UTC') => %W(2010 5 6 12 00 AM)
+    }.each do |date, (year, month, day, hour, minute, ampm)|
+      context "with #{date}" do
+        before(:each) do
+          subject.date = date
+        end
+
+        it "sets year to #{year.to_i.inspect}" do
+          subject.year.should == year.to_i
+        end
+
+        it "sets month to #{month.to_i.inspect}" do
+          subject.month.should == month.to_i
+        end
+
+        it "sets day to #{day.to_i.inspect}" do
+          subject.day.should == day.to_i
+        end
+
+        it "sets hour to #{hour.inspect}" do
+          subject.hour.should == hour
+        end
+
+        it "sets minute to #{minute.inspect}" do
+          subject.minute.should == minute
+        end
+
+        it "sets ampm to #{ampm.inspect}" do
+          subject.ampm.should == ampm
+        end
+
+        it "converts to the supplied date" do
+          subject.to_datetime.should == date
+        end
+      end
+    end
+  end
+
+  describe '#time_zone_name' do
+    it "returns the time zone's name" do
+      subject.time_zone = mock('zone', :name => 'TZ')
+      subject.time_zone.name.should == 'TZ'
+    end
+  end
+
+  describe '#time_zone_name=' do
+    before(:each) do
+      @utc = ActiveSupport::TimeZone.new('UTC')
+      @eastern = ActiveSupport::TimeZone.new('Eastern Time (US & Canada)')
+      ActiveSupport::TimeZone.stub!(:new).and_return(@utc)
+    end
+
+    it "creates a new TimeZone from the value" do
+      ActiveSupport::TimeZone.should_receive(:new).
+        with('Eastern Time (US & Canada)').
+        and_return(@eastern)
+
+      subject.time_zone_name = 'Eastern Time (US & Canada)'
+    end
+
+    context 'valid time zone' do
+      it "changes the time zone" do
+        ActiveSupport::TimeZone.should_receive(:new).and_return(@eastern)
+
+        lambda { subject.time_zone_name = 'Eastern Time (US & Canada)' }.should change(subject, :time_zone)
+      end
+    end
+
+    context 'invalid time zone' do
+      it "does not change the time zone" do
+        lambda { subject.time_zone_name = 'WTF' }.should_not change(subject, :time_zone_name)
+      end
+    end
+  end
+
+  describe '#to_datetime' do
+    context 'when valid' do
+      before(:each) do
+        @time = DateTime.new(2010, 5, 5, 20, 27)
+      end
+
+      subject { described_class.new(@time) }
+
+      it "returns a DateTime created from the attributes, but adjusted to the time zone" do
+        subject.to_datetime.should == subject.time_zone.utc_to_local(@time)
+      end
+    end
+
+    context 'when invalid' do
+      before(:each) do
+        subject.hour = 25
+      end
+
+      it "returns nil" do
+        subject.to_datetime.should be_nil
+      end
+    end
+  end
+
+  describe '#pm?' do
+    %W(am Am AM aM a hello).each do |v|
+      context "with #{v.inspect}" do
+        before(:each) do
+          subject.ampm = v
+        end
+
+        it "is false for #{v.inspect}" do
+          subject.should_not be_pm
+        end
+      end
+    end
+
+    %W(pm Pm PM pM p).each do |v|
+      context "with #{v.inspect}" do
+        before(:each) do
+          subject.ampm = v
+        end
+
+        it "is true for #{v.inspect}" do
+          subject.should be_pm
+        end
+      end
+    end
+  end
+
+  describe '#blank?' do
+    it "is true if all the attributes are blank" do
+      subject.should be_blank
+    end
+
+    [ :year, :month, :day, :hour, :minute ].each do |attr|
+      it "is false if #{attr} has a value" do
+        subject.send("#{attr}=", 1)
+        subject.should_not be_blank
+      end
+    end
+  end
+
+  describe '#allow_blank?' do
+    context 'when :allow_blank was true during creation' do
+      subject { described_class.new(:allow_blank => true) }
+
+      it "is true" do
+        subject.should be_allow_blank
+      end
+    end
+
+    context 'when :allow_blank was false during creation' do
+      subject { described_class.new(:allow_blank => false) }
+
+      it "is true" do
+        subject.should_not be_allow_blank
+      end
+    end
+  end
+end