Forget my previous posting, should read the docs more carefully :-)
This was my missing: -reportempty 1
Cheers Oliver
----- Original Message -----
From: "oliver" <oli...@gm...>
To: <tcl...@li...>
Sent: Friday, July 11, 2003 1:04 AM
Subject: empty element syntax (tclxml2.6)
> Hi list,
>
> I don't get this additional argument '-empty boolean' when reading an xml
> source:
> What am I doing wrong?
>
> Regards Oliver
>
> XML-Source:
> <?xml version="1.0"?>
> <menue>
> <menu/>
> <menu/>
> <menu/>
> </menue>
>
> TCL-Source:
> package require xml
>
> proc ElementEndCmd {name_ args} {
> puts "$name_ $args"
> }
>
> proc ElementStartCmd {name_ attList_ args} {
> puts "$name_ $attList_ $args"
> }
>
> set parser [::xml::parser\
> -elementendcommand ElementEndCmd\
> -elementstartcommand ElementStartCmd]
> set file [file join c:/ pia menutest.xml]
> set fh [open $file r]
> $parser parse [read $fh]
> close $fh
>
|
