From 8e0b19cb751c3d9976d0a6414cffe9c733652f73 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 3 Jun 2021 12:55:27 -0700 Subject: WORDS: use DELETE Signed-off-by: Sean Whitton --- src/util.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/util.lisp') diff --git a/src/util.lisp b/src/util.lisp index 3675698..d1bfcab 100644 --- a/src/util.lisp +++ b/src/util.lisp @@ -47,7 +47,7 @@ (format nil "~{~A~%~}" lines)) (defun words (text) - (remove "" (split-string text) :test #'string=)) + (delete "" (split-string text) :test #'string=)) (defun unwords (words) (format nil "~{~A~^ ~}" words)) -- cgit v1.2.3