[Tkabber-dev] [tclxmpp] r122 committed - * examples/rssbot.tcl: Fixed removing extra space characters from HTM...

codesite-noreply at google.com codesite-noreply at google.com
Sun Oct 11 10:35:01 MSD 2009


Revision: 122
Author: sgolovan
Date: Sat Oct 10 23:34:41 2009
Log: 	* examples/rssbot.tcl: Fixed removing extra space characters from HTML
	  descriptions.

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

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

=======================================
--- /trunk/ChangeLog	Sat Oct 10 10:57:46 2009
+++ /trunk/ChangeLog	Sat Oct 10 23:34:41 2009
@@ -1,3 +1,8 @@
+2009-10-11  Sergei Golovan  <sgolovan at nes.ru>
+
+	* examples/rssbot.tcl: Fixed removing extra space characters from HTML
+	  descriptions.
+
  2009-10-10  Sergei Golovan  <sgolovan at nes.ru>

  	* examples/rssbot.tcl: Get XML encoding from XML document itself and
=======================================
--- /trunk/examples/rssbot.tcl	Sat Oct 10 10:57:46 2009
+++ /trunk/examples/rssbot.tcl	Sat Oct 10 23:34:41 2009
@@ -1057,7 +1057,7 @@
  proc rssbot::processHTTPTag {level var tag slash attrs cdata} {
      upvar #$level $var text

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

      switch -glob -- $tag:$slash {
          p: -


More information about the Tkabber-dev mailing list