--- a/core/builtins/dialog.cif	Wed Sep 15 00:45:50 2010 +0100
+++ b/core/builtins/dialog.cif	Fri Sep 17 20:24:30 2010 +0100
@@ -62,3 +62,9 @@
 
 Copyright (c) 2006-2010 Accenture. All rights reserved.
 
+==smoke-test
+
+# Don't actually post a dialog, the tests need to be unobtrusive (and non-blocking)
+export DIALOG_IMPL null
+dialog "Some question which isn't important"
+var ? == 0 || $Error