Add missing progn in macro

This has no effect on existing tests, which never passed more than one
body form, but it might be important for anyone else who wants to use
this macro.

test/ido-ubiquitous-test.el

@@ -72,7 +72,7 @@ end of input."
      (when (member (car C-g-key-sequence) key-sequence)
        (error "KEYS must include C-g"))
      (condition-case nil
-         ,@body
+         (progn ,@body)
        (quit
         (error "Reached end of simulated input while evaluating body")))))