[slime-cvs] CVS slime/contrib

[CVS User heller]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv13583/contrib

Modified Files:
	ChangeLog swank-c-p-c.lisp 
Log Message:
* swank-c-p-c.lisp (parse-completion-arguments): Change the
package identifier from the string "KEYWORD" to the
form (symbol-name :keyword) for ACL's "modern" mode.

--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/10/31 13:52:16	1.140
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/11/22 12:19:26	1.141
@@ -1,3 +1,9 @@
+2008-11-22  Geoff Wozniak <geoff at wozniak.ca>
+
+	* swank-c-p-c.lisp (parse-completion-arguments): Change the
+	package identifier from the string "KEYWORD" to the
+	form (symbol-name :keyword) for ACL's "modern" mode.
+
 2008-10-31  Nikodemus Siivola <nikodemus at random-state.net>
 
 	* swank-presentation-streams.liso (slime-stream-p): delete
--- /project/slime/cvsroot/slime/contrib/swank-c-p-c.lisp	2007/09/05 19:35:35	1.2
+++ /project/slime/cvsroot/slime/contrib/swank-c-p-c.lisp	2008/11/22 12:19:26	1.3
@@ -136,7 +136,7 @@
       (tokenize-symbol string)
     (if package-name
 	(let ((package (guess-package (if (equal package-name "")
-					  "KEYWORD"
+					  (symbol-name :keyword)
 					  package-name))))
 	  (values name package-name package internal-p))
 	(let ((package (guess-package default-package-name)))