[Logilogi-svn] SF.net SVN: logilogi:[1556] trunk

Revision: 1556
          http://logilogi.svn.sourceforge.net/logilogi/?rev=1556&view=rev
Author:   wybow
Date:     2009-08-27 11:45:44 +0000 (Thu, 27 Aug 2009)

Log Message:
-----------
Fixed tag-bug

Modified Paths:
--------------
    trunk/app/models/tag.rb
    trunk/test/unit/tag_test.rb

Modified: trunk/app/models/tag.rb
===================================================================
--- trunk/app/models/tag.rb	2009-08-26 06:40:46 UTC (rev 1555)
+++ trunk/app/models/tag.rb	2009-08-27 11:45:44 UTC (rev 1556)
@@ -100,7 +100,7 @@
     end
     tag_string = tag_string.dup
     # add spaces before upper-case letters in WikiWords
-    tag_string.gsub!(/([^\s_.])([A-Z][\w-])/,'\1 \2')
+    tag_string.gsub!(/([^\s_.])([A-Z][a-z-])/,'\1 \2')
     # replace spaces by underscores
     tag_string.gsub!(/\s/,'_')
     # add capitals after underscores

Modified: trunk/test/unit/tag_test.rb
===================================================================
--- trunk/test/unit/tag_test.rb	2009-08-26 06:40:46 UTC (rev 1555)
+++ trunk/test/unit/tag_test.rb	2009-08-27 11:45:44 UTC (rev 1556)
@@ -34,6 +34,19 @@
     no_upper = Tag.from_s('no upper')
     assert_equal 'No_Upper', no_upper.string
 
+    all_upper = Tag.from_s('LIRMM')
+    assert_equal 'LIRMM', all_upper.string
+
+    abbrev_upper = Tag.from_s('W.C.')
+    assert_equal 'W.C.', abbrev_upper.string
+
+    strange_case_string = 'Le_TsT_EsT.T.hisWELL'
+    strange_case = Tag.from_s('LeTsTEsT.T.hisWELL')
+    assert_equal strange_case_string, strange_case.string
+
+    stranger_case = Tag.from_s(strange_case.string)
+    assert_equal strange_case_string, stranger_case.string
+
     camel_case = Tag.from_s('CamelCase')
     assert_equal 'Camel_Case', camel_case.string
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.