From 90c3c164e0846eb673012cd2eb14357d7e3a71ea Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Fri, 22 Jan 1999 13:23:12 +0000
Subject: [PATCH] In unpackevent, get the direct object (----) before asking
 for missed parameters. The documentation is unclear on this, but the old
 implementation caused problems with Default Folder.

---
 Mac/Lib/lib-toolbox/aetools.py | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Mac/Lib/lib-toolbox/aetools.py b/Mac/Lib/lib-toolbox/aetools.py
index dde82b59d8f..792cb728fa6 100644
--- a/Mac/Lib/lib-toolbox/aetools.py
+++ b/Mac/Lib/lib-toolbox/aetools.py
@@ -58,6 +58,13 @@ def missed(ae):
 
 def unpackevent(ae):
 	parameters = {}
+	try:
+		dirobj = ae.AEGetParamDesc('----', '****')
+	except AE.Error:
+		pass
+	else:
+		parameters['----'] = unpack(dirobj)
+		del dirobj
 	while 1:
 		key = missed(ae)
 		if not key: break