create *wisp2lisp* buffer if it does not exist yet
1 files changed, 1 insertions(+), 0 deletions(-)

M wisp-mode.el
M wisp-mode.el +1 -0
@@ 651,6 651,7 @@ color of the overlay, the mapped color i
   (interactive)
   (let ((current-line (line-number-at-pos)))
     (save-excursion
+      (get-buffer-create "*wisp2lisp*")
       (set-buffer "*wisp2lisp*")
       (erase-buffer)
       (scheme-mode))