From 9935a2cdfc7875c4405741b780551a7ad2ab6399 Mon Sep 17 00:00:00 2001

From: Sergey Bolshakov <sbolshakov@altlinux.org>

Date: Tue, 26 Jun 2007 13:59:05 +0400

Subject: [PATCH 1/4] reverted fix for sf bug #596959, seems unneeded

---

 tclxml/tclxml-tcl/sgmlparser.tcl | 5 -----

 1 file changed, 5 deletions(-)

diff --git a/tclxml/tclxml-tcl/sgmlparser.tcl b/tclxml/tclxml-tcl/sgmlparser.tcl

index 2e15244..1da1d3b 100755

--- a/tclxml/tclxml-tcl/sgmlparser.tcl

+++ b/tclxml/tclxml-tcl/sgmlparser.tcl

@@ -155,11 +155,6 @@ proc sgml::tokenise {sgml elemExpr elemSub args} {

 	    set state(leftover) $rest

 	}

-	# Patch from bug report #596959, Marshall Rose

-	if {[string compare [lindex $sgml 4] ""]} {

-	    set sgml [linsert $sgml 0 {} {} {} {} {}]

-	}

-

     } else {

 	# Performance note (Tcl 8.0):

-- 

2.24.0