[slime-cvs] CVS slime/contrib

CVS User trittweiler trittweiler at common-lisp.net
Fri Feb 27 18:07:14 UTC 2009


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

Modified Files:
	ChangeLog bridge.el slime-presentations.el 
Log Message:
	* bridge.el: Replace old-style backquoting.

	* slime-presentations.el
	(slime-presentation-sldb-insert-frame-variable-value): Fix typo.

	Patch by Stelian Ionescu.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2009/02/27 17:37:14	1.180
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2009/02/27 18:07:14	1.181
@@ -1,5 +1,14 @@
 2009-02-27  Tobias C. Rittweiler  <tcr at freebits.de>
 
+	* bridge.el: Replace old-style backquoting.
+
+	* slime-presentations.el
+	(slime-presentation-sldb-insert-frame-variable-value): Fix typo.
+
+	Patch by Stelian Ionescu.
+
+2009-02-27  Tobias C. Rittweiler  <tcr at freebits.de>
+
 	* slime-autodoc.el, slime-c-p-c.el, slime-enclosing-context.el
 	* slime-package-fu.el, slime-parse.el, slime-presentations.el
 	* slime-xref-browser: Rename `slime-symbol-name-at-point' to
--- /project/slime/cvsroot/slime/contrib/bridge.el	2007/09/19 11:47:03	1.1
+++ /project/slime/cvsroot/slime/contrib/bridge.el	2009/02/27 18:07:14	1.2
@@ -185,9 +185,9 @@
        (message "bridge-handler \"%s\" failed %s (see bridge-last-failure)"
 		handler err)
        (setq bridge-last-failure
-	     (` ((funcall '(, handler) '(, proc) (, string))
-		 "Caused: "
-		 (, err))))))
+             `((funcall ',handler ',proc ,string)
+               "Caused: "
+               ,err))))
     (not failed)))
 
 ;;;%Handlers
--- /project/slime/cvsroot/slime/contrib/slime-presentations.el	2009/02/27 17:37:14	1.22
+++ /project/slime/cvsroot/slime/contrib/slime-presentations.el	2009/02/27 18:07:14	1.23
@@ -840,7 +840,7 @@
 (defun slime-presentation-sldb-insert-frame-variable-value (value frame index)
   (slime-insert-presentation
    (in-sldb-face local-value value)
-   `(:frame-var ,slime-current-thread ,(car frame) ,i) t))
+   `(:frame-var ,slime-current-thread ,(car frame) ,index) t))
 
 ;;; Initialization
 





More information about the slime-cvs mailing list