diff --git a/src/cmp/cmpwt.lsp b/src/cmp/cmpwt.lsp
index 709d1391b..809f50c3a 100644
--- a/src/cmp/cmpwt.lsp
+++ b/src/cmp/cmpwt.lsp
@@ -111,7 +111,7 @@
 	  ((char= x #\")
 	   (princ "\\\"" stream))
 	  (t (princ x stream)))))
-    (princ (if one-liner " \"" #\" stream))
+    (princ (if one-liner #\"  " \"" stream))
     string))
 
 ;;; ======================================================================