[slime-cvs] CVS slime

trittweiler trittweiler at common-lisp.net
Sat Sep 8 22:13:24 UTC 2007


Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv10806

Modified Files:
	slime.el 
Log Message:

Fix message displaying on XEmacs. Reported by Steven E. Harris,
and Ken Causey.
	
* slime.el (slime-display-message): Resurrect secondary
  `buffer-name' argument which got lost in 2007-08-24.
  (slime-format-display-message): Resurrect passing "*SLIME Note*"
  as default buffer-name to `slime-display-message'.


--- /project/slime/cvsroot/slime/slime.el	2007/09/06 21:22:19	1.851
+++ /project/slime/cvsroot/slime/slime.el	2007/09/08 22:13:24	1.852
@@ -951,9 +951,9 @@
   (setq slime-message-function 'slime-format-display-message))
 
 (defun slime-format-display-message (format &rest args)
-  (slime-display-message (apply #'format format args)))
+  (slime-display-message (apply #'format format args) "*SLIME Note*"))
 
-(defun slime-display-message (message) 
+(defun slime-display-message (message buffer-name) 
   "Display MESSAGE in the echo area or in BUFFER-NAME.
 Use the echo area if MESSAGE needs only a single line.  If the MESSAGE
 requires more than one line display it in BUFFER-NAME and add a hook




More information about the slime-cvs mailing list