ports/devel/tcllib/files/patch-jpeg
Mikhail Teterin 17340ce55c Upgrade from 1.10 to 1.11. (One of the self-tests is failing on my
system, but not on others...)

PR:	131670
Submitted by:	Pierre DAVID
2009-02-28 23:59:00 +00:00

9 lines
325 B
Text

--- modules/jpeg/jpeg.tcl 2008-10-17 01:14:26.000000000 -0400
+++ modules/jpeg/jpeg.tcl 2009-02-27 15:45:23.000000000 -0500
@@ -52,5 +52,5 @@
proc ::jpeg::imageInfo {file} {
- set fh [openJFIF $file r+]
+ set fh [openJFIF $file r]
set data {}
if {[set app0 [lsearch -inline [markers $fh] "e0 *"]] != ""} {