diff --git a/scheme/job-viewer.scm b/scheme/job-viewer.scm
index 7226e6f..384bd70 100644
--- a/scheme/job-viewer.scm
+++ b/scheme/job-viewer.scm
@@ -213,9 +213,9 @@
 		"-"))
 	  (#f "run status:"
 	      ,(format-job-run-state job))
-	  ,(if (job-with-console? job)
-	       `(,console-viewer "<View Console>" "")
-	       '())))
+	  ,@(if (job-with-console? job)
+		`((,console-viewer "<View Console>" ""))
+		'())))
        (- (result-buffer-num-lines buffer) 1)))
 
     (define (handle-key-press self key control-x-pressed?)