[CF-Devel] Patch: collect_images.pl

[crossfire-devel at archives.real-time.com]

Hello.
Just a small patch to make lib/adm/collect_images.pl work under Windows.
Basically just force the file mode to 'binary' using 'binarymode' 
(apparently Windows's default mode is not binary :))

Nicolas 'Ryo'
-------------- next part --------------
Index: lib/adm/collect_images.pl
===================================================================
RCS file: /cvsroot/crossfire/crossfire/lib/adm/collect_images.pl,v
retrieving revision 1.6
diff -u -r1.6 collect_images.pl
--- lib/adm/collect_images.pl	13 Sep 2003 05:02:06 -0000	1.6
+++ lib/adm/collect_images.pl	28 Nov 2003 18:44:26 -0000
@@ -55,6 +55,7 @@
     $fh = $ESRV[$count];
     open($fh, ">crossfire.$count") ||
 	die("Can't open crossfire.$count for write: $!\n");
+	binmode( $fh );
 }
 
 open(BMAPS,"bmaps.paths") || die("Can't open bmaps.paths: $!\n");
@@ -84,6 +85,7 @@
 
 	$length = -s "$filename";
 	if (open(FILE,"$filename")) {
+		binmode( FILE );
 	    print $fh "IMAGE $num $length $file.$file1\n";
 	    print "Error reading file $filename" if (!read(FILE, $buf, $length));
 	    $position = tell $fh;
-------------- next part --------------
_______________________________________________
crossfire-devel mailing list
     
     crossfire-devel at lists.real-time.com
     
     
     https://mailman.real-time.com/mailman/listinfo/crossfire-devel