[Tclxml-users] Serialisation details

[Derek F. <fo...@hu...>]

Given a small piece of XML like this:

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<?xml-stylesheet type="text/xsl" href="test_view.xsl"?>
<!DOCTYPE test SYSTEM "test.dtd">
<test />

I serialise it using Activetcl-8.3.4.3 and tcldom-2.2 with this:

#!/bin/sh
# \
exec tclsh8.3 "$0" "$@"

package require xml
package require dom

while {[gets stdin line] != -1} {
    append xml $line
}
set doc [::dom::DOMImplementation parse $xml]
puts [::dom::DOMImplementation serialize $doc]

which prints me this:

<?xml version='1.0'?>
<!DOCTYPE test>
<test/>

Lots of detail has disappeared. What do I need to do to get the detail back?

-- 
The past: Smart users in front of dumb terminals