From 1214dfd8f653294b2a7dc091a3844880d94b83cc Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Fri, 28 Jan 2011 22:12:53 +0100 Subject: [PATCH] When dumping the help file, we have to use ECL's syntax, which forces packag prefixes and '::' --- src/lsp/helpfile.lsp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/lsp/helpfile.lsp b/src/lsp/helpfile.lsp index 1ebfc53ca..b3c8b57a9 100644 --- a/src/lsp/helpfile.lsp +++ b/src/lsp/helpfile.lsp @@ -52,8 +52,10 @@ (setq entries (sort entries #'string-lessp :key #'car)) (let* ((*package* (find-package "CL")) (file (open path :direction :output))) - (dolist (l entries) - (format file "~A~S~%~S~%" #\^_ (car l) (rest l))) + (progv (car +ecl-syntax-progv-list+) + (cdr +ecl-syntax-progv-list+) + (dolist (l entries) + (format file "~A~S~%~S~%" #\^_ (car l) (rest l)))) (close file) path)))