diff --git a/.local/share/common-lisp/source/ambrevar/emacs.lisp b/.local/share/common-lisp/source/ambrevar/emacs.lisp index 24d7dc63..db0755d8 100644 --- a/.local/share/common-lisp/source/ambrevar/emacs.lisp +++ b/.local/share/common-lisp/source/ambrevar/emacs.lisp @@ -100,9 +100,10 @@ Example: "See `emacs-eval'." (let ((*package* (find-package :ambrevar/emacs))) (funcall caller "emacsclient" "-e" - (let ((*print-case* :downcase)) - (format nil "'~s'" `(progn - ,@s-exp)))))) + (list + (let ((*print-case* :downcase)) + (format nil "~s" `(progn + ,@s-exp))))))) (export-always 'emacs-eval) (defun emacs-eval (&rest s-exp)