Update of /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Scintilla
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14539/Win32-GUI-Scintilla
Modified Files:
Scintilla.PL
Log Message:
Fix build under Perl 5.6
Index: Scintilla.PL
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Scintilla/Scintilla.PL,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Scintilla.PL 16 Jul 2006 13:02:30 -0000 1.3
--- Scintilla.PL 15 Oct 2006 12:16:22 -0000 1.4
***************
*** 272,282 ****
# Build Scintilla interface
! # The 'crlf' perlio layer ensures that on cygwin we don't get thrown by
! # windows line endings
! open my $fh, "<:crlf" , $iface_file or die "Failed to open '$iface_file' for reading: $!";
while ( <$fh> )
{
! chomp;
#--- Constant ---
--- 272,283 ----
# Build Scintilla interface
! open my $fh, "<" , $iface_file or die "Failed to open '$iface_file' for reading: $!";
while ( <$fh> )
{
! #chomp;
! s/\r?\n$//; # throw away line endings - chomp on cygwin only removes '\n'
! # done this way in case dos2unix didn't get run on this file
! # - Scintilla.iface probably didn't get dealt with as a text file?
#--- Constant ---
|
