summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Mac/Python/macglue.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c
index bcfe09e..8fdbc23 100644
--- a/Mac/Python/macglue.c
+++ b/Mac/Python/macglue.c
@@ -482,8 +482,8 @@ scan_event_queue(flush)
int flush;
{
#if TARGET_API_MAC_CARBON
- /* CARBONXXXX To be implemented */
- return;
+ if ( CheckEventQueueForUserCancel() )
+ interrupted = 1;
#else
register EvQElPtr q;