[slime-cvs] CVS update: slime/slime.el

[Helmut Eller]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv1923

Modified Files:
	slime.el 
Log Message:
(slime-find-buffer-package): Use "%s", not "%S", to avoid ugly escape
characters, if the package name contains dots.
Date: Sat Aug 14 15:09:34 2004
Author: heller

Index: slime/slime.el
diff -u slime/slime.el:1.390 slime/slime.el:1.391
--- slime/slime.el:1.390	Fri Aug 13 14:23:53 2004
+++ slime/slime.el	Sat Aug 14 15:09:34 2004
@@ -1907,7 +1907,7 @@
       (goto-char (match-end 0))
       (skip-chars-forward " \n\t\f\r#")
       (let ((pkg (ignore-errors (read (current-buffer)))))
-        (if pkg (format "%S" pkg))))))
+        (if pkg (format "%s" pkg))))))
 
 ;;; Synchronous requests is implemented in terms of asynchronous
 ;;; ones. We make an asynchronous request with a continuation function