From ed00691544c3b6d4ad15b1c7ef975964ea72b0b6 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Sun, 30 Aug 2015 10:58:38 +0100 Subject: [PATCH] doc/list-exports.lisp: Better pretty formatting for keywords. --- doc/list-exports.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/doc/list-exports.lisp b/doc/list-exports.lisp index 50861f9..ef10b00 100644 --- a/doc/list-exports.lisp +++ b/doc/list-exports.lisp @@ -153,7 +153,8 @@ (let* ((pkg (symbol-package symbol)) (exportp (member symbol (list-exported-symbols pkg)))) (format nil "~(~:[~A:~:[:~;~]~;~2*~]~A~)" - (and exportp (eq pkg package)) (best-package-name pkg) + (and exportp (eq pkg package)) + (if (keywordp symbol) "" (best-package-name pkg)) exportp (symbol-name symbol)))) (defun analyse-classes (package) -- 2.11.0