X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/blobdiff_plain/f06dee7a808657fb76221b5860d5907d65249ef5..62d12c1f34abd2aaa7e41a480f9cc3d1c651531a:/lisp-init.lisp?ds=sidebyside

diff --git a/lisp-init.lisp b/lisp-init.lisp
index 2253aab..8da623d 100644
--- a/lisp-init.lisp
+++ b/lisp-init.lisp
@@ -8,6 +8,9 @@ (setf *load-verbose* nil)
 (setf *compile-verbose* nil)
 #+cmu (setf *gc-verbose* nil)
 
+;; Various fixings.
+#+clisp (setf custom:*parse-namestring-ansi* t)
+
 ;; Start up swank.
 (defun mdw-hacks:crank-swank (&rest #1=#:args)
   (let ((#2=#:swank #3=(find-package "SWANK")))