--- a/core/builtins/dialog.cif	Mon Sep 20 16:46:34 2010 +0100
+++ b/core/builtins/dialog.cif	Wed Sep 22 10:56:39 2010 +0100
@@ -60,3 +60,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