Adapted to new event handling. It is now also possible to abort out of

an AESend with command-. (unless specifically disabled, of course).

Mac/Modules/ae/AEmodule.c

@@ -72,7 +72,12 @@ AEEventHandlerUPP upp_GenericEventHandler;
 
 static pascal Boolean AEIdleProc(EventRecord *theEvent, long *sleepTime, RgnHandle *mouseRgn)
 {
-	PyMac_Yield();
+	if ( PyOS_InterruptOccurred() )
+		return 1;
+	if ( PyMac_HandleEvent(theEvent) < 0 ) {
+		fprintf(stderr, "Exception in user event handler during AE processing\n");
+		PyErr_Clear();
+	}
 	return 0;
 }
 

Mac/Modules/ae/aesupport.py

@@ -111,7 +111,12 @@ AEEventHandlerUPP upp_GenericEventHandler;
 
 static pascal Boolean AEIdleProc(EventRecord *theEvent, long *sleepTime, RgnHandle *mouseRgn)
 {
-	PyMac_Yield();
+	if ( PyOS_InterruptOccurred() )
+		return 1;
+	if ( PyMac_HandleEvent(theEvent) < 0 ) {
+		fprintf(stderr, "Exception in user event handler during AE processing\\n");
+		PyErr_Clear();
+	}
 	return 0;
 }