From 629424836d42c3af22be65ba3955e194ac7ea992 Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Wed, 26 Jun 2019 14:06:43 +0200 Subject: [PATCH] next: Don't use format for platform port path. --- .config/next/init.lisp | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/.config/next/init.lisp b/.config/next/init.lisp index 09bbfa56..963fd67e 100644 --- a/.config/next/init.lisp +++ b/.config/next/init.lisp @@ -2,8 +2,7 @@ ;; Use development platform port. (setf (get-default 'port 'path) - (format nil "~a/common-lisp/next/ports/gtk-webkit/next-gtk-webkit" - (uiop:getenv "HOME"))) + "~/common-lisp/next/ports/gtk-webkit/next-gtk-webkit") (setf (get-default 'remote-interface 'download-directory) "~/temp") @@ -24,7 +23,7 @@ 'blocker-mode 'hostlists) (defun eval-in-emacs (&rest s-exps) - "Evaluate S-EXPS with emacsclient." + "Evaluate S-exps with `emacsclient'." (let ((s-exps-string (cl-strings:replace-all (write-to-string `(progn ,@s-exps) :case :downcase)