cvs commit: xml-axkit/lib AxKit.pm

[matts]

matts       2003/08/11 00:38:18

  Modified:    lib      AxKit.pm
  Log:
  Fixed broken sysopen() function (Alex Sergeyev)
  
  Revision  Changes    Path
  1.50      +2 -2      xml-axkit/lib/AxKit.pm
  
  Index: AxKit.pm
  ===================================================================
  RCS file: /home/cvs/xml-axkit/lib/AxKit.pm,v
  retrieving revision 1.49
  retrieving revision 1.50
  diff -u -r1.49 -r1.50
  --- AxKit.pm  21 Jul 2003 15:29:50 -0000      1.49
  +++ AxKit.pm  11 Aug 2003 07:38:18 -0000      1.50
  @@ -42,7 +42,7 @@
   }
   sub sysopen(*$$;$) {
        my $res = CORE::sysopen($_[0],$_[1],$_[2]);
  -     binmode($_[0],($] >= 5.008?(':'.($_[2]||'utf8')):()));
  +     binmode($_[0],($] >= 5.008?(':'.($_[3]||'utf8')):()));
        return $res;
   }