gettext 1.7.0-mswin32 → 1.8.0-mswin32

data/samples/rails/po/zh_TW/blog.po

@@ -0,0 +1,107 @@
+# GetText Sample Blog on RoR.
+#
+# Copyright (C) 2006 Masao Mutoh
+#
+# This file is distributed under the same license as the Ruby-GetText-Package.
+#
+# LIN CHUNG-YI <xmarsh at gmail.com>, 2006.
+#
+msgid ""
+msgstr ""
+"Project-Id-Version: blog 1.2.0\n"
+"POT-Creation-Date: 2006-08-22 18:35+0900\n"
+"PO-Revision-Date: 2006-08-15 09:38+0800\n"
+"Last-Translator: LIN CHUNG-YI <xmarsh at gmail.com>\n"
+"Language-Team: zh_TW <xmarsh at gmail.com>\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=1; plural=0;\n"
+"X-Poedit-Language: Chinese\n"
+"X-Poedit-Country: TAIWAN\n"
+
+#: app/controllers/blog_controller.rb:33
+msgid "Article was successfully created."
+msgstr "文章已成功建立"
+
+#: app/controllers/blog_controller.rb:47
+msgid "Article was successfully updated."
+msgstr "文章已成功更新"
+
+#: app/helpers/blog_helper.rb:43
+msgid "Ruby Links"
+msgstr "Ruby連結"
+
+#: app/helpers/blog_helper.rb:51
+msgid "Old articles"
+msgstr "舊文章"
+
+# app/models/article.rb:-
+msgid "article"
+msgstr "文章"
+
+# app/models/article.rb:-
+msgid "Article|Title"
+msgstr "標題"
+
+# app/models/article.rb:-
+msgid "Article|Description"
+msgstr "描述"
+
+# app/models/article.rb:-
+msgid "Article|Lastupdate"
+msgstr "最近更新"
+
+#: app/views/blog/edit.rhtml:12
+msgid "Editing article"
+msgstr "編輯文章"
+
+#: app/views/blog/edit.rhtml:16 app/views/blog/show.rhtml:16
+msgid "Edit"
+msgstr "編輯"
+
+#: app/views/blog/edit.rhtml:19
+msgid "Show"
+msgstr "觀看"
+
+#: app/views/blog/edit.rhtml:20
+msgid "Destroy"
+msgstr "刪除"
+
+#: app/views/blog/edit.rhtml:20
+msgid "Are you sure?"
+msgstr "你確定嗎?"
+
+#: app/views/blog/edit.rhtml:21 app/views/blog/new.rhtml:20
+#: app/views/blog/show.rhtml:17
+msgid "Back"
+msgstr "返回"
+
+#: app/views/blog/list.rhtml:13 app/views/blog/show.rhtml:13
+#: app/views/layouts/blog.rhtml:14
+msgid "GetText Sample Blog on RoR"
+msgstr "GetText 的 RoR 部落格範例"
+
+#: app/views/blog/list.rhtml:15 app/views/blog/new.rhtml:13
+msgid "New article"
+msgstr "新文章"
+
+#: app/views/blog/list.rhtml:18
+msgid "No articles were found."
+msgstr "找不到文章"
+
+#: app/views/blog/new.rhtml:17
+msgid "Create"
+msgstr "新增"
+
+#: app/views/blog/_form.rhtml:16
+msgid "Lastupdate"
+msgstr "最近更新"
+
+#: app/views/blog/_form.rhtml:18
+msgid "Title: Required."
+msgstr "標題需要填寫"
+
+#: app/views/blog/_form.rhtml:21
+msgid "Description: More than 10 characters."
+msgstr "描述需多於十個字"

data/samples/rails/vendor/plugins/gettext/po/zh_TW/gettext_plugin.po

@@ -0,0 +1,30 @@
+# GetText Sample Blog on RoR.
+#
+# Copyright (C) 2005,2006 Masao Mutoh
+#
+# This file is distributed under the same license as the Ruby-GetText-Package.
+#
+# LIN CHUNG-YI <xmarsh at gmail.com>, 2006.
+#
+msgid ""
+msgstr ""
+"Project-Id-Version: gettext_plugin 1.2.0\n"
+"POT-Creation-Date: 2006-05-31 02:06+0900\n"
+"PO-Revision-Date: 2006-08-18 14:43+0800\n"
+"Last-Translator: LIN CHUNG-YI <xmarsh at gmail.com>\n"
+"Language-Team: zh_TW <xmarsh at gmail.com>\n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"Plural-Forms: nplurals=1; plural=0;\n"
+"X-Poedit-Language: Chinese\n"
+"X-Poedit-Country: TAIWAN\n"
+
+#: lib/gettext_plugin.rb:18
+msgid "Select locale"
+msgstr "選擇字集"
+
+#: lib/gettext_plugin.rb:30
+msgid "Cookie &quot;lang&quot; is set: %s"
+msgstr "Cookie &quot;lang&quot; 已被設定 : %s"
+

data/test/Rakefile

@@ -0,0 +1,44 @@
+require 'gettext/utils'
+
+desc "Create mo files"
+task :makemo do
+  GetText.create_mofiles(true, "po", "locale")
+end
+
+SCHEMA_PATH = File.join(File.dirname(__FILE__), "db")
+
+desc 'Build the MySQL test databases'
+task :createdb do
+  %x( mysqladmin -u root create activerecord_unittest )
+  %x( mysqladmin -u root create activerecord_unittest2 )
+  %x( mysql -u root activerecord_unittest < #{File.join(SCHEMA_PATH, 'mysql.sql')} )
+end
+
+desc 'Drop the MySQL test databases'
+task :dropdb do
+  %x( mysqladmin -u root -f drop activerecord_unittest )
+  %x( mysqladmin -u root -f drop activerecord_unittest2 )
+end
+
+desc 'Rebuild the MySQL test databases'
+task :rebuilddb => [:dropdb, :builddb]
+
+require 'gettext/utils'
+
+desc "Update pot/po files for ActiveRecord test."
+task :updatepo do
+  GetText::ActiveRecordParser.init(
+    :adapter  => "mysql",
+    :username => "root",
+    :encoding => "utf8",
+    :activerecord_classes => ["ActiveRecord::Base", "Reply"],
+    :socket => "/var/lib/mysql/mysql.sock",
+    :database => 'activerecord_unittest'
+  )
+  GetText.update_pofiles("active_record", 
+                         ["fixtures/developer.rb", 
+                          "fixtures/topic.rb",
+                          "fixtures/reply.rb",
+                          "gettext_test_active_record.rb"],
+                         "active_record 1.0.0")
+end

data/test/fixtures/developer.rb

@@ -0,0 +1,5 @@
+class Developer < ActiveRecord::Base
+  N_("Developer|Non existent")
+  validates_inclusion_of :salary, :in => 50000..200000
+  validates_length_of    :name, :within => 3..20
+end

data/test/fixtures/developers.yml

@@ -0,0 +1,21 @@
+david:
+  id: 1
+  name: David
+  salary: 80000
+
+jamis:
+  id: 2
+  name: Jamis
+  salary: 150000
+
+<% for digit in 3..10 %>
+dev_<%= digit %>:
+  id: <%= digit %>
+  name: fixture_<%= digit %>
+  salary: 100000
+<% end %>
+
+poor_jamis:
+  id: 11
+  name: Jamis
+  salary: 9000

data/test/fixtures/reply.rb

@@ -0,0 +1,40 @@
+require 'fixtures/topic'
+
+class Reply < Topic
+  N_("Reply|Topic")  # Need to define relation table names explicity 
+                     # if you use it in validations.
+
+  belongs_to :topic, :foreign_key => "parent_id", :counter_cache => true
+  has_many :replies, :class_name => "SillyReply", :dependent => :destroy, :foreign_key => "parent_id"
+
+  validate :errors_on_empty_content
+  validate_on_create :title_is_wrong_create
+  
+  attr_accessible :title, :author_name, :author_email_address, :written_on, :content, :last_read
+
+  def validate
+    errors.add("title", _("Empty"))   unless attribute_present? "title"
+  end
+  
+  def errors_on_empty_content
+    errors.add("content", _("Empty")) unless attribute_present? "content"
+  end
+  
+  def validate_on_create
+    if attribute_present?("title") && attribute_present?("content") && content == "Mismatch"
+      errors.add("title", _("is Content Mismatch")) 
+    end
+  end
+
+  def title_is_wrong_create
+    errors.add("title", _("is Wrong Create")) if attribute_present?("title") && title == "Wrong Create"
+  end
+
+  def validate_on_update
+    errors.add("title", _("is Wrong Update")) if attribute_present?("title") && title == "Wrong Update"
+  end
+end
+
+class SillyReply < Reply
+  belongs_to :reply, :foreign_key => "parent_id", :counter_cache => :replies_count
+end

data/test/fixtures/topic.rb

@@ -0,0 +1,23 @@
+class Topic < ActiveRecord::Base
+  has_many :replies, :dependent => :destroy, :foreign_key => "parent_id"
+  serialize :content
+
+  N_("Topic|Terms of service")
+  N_("must be abided")
+  
+  before_create  :default_written_on
+  before_destroy :destroy_children
+
+  def parent
+    Topic.find(parent_id)
+  end
+  
+  protected
+    def default_written_on
+      self.written_on = Time.now unless attribute_present?("written_on")
+    end
+
+    def destroy_children
+      self.class.delete_all "parent_id = #{id}"
+    end
+end

data/test/fixtures/topics.yml

@@ -0,0 +1,22 @@
+first:
+  id: 1
+  title: The First Topic
+  author_name: David
+  author_email_address: david@loudthinking.com
+  written_on: 2003-07-16t15:28:00.00+01:00
+  last_read: 2004-04-15
+  bonus_time: 2005-01-30t15:28:00.00+01:00
+  content: Have a nice day
+  approved: false
+  replies_count: 0
+
+second:
+  id: 2
+  title: The Second Topic's of the day
+  author_name: Mary
+  written_on: 2003-07-15t15:28:00.00+01:00
+  content: Have a nice day
+  approved: true
+  replies_count: 2
+  parent_id: 1
+  type: Reply

data/test/gettext_test.rb

@@ -67,7 +67,7 @@ class TestGetText < Test::Unit::TestCase
     bindtextdomain("test2", "locale")
     testlib6 = TestLib6.new
     assert_equal("japanese", testlib6.test)
-    setlocale("fr")
+    set_locale("fr")
     assert_equal("japanese", testlib6.test) #no influence of previous line
     assert_equal("ONE IS 1.", testlib6.test_formatted_string)
     testlib6.setlocale("ja")
@@ -234,7 +234,7 @@ DDD
     assert_equal(default_locale_dirs, GetText::TextDomain::DEFAULT_LOCALE_PATHS)
     new_path = "/foo/%{locale}/%{name}.mo"
     GetText::TextDomain.add_default_locale_path(new_path)
-    assert_equal(default_locale_dirs << new_path, GetText::TextDomain::DEFAULT_LOCALE_PATHS)
+    assert_equal([new_path] + default_locale_dirs, GetText::TextDomain::DEFAULT_LOCALE_PATHS)
   end
 
   def test_setlocale

data/test/gettext_test_active_record.rb

@@ -0,0 +1,1479 @@
+$KCODE = "U"
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+
+require 'rubygems'
+require 'gettext'
+require 'gettext/active_record'
+require 'test/unit'
+require 'active_record'
+require 'active_record/fixtures'
+require 'active_support/binding_of_caller'
+require 'active_support/breakpoint'
+require 'fixtures/topic'
+require 'fixtures/reply'
+require 'fixtures/developer'
+require 'logger'
+
+puts "This test requires MySQL"
+
+ActiveRecord::Base.establish_connection(
+  :adapter  => "mysql",
+  :username => "root",
+  :password => "",
+  :encoding => "utf8",
+  :socket => "/var/lib/mysql/mysql.sock",
+  :database => 'activerecord_unittest'
+)
+
+class Test::Unit::TestCase #:nodoc:
+  include GetText
+  bindtextdomain("active_record", "locale")
+  textdomain_to(ActiveRecord::Base, "active_record")
+  textdomain_to(ActiveRecord::Validations, "active_record")
+  self.fixture_path = File.dirname(__FILE__) + "/fixtures/"
+end
+
+# The following methods in Topic are used in test_conditional_validation_*
+class Topic
+  def condition_is_true
+    return true
+  end
+
+  def condition_is_true_but_its_not
+    return false
+  end
+end
+
+class ValidationsTest < Test::Unit::TestCase
+  fixtures :topics, :developers
+
+  def setup
+    bindtextdomain_to(Topic, "active_record")
+    Topic.write_inheritable_attribute(:validate, nil)
+    Topic.write_inheritable_attribute(:validate_on_create, nil)
+    Topic.write_inheritable_attribute(:validate_on_update, nil)
+  end
+
+  def test_single_attr_validation_and_error_msg
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.title = "There's no content!"
+    r.save
+    assert r.errors.invalid?("content"), "A reply without content should mark that attribute as invalid"
+    assert_equal "空です。", r.errors.on("content"), "A reply without content should contain an error"
+    assert_equal "内容 空です。", r.errors.full_messages[0], "A reply without content should contain an error"
+    assert_equal 1, r.errors.count
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.title = "There's no content!"
+    r.save
+    assert_equal "Empty", r.errors.on("content"), "A reply without content should contain an error"
+  end
+
+  def test_double_attr_validation_and_error_msg
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    assert !r.save
+
+    assert r.errors.invalid?("title"), "A reply without title should mark that attribute as invalid"
+    assert_equal "タイトル 空です。", r.errors.full_messages[0]
+    assert_equal "空です。", r.errors.on("title")
+
+    assert r.errors.invalid?("content"), "A reply without content should mark that attribute as invalid"
+    assert_equal "内容 空です。", r.errors.full_messages[1]
+    assert_equal "空です。", r.errors.on("content")
+
+    assert_equal 2, r.errors.count
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    assert !r.save
+
+    assert r.errors.invalid?("title"), "A reply without title should mark that attribute as invalid"
+    assert_equal "Title Empty", r.errors.full_messages[0]
+    assert_equal "Empty", r.errors.on("title"), "A reply without title should contain an error"
+
+    assert r.errors.invalid?("content"), "A reply without content should mark that attribute as invalid"
+    assert_equal "Content Empty", r.errors.full_messages[1]
+    assert_equal "Empty", r.errors.on("content"), "A reply without content should contain an error"
+
+    assert_equal 2, r.errors.count
+  end
+
+  def test_error_on_create
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.title = "Wrong Create"
+    assert !r.save
+    assert r.errors.invalid?("title"), "A reply with a bad title should mark that attribute as invalid"
+    assert_equal "タイトル が不正に生成されました。", r.errors.full_messages[0]
+    assert_equal "が不正に生成されました。", r.errors.on("title")
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.title = "Wrong Create"
+    assert !r.save
+    assert r.errors.invalid?("title"), "A reply with a bad title should mark that attribute as invalid"
+    assert_equal "Title is Wrong Create", r.errors.full_messages[0]
+    assert_equal "is Wrong Create", r.errors.on("title")
+  end
+
+
+  def test_error_on_update
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.title = "Bad"
+    r.content = "Good"
+    assert r.save, "First save should be successful"
+    r.title = "Wrong Update"
+    assert !r.save, "Second save should fail"
+    assert r.errors.invalid?("title"), "A reply with a bad title should mark that attribute as invalid"
+    assert_equal "タイトル が不正に更新されました。", r.errors.full_messages[0]
+    assert_equal "が不正に更新されました。", r.errors.on("title")
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.title = "Bad"
+    r.content = "Good"
+    assert r.save, "First save should be successful"
+
+    r.title = "Wrong Update"
+    assert !r.save, "Second save should fail"
+
+    assert r.errors.invalid?("title"), "A reply with a bad title should mark that attribute as invalid"
+    assert_equal "Title is Wrong Update", r.errors.full_messages[0]
+    assert_equal "is Wrong Update", r.errors.on("title")
+  end
+
+  def test_single_error_per_attr_iteration
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.save
+
+    errors = []
+    r.errors.each { |attr, msg| errors << [attr, msg] }
+
+    assert errors.include?(["title", "空です。"])
+    assert errors.include?(["content", "空です。"])
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.save
+
+    errors = []
+    r.errors.each { |attr, msg| errors << [attr, msg] }
+
+    assert errors.include?(["title", "Empty"])
+    assert errors.include?(["content", "Empty"])
+  end
+
+  def test_multiple_errors_per_attr_iteration_with_full_error_composition
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.title   = "Wrong Create"
+    r.content = "Mismatch"
+    r.save
+
+    errors = []
+    r.errors.each_full { |error| errors << error }
+    assert_equal "タイトル が不正に生成されました。", errors[0]
+    assert_equal "タイトル は内容がミスマッチです。", errors[1]
+    assert_equal 2, r.errors.count
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.title   = "Wrong Create"
+    r.content = "Mismatch"
+    r.save
+
+    errors = []
+    r.errors.each_full { |error| errors << error }
+
+    assert_equal "Title is Wrong Create", errors[0]
+    assert_equal "Title is Content Mismatch", errors[1]
+    assert_equal 2, r.errors.count
+  end
+
+  def test_errors_on_base
+    GetText.set_locale_all "ja_JP.UTF-8"
+    r = Reply.new
+    r.content = "Mismatch"
+    r.save
+    r.errors.add_to_base "リプライはdignifyされてません。"
+
+    errors = []
+    r.errors.each_full { |error| errors << error }
+
+    assert_equal "リプライはdignifyされてません。", r.errors.on_base
+
+    assert errors.include?("タイトル 空です。")
+    assert errors.include?("リプライはdignifyされてません。")
+    assert_equal 2, r.errors.count
+
+    GetText.set_locale_all "en"
+    r = Reply.new
+    r.content = "Mismatch"
+    r.save
+    r.errors.add_to_base "Reply is not dignifying"
+
+    errors = []
+    r.errors.each_full { |error| errors << error }
+
+    assert_equal "Reply is not dignifying", r.errors.on_base
+
+    assert errors.include?("Title Empty")
+    assert errors.include?("Reply is not dignifying")
+    assert_equal 2, r.errors.count
+  end
+
+  def test_validates_each
+    perform = true
+    hits = 0
+    Topic.validates_each(:title, :content, [:title, :content]) do |record, attr|
+      if perform
+        record.errors.add attr, N_('gotcha')
+        hits += 1
+      end
+    end
+
+    GetText.set_locale_all "ja_JP.UTF-8"    
+    t = Topic.new("title" => "valid", "content" => "whatever")
+    assert !t.save
+    assert_equal 4, hits
+    assert_equal ["タイトル ごっちゃ", "タイトル ごっちゃ", 
+      "内容 ごっちゃ", "内容 ごっちゃ"], t.errors.full_messages
+    assert_equal ["ごっちゃ", "ごっちゃ"], t.errors.on(:title)
+    assert_equal ["ごっちゃ", "ごっちゃ"], t.errors.on(:content)
+
+    GetText.set_locale_all "en"    
+    hits = 0
+    t = Topic.new("title" => "valid", "content" => "whatever")
+    assert !t.save
+    assert_equal 4, hits
+    assert_equal ["Title gotcha", "Title gotcha", 
+      "Content gotcha", "Content gotcha"], t.errors.full_messages
+
+    assert_equal ["gotcha", "gotcha"], t.errors.on(:title)
+    assert_equal ["gotcha", "gotcha"], t.errors.on(:content)
+
+  ensure
+    perform = false
+  end
+
+  def test_errors_on_boundary_breaking
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    developer = Developer.new("name" => "xs")
+    assert !developer.save
+    assert_equal "開発者名は3文字以上で入力してください。", developer.errors.full_messages[0]
+    assert_equal "開発者名は3文字以上で入力してください。", developer.errors.on("name")
+
+    developer.name = "All too very long for this boundary, it really is"
+    assert !developer.save
+    assert_equal "開発者名は20文字以内で入力してください。", developer.errors.full_messages[0]
+    assert_equal "開発者名は20文字以内で入力してください。", developer.errors.on("name")
+
+    developer.name = "ちょうどぴったり12"
+    assert developer.save
+
+    GetText.set_locale_all "en"   
+    developer = Developer.new("name" => "xs")
+    assert !developer.save
+    assert_equal "Name is too short (minimum is 3 characters)", developer.errors.full_messages[0]
+    assert_equal "Name is too short (minimum is 3 characters)", developer.errors.on("name")
+
+    developer.name = "All too very long for this boundary, it really is"
+    assert !developer.save
+    assert_equal "Name is too long (maximum is 20 characters)", developer.errors.full_messages[0]
+    assert_equal "Name is too long (maximum is 20 characters)", developer.errors.on("name")
+
+    developer.name = "Just right"
+    assert developer.save
+  end
+
+  def test_terms_of_service_agreement
+    GetText.set_locale_all "ja_JP.UTF-8"   
+    Topic.validates_acceptance_of(:terms_of_service, :on => :create)
+    t = Topic.create("title" => "We should be confirmed","terms_of_service" => "")
+    assert !t.save
+    assert_equal "利用規約を受諾してください。", t.errors.full_messages[0]
+    assert_equal "利用規約を受諾してください。", t.errors.on(:terms_of_service)
+
+    t.terms_of_service = "1"
+    assert t.save
+
+    GetText.set_locale_all "en"   
+    t = Topic.create("title" => "We should be confirmed","terms_of_service" => "")
+    assert !t.save
+    assert_equal "Terms of service must be accepted", t.errors.full_messages[0]
+    assert_equal "Terms of service must be accepted", t.errors.on(:terms_of_service)
+
+    t.terms_of_service = "1"
+    assert t.save
+  end
+
+  def test_eula_fn
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    Topic.validates_acceptance_of(:eula, :message => N_("%{fn} must be abided"), :on => :create)
+
+    t = Topic.create("title" => "We should be confirmed","eula" => "")
+    assert !t.save
+    assert_equal "Eulaに従ってください。", t.errors.full_messages[0]
+    assert_equal "Eulaに従ってください。", t.errors.on(:eula)
+
+    t.eula = "1"
+    assert t.save
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "We should be confirmed","eula" => "")
+    assert !t.save
+    assert_equal "Eula must be abided", t.errors.full_messages[0]
+    assert_equal "Eula must be abided", t.errors.on(:eula)
+
+    t.eula = "1"
+    assert t.save
+  end
+
+  def test_eula
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    Topic.validates_acceptance_of(:eula, :message => N_("must be abided"), :on => :create)
+
+    t = Topic.create("title" => "We should be confirmed","eula" => "")
+    assert !t.save
+    assert_equal "Eula に従ってください。", t.errors.full_messages[0]
+    assert_equal "に従ってください。", t.errors.on(:eula)
+
+    t.eula = "1"
+    assert t.save
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "We should be confirmed","eula" => "")
+    assert !t.save
+    assert_equal "Eula must be abided", t.errors.full_messages[0]
+    assert_equal "must be abided", t.errors.on(:eula)
+
+    t.eula = "1"
+    assert t.save
+  end
+
+  def test_terms_of_service_agreement_with_accept_value
+    Topic.validates_acceptance_of(:terms_of_service, :on => :create, :accept => "I agree.")
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "We should be confirmed", "terms_of_service" => "")
+    assert !t.save
+    assert_equal "利用規約を受諾してください。", t.errors.full_messages[0]
+    assert_equal "利用規約を受諾してください。", t.errors.on(:terms_of_service)
+
+    t.terms_of_service = "I agree."
+    assert t.save
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "We should be confirmed", "terms_of_service" => "")
+    assert !t.save
+    assert_equal "Terms of service must be accepted", t.errors.full_messages[0]
+    assert_equal "Terms of service must be accepted", t.errors.on(:terms_of_service)
+
+    t.terms_of_service = "I agree."
+    assert t.save
+  end
+
+  def test_validate_presences
+    Topic.validates_presence_of(:title, :content)
+
+    GetText.set_locale_all "ja_JP.UTF-8" 
+    t = Topic.create
+    assert !t.save
+    assert_equal "タイトルを入力してください。", t.errors.full_messages[0]
+    assert_equal "内容を入力してください。", t.errors.full_messages[1]
+    assert_equal "タイトルを入力してください。", t.errors.on(:title)
+    assert_equal "内容を入力してください。", t.errors.on(:content)
+
+    t.title = "something"
+    t.content  = "   "
+
+    assert !t.save
+    assert_equal "内容を入力してください。", t.errors.full_messages[0]
+    assert_equal "内容を入力してください。", t.errors.on(:content)
+
+    t.content = "like stuff"
+
+    assert t.save
+
+    GetText.set_locale_all "en"  
+    t = Topic.create
+    assert !t.save
+    assert_equal "Title can't be blank", t.errors.full_messages[0]
+    assert_equal "Content can't be blank", t.errors.full_messages[1]
+    assert_equal "Title can't be blank", t.errors.on(:title)
+    assert_equal "Content can't be blank", t.errors.on(:content)
+
+    t.title = "something"
+    t.content  = "   "
+
+    assert !t.save
+    assert_equal "Content can't be blank", t.errors.full_messages[0]
+    assert_equal "Content can't be blank", t.errors.on(:content)
+
+    t.content = "like stuff"
+
+    assert t.save
+  end
+
+  def test_validate_uniqueness
+    Topic.validates_uniqueness_of(:title)
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.new("title" => "I'm unique!")
+    assert t.save, "Should save t as unique"
+
+    t.content = "Remaining unique"
+    assert t.save, "Should still save t as unique"
+
+    t2 = Topic.new("title" => "I'm unique!")
+    assert !t2.valid?, "Shouldn't be valid"
+    assert !t2.save, "Shouldn't save t2 as unique"
+    assert_equal "タイトルはすでに存在します。", t2.errors.full_messages[0]
+    assert_equal "タイトルはすでに存在します。", t2.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.new("title" => "I'm unique2!")
+    assert t.save, "Should save t as unique"
+
+    t.content = "Remaining unique2"
+    assert t.save, "Should still save t as unique"
+
+    t2 = Topic.new("title" => "I'm unique2!")
+    assert !t2.valid?, "Shouldn't be valid"
+    assert !t2.save, "Shouldn't save t2 as unique"
+    assert_equal "Title has already been taken", t2.errors.full_messages[0]
+    assert_equal "Title has already been taken", t2.errors.on(:title)
+  end
+
+  def test_validate_format_fn
+    Topic.validates_format_of(:title, :content, :with => /^Validation\smacros \w+!$/, :message => N_("%{fn} is bad data"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "i'm incorrect", "content" => "Validation macros rule!")
+    assert !t.valid?, "Shouldn't be valid"
+    assert !t.save, "Shouldn't save because it's invalid"
+    assert_equal "タイトルは悪いデータです。", t.errors.full_messages[0]
+    assert_equal "タイトルは悪いデータです。", t.errors.on(:title)
+    assert_nil t.errors.on(:content)
+
+    GetText.set_locale_all "en"  
+    assert_raise(ArgumentError) { Topic.validates_format_of(:title, :content) }
+    t = Topic.create("title" => "i'm incorrect", "content" => "Validation macros rule!")
+    assert !t.valid?, "Shouldn't be valid"
+    assert !t.save, "Shouldn't save because it's invalid"
+    assert_equal "Title is bad data", t.errors.full_messages[0]
+    assert_equal "Title is bad data", t.errors.on(:title)
+    assert_nil t.errors.on(:content)
+  end
+
+  def test_validate_format
+    Topic.validates_format_of(:title, :content, :with => /^Validation\smacros \w+!$/, :message => N_("is bad data"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "i'm incorrect", "content" => "Validation macros rule!")
+    assert !t.valid?, "Shouldn't be valid"
+    assert !t.save, "Shouldn't save because it's invalid"
+    assert_equal "タイトル は悪いデータです。", t.errors.full_messages[0]
+    assert_equal "は悪いデータです。", t.errors.on(:title)
+    assert_nil t.errors.on(:content)
+
+    GetText.set_locale_all "en"  
+    assert_raise(ArgumentError) { Topic.validates_format_of(:title, :content) }
+    t = Topic.create("title" => "i'm incorrect", "content" => "Validation macros rule!")
+    assert !t.valid?, "Shouldn't be valid"
+    assert !t.save, "Shouldn't save because it's invalid"
+    assert_equal "Title is bad data", t.errors.full_messages[0]
+    assert_equal "is bad data", t.errors.on(:title)
+    assert_nil t.errors.on(:content)
+
+    t.title = "Validation macros rule!"
+
+    assert t.save
+    assert_nil t.errors.on(:title)
+
+    assert_raise(ArgumentError) { Topic.validates_format_of(:title, :content) }
+  end
+  
+  def test_validates_inclusion_of
+    Topic.validates_inclusion_of( :title, :in => %w( a b c d e f g ) )
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "a", "content" => "I know you are but what am I?")
+    assert t.valid?
+    t.title = "uhoh"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルは一覧にありません。", t.errors.full_messages[0]
+    assert_equal "タイトルは一覧にありません。", t.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "a", "content" => "I know you are but what am I?")
+    assert t.valid?
+    t.title = "uhoh"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title is not included in the list", t.errors.full_messages[0]
+    assert_equal "Title is not included in the list", t.errors.on(:title)
+  end
+
+  def test_validates_length_of_using_minimum
+    Topic.validates_length_of :title, :minimum => 5
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "not"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルは5文字以上で入力してください。", t.errors.full_messages[0]
+    assert_equal "タイトルは5文字以上で入力してください。", t.errors.on("title")
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "not"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title is too short (minimum is 5 characters)", t.errors.full_messages[0]
+    assert_equal "Title is too short (minimum is 5 characters)", t.errors.on("title")
+  end
+
+  def test_validates_length_of_using_maximum
+    Topic.validates_length_of :title, :maximum => 5
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "notvalid"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルは5文字以内で入力してください。", t.errors.full_messages[0]
+    assert_equal "タイトルは5文字以内で入力してください。", t.errors.on("title")
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "notvalid"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title is too long (maximum is 5 characters)", t.errors.full_messages[0]
+    assert_equal "Title is too long (maximum is 5 characters)", t.errors.on("title")
+  end
+
+  def test_validates_length_of_using_within
+    Topic.validates_length_of(:title, :content, :within => 3..5)
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.new("title" => "a!", "content" => "I'm ooooooooh so very long")
+    assert !t.valid?
+    assert_equal "タイトルは3文字以上で入力してください。", t.errors.full_messages[0]
+    assert_equal "内容は5文字以内で入力してください。", t.errors.full_messages[1]
+    assert_equal "タイトルは3文字以上で入力してください。", t.errors.on(:title)
+    assert_equal "内容は5文字以内で入力してください。", t.errors.on(:content)
+
+    t.title = nil
+    t.content = nil
+    assert !t.valid?
+    assert_equal "タイトルは3文字以上で入力してください。", t.errors.full_messages[0]
+    assert_equal "内容は3文字以上で入力してください。", t.errors.full_messages[1]
+    assert_equal "タイトルは3文字以上で入力してください。", t.errors.on(:title)
+    assert_equal "内容は3文字以上で入力してください。", t.errors.on(:content)
+
+    GetText.set_locale_all "en"  
+    t = Topic.new("title" => "a!", "content" => "I'm ooooooooh so very long")
+    assert !t.valid?
+    assert_equal "Title is too short (minimum is 3 characters)", t.errors.full_messages[0]
+    assert_equal "Content is too long (maximum is 5 characters)", t.errors.full_messages[1]
+    assert_equal "Title is too short (minimum is 3 characters)", t.errors.on(:title)
+    assert_equal "Content is too long (maximum is 5 characters)", t.errors.on(:content)
+
+    t.title = nil
+    t.content = nil
+    assert !t.valid?
+    assert_equal "Title is too short (minimum is 3 characters)", t.errors.full_messages[0]
+    assert_equal "Content is too short (minimum is 3 characters)", t.errors.full_messages[1]
+    assert_equal "Title is too short (minimum is 3 characters)", t.errors.on(:title)
+    assert_equal "Content is too short (minimum is 3 characters)", t.errors.on(:content)
+  end
+
+  def test_optionally_validates_length_of_using_within_on_create_fn
+    Topic.validates_length_of :title, :content, :within => 5..10, :on => :create, :too_long => N_("my string(%{fn}) is too long: %d")
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "thisisnotvalid", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "文字列:タイトルは長すぎ: 10", t.errors.full_messages[0]
+    assert_equal "文字列:タイトルは長すぎ: 10", t.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "thisisnotvalid", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "my string(Title) is too long: 10", t.errors.full_messages[0]
+    assert_equal "my string(Title) is too long: 10", t.errors.on(:title)
+  end
+
+  def test_optionally_validates_length_of_using_within_on_create
+    Topic.validates_length_of :title, :content, :within => 5..10, :on => :create, :too_long => N_("my string is too long: %d")
+
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "thisisnotvalid", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "タイトル 文字列は長すぎ: 10", t.errors.full_messages[0]
+    assert_equal "文字列は長すぎ: 10", t.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "thisisnotvalid", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "Title my string is too long: 10", t.errors.full_messages[0]
+    assert_equal "my string is too long: 10", t.errors.on(:title)
+  end
+
+  def test_optionally_validates_length_of_using_within_on_update_fn
+    Topic.validates_length_of :title, :content, :within => 5..10, :on => :update, :too_short => N_("my string(%{fn}) is too short: %d")
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "vali", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+
+    t.title = "not"
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "文字列:タイトルは短すぎ: 5", t.errors.full_messages[0]
+    assert_equal "文字列:タイトルは短すぎ: 5", t.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "vali", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+
+    t.title = "not"
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "my string(Title) is too short: 5", t.errors.full_messages[0]
+    assert_equal "my string(Title) is too short: 5", t.errors.on(:title)
+
+  end
+
+  def test_optionally_validates_length_of_using_within_on_update
+    Topic.validates_length_of :title, :content, :within => 5..10, :on => :update, :too_short => N_("my string is too short: %d")
+    GetText.set_locale_all "ja_JP.UTF-8"  
+    t = Topic.create("title" => "vali", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+
+    t.title = "not"
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "タイトル 文字列は短すぎ: 5", t.errors.full_messages[0]
+    assert_equal "文字列は短すぎ: 5", t.errors.on(:title)
+
+    GetText.set_locale_all "en"  
+    t = Topic.create("title" => "vali", "content" => "whatever")
+    assert !t.save
+    assert t.errors.on(:title)
+
+    t.title = "not"
+    assert !t.save
+    assert t.errors.on(:title)
+    assert_equal "Title my string is too short: 5", t.errors.full_messages[0]
+    assert_equal "my string is too short: 5", t.errors.on(:title)
+
+  end
+
+  def test_validates_length_of_using_is
+    Topic.validates_length_of :title, :is => 5
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "notvalid"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルは5文字で入力してください。", t.errors.full_messages[0]
+    assert_equal "タイトルは5文字で入力してください。", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "valid", "content" => "whatever")
+    assert t.valid?
+
+    t.title = "notvalid"
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title is the wrong length (should be 5 characters)", t.errors.full_messages[0]
+    assert_equal "Title is the wrong length (should be 5 characters)", t.errors.on("title")
+
+  end
+
+  def test_validates_length_with_globaly_modified_error_message_fn
+    ActiveRecord::Errors.default_error_messages[:too_short] = N_('%{fn} %d dayo')
+    Topic.validates_length_of :title, :minimum => 10
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create(:title => 'too short')
+    assert !t.valid?
+    assert_equal 'タイトルは10以上だよ。', t.errors.full_messages[0]
+    assert_equal 'タイトルは10以上だよ。', t.errors.on('title')
+
+    GetText.set_locale_all "en"
+    t = Topic.create(:title => 'too short')
+    assert !t.valid?
+    assert_equal 'Title 10 dayo', t.errors.full_messages[0]
+    assert_equal 'Title 10 dayo', t.errors.on('title')
+  end
+
+  def test_validates_length_with_globaly_modified_error_message
+    ActiveRecord::Errors.default_error_messages[:too_short] = N_('%d dayo')
+    Topic.validates_length_of :title, :minimum => 10
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create(:title => 'too short')
+    assert !t.valid?
+    assert_equal 'タイトル は10以上だよ。', t.errors.full_messages[0]
+    assert_equal 'は10以上だよ。', t.errors.on('title')
+
+    GetText.set_locale_all "en"
+    t = Topic.create(:title => 'too short')
+    assert !t.valid?
+    assert_equal 'Title 10 dayo', t.errors.full_messages[0]
+    assert_equal '10 dayo', t.errors.on('title')
+  end
+
+  def test_validates_length_of_custom_errors_for_minimum_with_message_fn
+    Topic.validates_length_of( :title, :minimum => 5, :message => N_("%{fn} hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_minimum_with_message
+    Topic.validates_length_of( :title, :minimum => 5, :message => N_("hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_minimum_with_too_short_fn
+    Topic.validates_length_of( :title, :minimum=>5, :too_short => N_("%{fn} hoo %d") )
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_minimum_with_too_short
+    Topic.validates_length_of( :title, :minimum=>5, :too_short => N_("hoo %d") )
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_maximum_with_message_fn
+    Topic.validates_length_of( :title, :maximum=>5, :message => N_("%{fn} hoo %d"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_maximum_with_message
+    Topic.validates_length_of( :title, :maximum=>5, :message => N_("hoo %d"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+  def test_validates_length_of_custom_errors_for_maximum_with_too_long_fn
+    Topic.validates_length_of( :title, :maximum=>5, :too_long => N_("%{fn} hoo %d"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_maximum_with_too_long
+    Topic.validates_length_of( :title, :maximum=>5, :too_long => N_("hoo %d"))
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_is_with_message_fn
+    Topic.validates_length_of( :title, :is=>5, :message=> N_("%{fn} hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_is_with_message
+    Topic.validates_length_of( :title, :is=>5, :message=> N_("hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_is_with_wrong_length_fn
+    Topic.validates_length_of( :title, :is=>5, :wrong_length=> N_("hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validates_length_of_custom_errors_for_is_with_wrong_length
+    Topic.validates_length_of( :title, :is=>5, :wrong_length=> N_("hoo %d") )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_validate_block_fn
+    Topic.validate { |topic| topic.errors.add("title", N_("%{fn} will never be valid")) }
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "Title", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルは決して正しくならないでしょう。", t.errors.full_messages[0]
+    assert_equal "タイトルは決して正しくならないでしょう。", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "Title", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title will never be valid", t.errors.full_messages[0]
+    assert_equal "Title will never be valid", t.errors.on("title")
+  end
+
+  def test_validate_block
+    Topic.validate { |topic| topic.errors.add("title", N_("will never be valid")) }
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "Title", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル は決して正しくならないでしょう。", t.errors.full_messages[0]
+    assert_equal "は決して正しくならないでしょう。", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "Title", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title will never be valid", t.errors.full_messages[0]
+    assert_equal "will never be valid", t.errors.on("title")
+  end
+
+  def test_validates_acceptance_of_with_custom_error_using_quotes_fn
+    Developer.validates_acceptance_of :salary, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+ 
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.salary = "0"
+    assert !d.valid?
+    assert_equal "給料は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:salary).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.salary = "0"
+    assert !d.valid?
+    assert_equal "Salary contains 'single' and \"double\" quotes", d.errors.on(:salary).first 
+  end
+
+  def test_validates_acceptance_of_with_custom_error_using_quotes
+    Developer.validates_acceptance_of :salary, :message=> N_("This string contains 'single' and \"double\" quotes")
+ 
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.salary = "0"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:salary).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.salary = "0"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:salary).first 
+  end
+
+  def test_validates_confirmation_of_with_custom_error_using_quotes_fn
+    Developer.validates_confirmation_of :name, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "John"
+    d.name_confirmation = "Johnny"
+    assert !d.valid?
+    assert_equal "開発者名は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "John"
+    d.name_confirmation = "Johnny"
+    assert !d.valid?
+    assert_equal "Name contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_confirmation_of_with_custom_error_using_quotes
+    Developer.validates_confirmation_of :name, :message=> N_("This string contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "John"
+    d.name_confirmation = "Johnny"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name)
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "John"
+    d.name_confirmation = "Johnny"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:name)
+  end
+
+  def test_validates_format_of_with_custom_error_using_quotes_fn
+    Developer.validates_format_of :name, :with => /^(A-Z*)$/, :message => "%{fn} contains 'single' and \"double\" quotes"
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "John 32"
+    assert !d.valid?
+    assert_equal "開発者名は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "John 32"
+    assert !d.valid?
+    assert_equal "Name contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_format_of_with_custom_error_using_quotes
+    Developer.validates_format_of :name, :with => /^(A-Z*)$/, :message => "This string contains 'single' and \"double\" quotes"
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "John 32"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name)
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "John 32"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:name)
+  end
+
+  def test_validates_inclusion_of_with_custom_error_using_quotes_fn
+    Developer.validates_inclusion_of :salary, :in => 1000..80000, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+ 
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.salary = "90,000"
+    assert !d.valid?
+    assert_equal "給料は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:salary).first
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.salary = "90,000"
+    assert !d.valid?
+    assert_equal "Salary contains 'single' and \"double\" quotes", d.errors.on(:salary).first
+  end
+
+  def test_validates_inclusion_of_with_custom_error_using_quotes
+    Developer.validates_inclusion_of :salary, :in => 1000..80000, :message=> N_("This string contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.salary = "90,000"
+    assert !d.valid?
+
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:salary).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.salary = "90,000"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:salary).first
+  end
+
+  def test_validates_length_of_with_custom_too_long_using_quotes_fn
+    Developer.validates_length_of :name, :maximum => 4, :too_long=> N_("%{fn} contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "Jeffrey"
+    assert !d.valid?
+    assert_equal "開発者名は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Jeffrey"
+    assert !d.valid?
+    assert_equal "Name contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_length_of_with_custom_too_long_using_quotes
+    Developer.validates_length_of :name, :maximum => 4, :too_long=> N_("This string contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "Jeffrey"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Jeffrey"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_length_of_with_custom_too_short_using_quotes_fn
+    Developer.validates_length_of :name, :minimum => 4, :too_short=> N_("%{fn} contains 'single' and \"double\" quotes")
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "開発者名は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "Name contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_length_of_with_custom_too_short_using_quotes
+    Developer.validates_length_of :name, :minimum => 4, :too_short=> N_("This string contains 'single' and \"double\" quotes")
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_length_of_with_custom_message_using_quotes_fn
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Developer.validates_length_of :name, :minimum => 4, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "開発者名は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "Name contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_length_of_with_custom_message_using_quotes
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Developer.validates_length_of :name, :minimum => 4, :message=> N_("This string contains 'single' and \"double\" quotes")
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:name).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:name).first
+  end
+
+  def test_validates_presence_of_with_custom_message_using_quotes_fn
+    # This test depends on test_validates_presence_of_with_custom_message_using_quotes
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Developer.validates_presence_of :non_existent, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+
+    assert_equal "存在しないは'シングル' \"ダブル\"クオートを含む。", d.errors.on(:non_existent).first
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "Non existent contains 'single' and \"double\" quotes", d.errors.on(:non_existent).first
+  end
+
+  def test_validates_presence_of_with_custom_message_using_quotes
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Developer.validates_presence_of :non_existent, :message=> N_("This string contains 'single' and \"double\" quotes")
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", d.errors.on(:non_existent)
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "Joe"
+    assert !d.valid?
+    assert_equal "This string contains 'single' and \"double\" quotes", d.errors.on(:non_existent)
+  end
+
+  def test_validates_uniqueness_of_with_custom_message_using_quotes_fn
+    Developer.validates_uniqueness_of :name, :message=> N_("%{fn} contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "David"
+    assert !d.valid?
+    assert_equal d.errors.on(:name).first, "開発者名は'シングル' \"ダブル\"クオートを含む。"
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "David"
+    assert !d.valid?
+    assert_equal d.errors.on(:name).first, "Name contains 'single' and \"double\" quotes"
+  end
+
+  def test_validates_uniqueness_of_with_custom_message_using_quotes
+    Developer.validates_uniqueness_of :name, :message=> N_("This string contains 'single' and \"double\" quotes")
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    d = Developer.new
+    d.name = "David"
+    assert !d.valid?
+    assert_equal d.errors.on(:name).first, "この文字列は'シングル' \"ダブル\"クオートを含む。"
+
+    GetText.set_locale_all "en"
+    d = Developer.new
+    d.name = "David"
+    assert !d.valid?
+    assert_equal d.errors.on(:name).first, "This string contains 'single' and \"double\" quotes"
+  end
+
+  def test_validates_associated_with_custom_message_using_quotes_fn
+    Reply.validates_associated( :topic )
+    Topic.validates_presence_of( :content )
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert r.errors.on(:topic)
+    r.topic.content = "non-empty"
+    assert r.valid?
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Reply.validates_associated :topic, :message => N_("%{fn} contains 'single' and \"double\" quotes")
+    Topic.validates_presence_of :content
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert_equal "トピックは'シングル' \"ダブル\"クオートを含む。", r.errors.full_messages[0]
+    assert_equal "トピックは'シングル' \"ダブル\"クオートを含む。", r.errors.on(:topic).first 
+
+    GetText.set_locale_all "en"
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert_equal "Topic contains 'single' and \"double\" quotes", r.errors.full_messages[0]
+    assert_equal "Topic contains 'single' and \"double\" quotes", r.errors.on(:topic).first 
+  end
+
+  def test_validates_associated_with_custom_message_using_quotes
+    Reply.validates_associated( :topic )
+    Topic.validates_presence_of( :content )
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert r.errors.on(:topic)
+    r.topic.content = "non-empty"
+    assert r.valid?
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Reply.validates_associated :topic, :message => N_("This string contains 'single' and \"double\" quotes")
+    Topic.validates_presence_of :content
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert_equal "トピック この文字列は'シングル' \"ダブル\"クオートを含む。", r.errors.full_messages[0]
+    assert_equal "この文字列は'シングル' \"ダブル\"クオートを含む。", r.errors.on(:topic).first 
+
+    GetText.set_locale_all "en"
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    r.topic = Topic.create("title" => "uhohuhoh")
+    assert !r.valid?
+    assert_equal "Topic This string contains 'single' and \"double\" quotes", r.errors.full_messages[0]
+    assert_equal "This string contains 'single' and \"double\" quotes", r.errors.on(:topic).first 
+  end
+
+  def test_conditional_validation_using_method_true_fn
+    # When the method returns true
+    Topic.validates_length_of( :title, :maximum=>5, :too_long=> N_("%{fn} hoo %d"), :if => :condition_is_true )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.on("title")
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_conditional_validation_using_method_true
+    # When the method returns true
+    Topic.validates_length_of( :title, :maximum=>5, :too_long=> N_("hoo %d"), :if => :condition_is_true )
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_conditional_validation_using_string_true_fn
+    # When the evaluated string returns true
+    Topic.validates_length_of( :title, :maximum=>5, :too_long=> N_("%{fn} hoo %d"), :if => "a = 1; a == 1" )
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+  end
+
+  def test_conditional_validation_using_string_true
+    # When the evaluated string returns true
+    Topic.validates_length_of( :title, :maximum=>5, :too_long=> N_("hoo %d"), :if => "a = 1; a == 1" )
+
+    GetText.set_locale_all "ja_JP.UTF-8"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+  end
+
+  def test_conditional_validation_using_block_true_fn
+    # When the block returns true
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Topic.validates_length_of( :title, :maximum=>5, :too_long => N_("%{fn} hoo %d"),
+      :if => Proc.new { |r| r.content.size > 4 } )
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトルふー5", t.errors.full_messages[0]
+    assert_equal "タイトルふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "Title hoo 5", t.errors.on("title")
+
+  end
+
+  def test_conditional_validation_using_block_true
+    # When the block returns true
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Topic.validates_length_of( :title, :maximum=>5, :too_long => N_("hoo %d"),
+      :if => Proc.new { |r| r.content.size > 4 } )
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "タイトル ふー5", t.errors.full_messages[0]
+    assert_equal "ふー5", t.errors.on("title")
+
+    GetText.set_locale_all "en"
+    t = Topic.create("title" => "uhohuhoh", "content" => "whatever")
+    assert !t.valid?
+    assert t.errors.on(:title)
+    assert_equal "Title hoo 5", t.errors.full_messages[0]
+    assert_equal "hoo 5", t.errors.on("title")
+
+  end
+
+  def test_validates_associated_missing
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Reply.validates_presence_of(:topic)
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    # In this case, rgettext doesn't pick up the names of relations as msgid, 
+    # so you need to define N_() in the model class
+    assert_equal "トピックを入力してください。",  r.errors.on(:topic)
+
+    GetText.set_locale_all "en"
+    r = Reply.create("title" => "A reply", "content" => "with content!")
+    assert_equal "Topic can't be blank",  r.errors.on(:topic)
+    assert_equal "Topic can't be blank",  r.errors.full_messages[0]
+  end
+
+  def test_default_validates_numericality_of
+    GetText.set_locale_all "ja_JP.UTF-8"
+    Topic.validates_numericality_of :approved
+    topic = Topic.create("title" => "numeric test", "content" => "whatever", "approved" => "aaa")
+    assert_equal "承認は数値で入力してください。", topic.errors.on(:approved)
+
+    GetText.set_locale_all "en"
+    topic = Topic.create("title" => "numeric test", "content" => "whatever", "approved" => "aaa")
+    assert_equal "Approved is not a number", topic.errors.on(:approved)
+    assert_equal "Approved is not a number", topic.errors.full_messages[0]
+   end
+end
+