namecase 1.0.0

data/lib/CVS/Entries

@@ -0,0 +1,2 @@
+/namecase.rb/1.1.1.1/Mon Nov  7 23:24:12 2005//
+D

data/lib/CVS/Repository

@@ -0,0 +1 @@
+namecase/lib

data/lib/CVS/Root

@@ -0,0 +1 @@
+:ext:aaronp@rubyforge.org:/var/cvs/namecase

data/lib/namecase.rb

@@ -0,0 +1,53 @@
+class NameCase < String
+
+  # Returns a new +String+ with the contents properly namecased
+  def nc
+    localstring = self.downcase
+    localstring.gsub!(/\b\w/) { |first| first.upcase }
+    localstring.gsub!("\'\w\b") { |c| c.downcase } # Lowercase 's
+
+    if localstring =~ /\bMac[A-Za-z]{2,}[^aciozj]\b/ or localstring =~ /\bMc/
+      localstring.gsub!(/\b(Ma?c)([A-Za-z]+)/) { |match| $1 + $2.capitalize }
+
+      # Now fix "Mac" exceptions
+      localstring.gsub!(/\bMacEvicius/, 'Macevicius')
+      localstring.gsub!(/\bMacHado/, 'Machado')
+      localstring.gsub!(/\bMacHar/, 'Machar')
+      localstring.gsub!(/\bMacHin/, 'Machin')
+      localstring.gsub!(/\bMacHlin/, 'Machlin')
+      localstring.gsub!(/\bMacIas/, 'Macias')
+      localstring.gsub!(/\bMacIulis/, 'Maciulis')
+      localstring.gsub!(/\bMacKie/, 'Mackie')
+      localstring.gsub!(/\bMacKle/, 'Mackle')
+      localstring.gsub!(/\bMacKlin/, 'Macklin')
+      localstring.gsub!(/\bMacQuarie/, 'Macquarie')
+    end
+    localstring.gsub!('Macmurdo','MacMurdo')
+
+    # Fixes for "son (daughter) of" etc
+    localstring.gsub!(/\bAl(?=\s+\w)/, 'al')  # al Arabic or forename Al.
+    localstring.gsub!(/\bAp\b/, 'ap')         # ap Welsh.
+    localstring.gsub!(/\bBen(?=\s+\w)/,'ben') # ben Hebrew or forename Ben.
+    localstring.gsub!(/\bDell([ae])\b/,'dell\1')  # della and delle Italian.
+    localstring.gsub!(/\bD([aeiu])\b/,'d\1')   # da, de, di Italian; du French.
+    localstring.gsub!(/\bDe([lr])\b/,'de\1')   # del Italian; der Dutch/Flemish.
+    localstring.gsub!(/\bEl\b/,'el')   # el Greek or El Spanish.
+    localstring.gsub!(/\bLa\b/,'la')   # la French or La Spanish.
+    localstring.gsub!(/\bL([eo])\b/,'l\1')      # lo Italian; le French.
+    localstring.gsub!(/\bVan(?=\s+\w)/,'van')  # van German or forename Van.
+    localstring.gsub!(/\bVon\b/,'von')  # von Dutch/Flemish
+
+    # Fix roman numeral names
+    localstring.gsub!(
+      / \b ( (?: [Xx]{1,3} | [Xx][Ll]   | [Ll][Xx]{0,3} )?
+             (?: [Ii]{1,3} | [Ii][VvXx] | [Vv][Ii]{0,3} )? ) \b /x
+    ) { |match| match.upcase }
+
+    localstring
+  end
+
+  # Modifies _str_ in place and properly namecases the string.
+  def nc!
+    self.gsub!(self, self.nc)
+  end
+end

data/test/CVS/Entries

@@ -0,0 +1,2 @@
+/test_namecase.rb/1.1.1.1/Mon Nov  7 23:50:09 2005//
+D

data/test/CVS/Repository

@@ -0,0 +1 @@
+namecase/test

data/test/CVS/Root

@@ -0,0 +1 @@
+:ext:aaronp@rubyforge.org:/var/cvs/namecase

data/test/test_namecase.rb

@@ -0,0 +1,44 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'namecase'
+require 'test/unit'
+
+class TestNameCase < Test::Unit::TestCase
+  def setup
+    @proper_names = [
+      "Keith",            "Leigh-Williams",       "McCarthy",
+      "O'Callaghan",      "St. John",             "von Streit",
+      "van Dyke",         "Van",          "ap Llwyd Dafydd",
+      "al Fahd",      "Al",
+      "el Grecco",
+      "ben Gurion",   "Ben",
+      "da Vinci",
+      "di Caprio",        "du Pont",              "de Legate",
+      "del Crond",        "der Sind",             "van der Post",
+      "von Trapp",        "la Poisson",           "le Figaro",
+      "Mack Knife",       "Dougal MacDonald",
+      # Mac exceptions
+      "Machin",           "Machlin",              "Machar",
+      "Mackle",           "Macklin",              "Mackie",
+      "Macquarie",        "Machado",              "Macevicius",
+      "Maciulis",         "Macias",               "MacMurdo",
+      # Roman numerals
+      "Henry VIII",       "Louis III",            "Louis XIV",
+      "Charles II",       "Fred XLIX",
+    ]
+  end
+
+  def test_namecase
+    @proper_names.each do |name|
+      nc_name = NameCase.new(name)
+      assert_equal(name, nc_name.downcase.nc)
+    end
+  end
+
+  def test_namecase_modify
+    @proper_names.each do |name|
+      nc_name = NameCase.new(name)
+      assert_equal(name, nc_name.downcase.nc!)
+    end
+  end
+end

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.10
+specification_version: 1
+name: namecase
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+date: 2005-11-07
+summary: "NameCase is a Ruby implementation of Lingua::EN::NameCase, a library for
+  converting strings to be properly cased."
+require_paths: 
+  - lib
+email: aaronp@rubyforge.org
+homepage: namecase.rubyforge.org
+rubyforge_project: namecase
+description: 
+autorequire: NameCase
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+    - 
+      - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+  version: 
+platform: ruby
+authors: 
+  - Aaron Patterson
+files: 
+  - test/CVS
+  - test/test_namecase.rb
+  - test/CVS/Entries
+  - test/CVS/Repository
+  - test/CVS/Root
+  - lib/CVS
+  - lib/namecase.rb
+  - lib/CVS/Entries
+  - lib/CVS/Repository
+  - lib/CVS/Root
+  - doc/classes
+  - doc/created.rid
+  - doc/CVS
+  - doc/files
+  - doc/fr_class_index.html
+  - doc/fr_file_index.html
+  - doc/fr_method_index.html
+  - doc/index.html
+  - doc/rdoc-style.css
+  - doc/classes/CVS
+  - doc/classes/NameCase.html
+  - doc/classes/NameCase.src
+  - doc/classes/String.html
+  - doc/classes/String.src
+  - doc/classes/TestNameCase.html
+  - doc/classes/TestNameCase.src
+  - doc/classes/CVS/Entries
+  - doc/classes/CVS/Repository
+  - doc/classes/CVS/Root
+  - doc/classes/NameCase.src/CVS
+  - doc/classes/NameCase.src/M000001.html
+  - doc/classes/NameCase.src/M000002.html
+  - doc/classes/NameCase.src/CVS/Entries
+  - doc/classes/NameCase.src/CVS/Repository
+  - doc/classes/NameCase.src/CVS/Root
+  - doc/classes/String.src/CVS
+  - doc/classes/String.src/M000004.html
+  - doc/classes/String.src/M000005.html
+  - doc/classes/String.src/CVS/Entries
+  - doc/classes/String.src/CVS/Repository
+  - doc/classes/String.src/CVS/Root
+  - doc/classes/TestNameCase.src/CVS
+  - doc/classes/TestNameCase.src/M000001.html
+  - doc/classes/TestNameCase.src/M000002.html
+  - doc/classes/TestNameCase.src/M000003.html
+  - doc/classes/TestNameCase.src/M000004.html
+  - doc/classes/TestNameCase.src/M000005.html
+  - doc/classes/TestNameCase.src/CVS/Entries
+  - doc/classes/TestNameCase.src/CVS/Repository
+  - doc/classes/TestNameCase.src/CVS/Root
+  - doc/CVS/Entries
+  - doc/CVS/Repository
+  - doc/CVS/Root
+  - doc/files/CVS
+  - doc/files/lib
+  - doc/files/README.html
+  - doc/files/test
+  - doc/files/CVS/Entries
+  - doc/files/CVS/Repository
+  - doc/files/CVS/Root
+  - doc/files/lib/CVS
+  - doc/files/lib/namecase_rb.html
+  - doc/files/lib/CVS/Entries
+  - doc/files/lib/CVS/Repository
+  - doc/files/lib/CVS/Root
+  - doc/files/test/CVS
+  - doc/files/test/test_namecase_rb.html
+  - doc/files/test/CVS/Entries
+  - doc/files/test/CVS/Repository
+  - doc/files/test/CVS/Root
+  - README
+test_files: 
+  - test/test_namecase.rb
+rdoc_options: []
+extra_rdoc_files: 
+  - README
+executables: []
+extensions: []
+requirements: []
+dependencies: []