/[cvs]/nfo/perl/libs/XML/XUpdate/Rewrite.pm
ViewVC logotype

Diff of /nfo/perl/libs/XML/XUpdate/Rewrite.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by joko, Tue May 6 14:36:48 2003 UTC revision 1.2 by joko, Fri Dec 5 05:05:53 2003 UTC
# Line 7  Line 7 
7  #    $Id$  #    $Id$
8  #  #
9  #    $Log$  #    $Log$
10    #    Revision 1.2  2003/12/05 05:05:53  joko
11    #    + minor fix - use IO::File instead if plain IO
12    #
13  #    Revision 1.1  2003/05/06 14:36:48  joko  #    Revision 1.1  2003/05/06 14:36:48  joko
14  #    initial commit - preliminary (didn't work out as expected)  #    initial commit - preliminary (didn't work out as expected)
15  #  #
# Line 175  sub process { Line 178  sub process {
178    # V2 - using the classic XML::Parser together with its companion, XML::Writer    # V2 - using the classic XML::Parser together with its companion, XML::Writer
179    if ($self->{options}->{engine} eq "XMLParser") {    if ($self->{options}->{engine} eq "XMLParser") {
180    
181      use IO;      use IO::File;
182      my $output = IO::File->new(">output.xml");      my $output = IO::File->new(">output.xml");
183    
184      # These return instances which are not required. => overhead!      # These return instances which are not required. => overhead!

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed