[Tkabber-dev] [tclxmpp] r123 committed - * examples/rssbot.tcl: Fixed processing uppercase tags in HTML descri...

codesite-noreply at google.com codesite-noreply at google.com
Sun Oct 11 10:40:04 MSD 2009


Revision: 123
Author: sgolovan
Date: Sat Oct 10 23:38:51 2009
Log: 	* examples/rssbot.tcl: Fixed processing uppercase tags in HTML  
descriptions.

http://code.google.com/p/tclxmpp/source/detail?r=123

Modified:
  /trunk/ChangeLog
  /trunk/examples/rssbot.tcl

=======================================
--- /trunk/ChangeLog	Sat Oct 10 23:34:41 2009
+++ /trunk/ChangeLog	Sat Oct 10 23:38:51 2009
@@ -1,7 +1,7 @@
  2009-10-11  Sergei Golovan  <sgolovan at nes.ru>

  	* examples/rssbot.tcl: Fixed removing extra space characters from HTML
-	  descriptions.
+	  descriptions. Fixed processing uppercase tags in HTML descriptions.

  2009-10-10  Sergei Golovan  <sgolovan at nes.ru>

=======================================
--- /trunk/examples/rssbot.tcl	Sat Oct 10 23:34:41 2009
+++ /trunk/examples/rssbot.tcl	Sat Oct 10 23:38:51 2009
@@ -1059,7 +1059,7 @@

      regsub -all {\s+} [::htmlparse::mapEscapes $cdata] { } cdata

-    switch -glob -- $tag:$slash {
+    switch -glob -- [string tolower $tag]:$slash {
          p: -
          br: {
              append text "\n" $cdata


More information about the Tkabber-dev mailing list