--- nfo/perl/libs/XML/XUpdate/Rewrite.pm	2003/05/06 14:36:48	1.1
+++ nfo/perl/libs/XML/XUpdate/Rewrite.pm	2003/12/05 05:05:53	1.2
@@ -4,9 +4,12 @@
 #
 # By Andreas Motl, andreas.motl@ilo.de
 #
-#    $Id: Rewrite.pm,v 1.1 2003/05/06 14:36:48 joko Exp $
+#    $Id: Rewrite.pm,v 1.2 2003/12/05 05:05:53 joko Exp $
 #
 #    $Log: Rewrite.pm,v $
+#    Revision 1.2  2003/12/05 05:05:53  joko
+#    + minor fix - use IO::File instead if plain IO
+#
 #    Revision 1.1  2003/05/06 14:36:48  joko
 #    initial commit - preliminary (didn't work out as expected)
 #
@@ -22,8 +25,8 @@
 
 =head1 VERSION
 
-    $Revision: 1.1 $
-    $Date: 2003/05/06 14:36:48 $
+    $Revision: 1.2 $
+    $Date: 2003/12/05 05:05:53 $
   
 =head1 DESCRIPTION
 
@@ -175,7 +178,7 @@
   # V2 - using the classic XML::Parser together with its companion, XML::Writer
   if ($self->{options}->{engine} eq "XMLParser") {
 
-    use IO;
+    use IO::File;
     my $output = IO::File->new(">output.xml");
 
     # These return instances which are not required. => overhead!