diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2002-06-14 13:35:46 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2002-06-14 13:35:46 (GMT) |
commit | 8abf69416e48492ccda18dcfc6e8adf9d33d0a32 (patch) | |
tree | c4ad54b29f443e940a51b7b0ca0a9c57e5b65adc /generic/tkImgPPM.c | |
parent | 8c18f8111d03425255bcd1d60b70da5c9ae5f521 (diff) | |
download | tk-8abf69416e48492ccda18dcfc6e8adf9d33d0a32.zip tk-8abf69416e48492ccda18dcfc6e8adf9d33d0a32.tar.gz tk-8abf69416e48492ccda18dcfc6e8adf9d33d0a32.tar.bz2 |
TIP#98 implementation; improved photo image copy and GIF frame access
Diffstat (limited to 'generic/tkImgPPM.c')
-rw-r--r-- | generic/tkImgPPM.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tkImgPPM.c b/generic/tkImgPPM.c index ab99679..9715cf4 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.9 2002/02/19 16:30:26 dkf Exp $ + * RCS: @(#) $Id: tkImgPPM.c,v 1.10 2002/06/14 13:35:48 dkf Exp $ */ #define USE_OLD_IMAGE @@ -228,7 +228,8 @@ FileReadPPM(interp, chan, fileName, formatString, imageHandle, destX, destY, } } block.height = nLines; - Tk_PhotoPutBlock(imageHandle, &block, destX, destY, width, nLines); + Tk_PhotoPutBlock(imageHandle, &block, destX, destY, width, nLines, + TK_PHOTO_COMPOSITE_SET); destY += nLines; } |