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

[Luke Gorrie]

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

Modified Files:
	slime.el 
Log Message:
>From Eric Blood:
(slime-inspector-next-inspectable-object): New inspector command to
goto the next inspectable object (slot). Bound to TAB.

Date: Tue Jul 13 11:38:26 2004
Author: lgorrie

Index: slime/slime.el
diff -u slime/slime.el:1.361 slime/slime.el:1.362
--- slime/slime.el:1.361	Tue Jul 13 11:14:03 2004
+++ slime/slime.el	Tue Jul 13 11:38:26 2004
@@ -6357,6 +6357,13 @@
   (set-window-configuration slime-saved-window-config)
   (kill-buffer (current-buffer)))
 
+(defun slime-inspector-next-inspectable-object ()
+  "sets the point to the next inspectable object"
+  (interactive)
+  (let ((pos (next-single-property-change (point) 'slime-part-number)))
+    (when pos
+      (goto-char pos))))
+  
 (defun slime-inspector-describe ()
   (interactive)
   (slime-eval-describe `(swank:describe-inspectee)))
@@ -6370,6 +6377,7 @@
   (" " 'slime-inspector-next)
   ("d" 'slime-inspector-describe)
   ("q" 'slime-inspector-quit)
+  ("\C-i" 'slime-inspector-next-inspectable-object)
   ("\M-." 'slime-edit-definition))