c6d09a58d6
If an old port is resurrected to work with current version code, its files can be relocated to the appropriate sys or win folder as required. In the meantime, the burden of upkeep can be avoided for the stuff in the outdated folder for now.
30 lines
829 B
C
30 lines
829 B
C
/* NetHack 3.6 mmodal.c $NHDT-Date: 1432512797 2015/05/25 00:13:17 $ $NHDT-Branch: master $:$NHDT-Revision: 1.11 $ */
|
|
/* Copyright (c) Jon W{tte, Hao-Yang Wang, Jonathan Handler 1992. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#if 1 /*!TARGET_API_MAC_CARBON*/
|
|
#include <Dialogs.h>
|
|
#include <ControlDefinitions.h>
|
|
#else
|
|
#include <Carbon/Carbon.h>
|
|
#endif
|
|
|
|
#include "macpopup.h"
|
|
|
|
/* Flash a dialog button when its accelerator key is pressed */
|
|
void
|
|
FlashButton(DialogRef wind, short item)
|
|
{
|
|
short type;
|
|
Handle handle;
|
|
Rect rect;
|
|
unsigned long ticks;
|
|
|
|
/* Apple recommends 8 ticks */
|
|
GetDialogItem(wind, item, &type, &handle, &rect);
|
|
HiliteControl((ControlHandle) handle, kControlButtonPart);
|
|
Delay(8, &ticks);
|
|
HiliteControl((ControlHandle) handle, 0);
|
|
return;
|
|
}
|