summaryrefslogtreecommitdiffstats
path: root/mac/tkMacColor.c
diff options
context:
space:
mode:
authorjingham <jingham@noemail.net>1998-11-11 17:28:50 (GMT)
committerjingham <jingham@noemail.net>1998-11-11 17:28:50 (GMT)
commit1e6b17b73a104a5e5c35c0097ed8f58ac692eab2 (patch)
tree993d1f2ceab5039b6806719996992d39b39829da /mac/tkMacColor.c
parente524a106f98fa7850e76a96cd4f35e58808bae1d (diff)
downloadtk-1e6b17b73a104a5e5c35c0097ed8f58ac692eab2.zip
tk-1e6b17b73a104a5e5c35c0097ed8f58ac692eab2.tar.gz
tk-1e6b17b73a104a5e5c35c0097ed8f58ac692eab2.tar.bz2
Make the Macintosh Menu's adopt the current Theme Appearance if the Appearance extension (version 1.0.1 or later) is installed
FossilOrigin-Name: 969e94cbbdf8d50cee7e2f4298810aa2a0c5610b
Diffstat (limited to 'mac/tkMacColor.c')
-rw-r--r--mac/tkMacColor.c10
1 files changed, 9 insertions, 1 deletions
diff --git a/mac/tkMacColor.c b/mac/tkMacColor.c
index 4de218d..d7ee825 100644
--- a/mac/tkMacColor.c
+++ b/mac/tkMacColor.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkMacColor.c,v 1.2 1998/09/14 18:23:34 stanton Exp $
+ * RCS: @(#) $Id: tkMacColor.c,v 1.3 1998/11/11 17:29:57 jingham Exp $
*/
#include <tkColor.h>
@@ -90,6 +90,8 @@ TkSetMacColor(
case MENU_TEXT_PIXEL:
GetMenuPartColor((pixel >> 24), macColor);
return true;
+ case APPEARANCE_PIXEL:
+ return false;
case PIXEL_MAGIC:
default:
macColor->blue = (unsigned short) ((pixel & 0xFF) << 8);
@@ -252,6 +254,12 @@ TkpGetColor(
GetMenuPartColor(MENU_TEXT_PIXEL, &rgbValue);
pixelCode = MENU_TEXT_PIXEL;
foundSystemColor = true;
+ } else if (!strcasecmp(name+6, "AppearanceColor")) {
+ color.red = 0;
+ color.green = 0;
+ color.blue = 0;
+ pixelCode = APPEARANCE_PIXEL;
+ foundSystemColor = true;
}
if (foundSystemColor) {