From 1f49d2653ff86b747b5dd93c478347abe2770c7c Mon Sep 17 00:00:00 2001 From: Mike Clarke Date: Wed, 27 May 2015 09:53:21 +0100 Subject: [PATCH] Use LispWorks-compatible Unicode char literal --- src/buildnode.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/buildnode.lisp b/src/buildnode.lisp index 30d95bf..d1fda44 100644 --- a/src/buildnode.lisp +++ b/src/buildnode.lisp @@ -4,7 +4,7 @@ ;;;; Common string util, stoplen from adwutils (defparameter +common-white-space-trimbag+ '(#\space #\newline #\return #\tab - #\u00A0 ;; this is #\no-break_space + #\u+00A0 ;; this is #\no-break_space )) (defun trim-whitespace (s)