[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