[Gd-chatter] r11631 - trunk/fundev/sources/environment/framework

[hannes at gwydiondylan.org]

Author: hannes
Date: Thu Jan 17 12:11:18 2008
New Revision: 11631

Modified:
   trunk/fundev/sources/environment/framework/error-handling.dylan
Log:
Job: fd
fix my last commit; as housel suggested.


Modified: trunk/fundev/sources/environment/framework/error-handling.dylan
==============================================================================
--- trunk/fundev/sources/environment/framework/error-handling.dylan	(original)
+++ trunk/fundev/sources/environment/framework/error-handling.dylan	Thu Jan 17 12:11:18 2008
@@ -66,7 +66,7 @@
   apply(notify-user, message,
 	title: product-name,
 	style: #"error",
-	owner: owner & frame-mapped?(owner))
+	owner: if (owner & frame-mapped?(owner)) owner end)
 end method do-environment-handler;