diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2002-02-19 16:30:26 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2002-02-19 16:30:26 (GMT) |
| commit | c2ff4f3295816505cc6c8bc727bdb59a4600e9c6 (patch) | |
| tree | 94062d3833d55e33029a21882fd4c015278d324d /generic/tkImgPPM.c | |
| parent | c7d9b8120ab7ba175c080cf1e27fddbbf8a72eb0 (diff) | |
| download | tk-c2ff4f3295816505cc6c8bc727bdb59a4600e9c6.zip tk-c2ff4f3295816505cc6c8bc727bdb59a4600e9c6.tar.gz tk-c2ff4f3295816505cc6c8bc727bdb59a4600e9c6.tar.bz2 | |
Minor fixes as part of TIP#72 (and one just noticed in passing)
Diffstat (limited to 'generic/tkImgPPM.c')
| -rw-r--r-- | generic/tkImgPPM.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkImgPPM.c b/generic/tkImgPPM.c index 98c790b..ab99679 100644 --- a/generic/tkImgPPM.c +++ b/generic/tkImgPPM.c @@ -13,7 +13,7 @@ * Department of Computer Science, * Australian National University. * - * RCS: @(#) $Id: tkImgPPM.c,v 1.8 2001/09/14 20:35:58 andreas_kupries Exp $ + * RCS: @(#) $Id: tkImgPPM.c,v 1.9 2002/02/19 16:30:26 dkf Exp $ */ #define USE_OLD_IMAGE @@ -192,7 +192,7 @@ FileReadPPM(interp, chan, fileName, formatString, imageHandle, destX, destY, Tk_PhotoExpand(imageHandle, destX + width, destY + height); if (srcY > 0) { - Tcl_Seek(chan, (srcY * block.pitch), SEEK_CUR); + Tcl_Seek(chan, (Tcl_WideInt)(srcY * block.pitch), SEEK_CUR); } nLines = (MAX_MEMORY + block.pitch - 1) / block.pitch; |