From cb7dc7e9a85fafa4069ea7d9befc2b187aff4be9 Mon Sep 17 00:00:00 2001 From: das Date: Mon, 23 Feb 2004 12:03:18 +0000 Subject: * macosx/tkMacOSXMouseEvent.c: fixed modifiers for MouseWheel events. * macosx/Wish.pbproj/project.pbxproj: * macosx/tkAboutDlg.r: changed year in copyright strings to 2004. --- ChangeLog | 7 +++++++ macosx/Wish.pbproj/project.pbxproj | 2 +- macosx/tkAboutDlg.r | 4 ++-- macosx/tkMacOSXMouseEvent.c | 1 + 4 files changed, 11 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 1c74037..265ec73 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,12 @@ 2004-02-23 Daniel Steffen + * macosx/tkMacOSXMouseEvent.c: fixed modifiers for MouseWheel events. + + * macosx/Wish.pbproj/project.pbxproj: + * macosx/tkAboutDlg.r: changed year in copyright strings to 2004. + +2004-02-23 Daniel Steffen + * macosx/tkMacOSXDraw.c: * macosx/tkMacOSXXStubs.c: * xlib/ximage.c: fixed MacOSX XGetImage/XPutImage and related diff --git a/macosx/Wish.pbproj/project.pbxproj b/macosx/Wish.pbproj/project.pbxproj index fe917ed..b965269 100644 --- a/macosx/Wish.pbproj/project.pbxproj +++ b/macosx/Wish.pbproj/project.pbxproj @@ -3333,7 +3333,7 @@ MacOS X Port by Jim Ingham <jingham@apple.com> & Ian Reid, Copyright CFBundleExecutable Wish Shell CFBundleGetInfoString - Wish Shell 8.5, Copyright © 2003 Tcl Core Team. + Wish Shell 8.5, Copyright © 2004 Tcl Core Team. MacOS X Port by Jim Ingham <jingham@apple.com> & Ian Reid, Copyright © 2001-2002, Apple Computer, Inc. CFBundleIconFile Wish.icns diff --git a/macosx/tkAboutDlg.r b/macosx/tkAboutDlg.r index 2935951..5603645 100644 --- a/macosx/tkAboutDlg.r +++ b/macosx/tkAboutDlg.r @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkAboutDlg.r,v 1.4 2003/03/21 01:43:58 das Exp $ + * RCS: @(#) $Id: tkAboutDlg.r,v 1.5 2004/02/23 12:03:20 das Exp $ */ /* @@ -48,7 +48,7 @@ resource 'DITL' (128, "About Box", purgeable) { {200, 147, 220, 217}, Button {enabled, "Ok"}, { 20, 108, 180, 344}, StaticText {disabled, "Tcl " TCL_PATCH_LEVEL " & Tk " TK_PATCH_LEVEL "\n\n" - "© 2003 Tcl Core Team." "\n\n" + "© 2004 Tcl Core Team." "\n\n" "Jim Ingham & Ian Reid" "\n" "© 2001-2002 Apple Computer, Inc." "\n\n" "Jim Ingham & Ray Johnson" "\n" diff --git a/macosx/tkMacOSXMouseEvent.c b/macosx/tkMacOSXMouseEvent.c index 150519c..cab8a93 100644 --- a/macosx/tkMacOSXMouseEvent.c +++ b/macosx/tkMacOSXMouseEvent.c @@ -608,6 +608,7 @@ GenerateMouseWheelEvent(MouseEventData * medPtr) winPtr = ( TkWindow *)tkwin; xEvent.type = MouseWheelEvent; xEvent.xkey.keycode = medPtr->delta; + xEvent.xbutton.state = TkMacOSXButtonKeyState(); xEvent.xany.serial = LastKnownRequestProcessed(winPtr->display); xEvent.xany.send_event = false; xEvent.xany.display = winPtr->display; -- cgit v0.12