[slime-cvs] CVS slime

[CVS User trittweiler]

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

Modified Files:
	ChangeLog slime.el 
Log Message:
	* slime.el (sldb-mode): Include some more commands in its help.
	(sldb-goto-last-frame): Do not center to the middle but to the
	bottom of the window.


--- /project/slime/cvsroot/slime/ChangeLog	2010/04/14 17:51:56	1.2065
+++ /project/slime/cvsroot/slime/ChangeLog	2010/04/15 18:01:13	1.2066
@@ -1,3 +1,9 @@
+2010-04-15  Tobias C. Rittweiler <tcr at freebits.de>
+
+	* slime.el (sldb-mode): Include some more commands in its help.
+	(sldb-goto-last-frame): Do not center to the middle but to the
+	bottom of the window.
+
 2010-04-14  Helmut Eller  <heller at common-lisp.net>
 
 	* swank.lisp (compile-file-for-emacs): Actually commit the change
--- /project/slime/cvsroot/slime/slime.el	2010/04/14 17:51:47	1.1300
+++ /project/slime/cvsroot/slime/slime.el	2010/04/15 18:01:13	1.1301
@@ -5341,19 +5341,25 @@
    \\[sldb-abort]   - abort
    \\[sldb-continue]   - continue
    \\[sldb-invoke-restart-0]-\\[sldb-invoke-restart-9] - restart shortcuts
+   \\[sldb-invoke-restart-by-name]   - invoke restart by name
 
 Commands to navigate frames:
    \\[sldb-down]   - down
    \\[sldb-up]   - up
    \\[sldb-details-down] - down, with details
    \\[sldb-details-up] - up, with details
+   \\[sldb-cycle] - cycle between restarts & backtrace
+   \\[sldb-beginning-of-backtrace]   - beginning of backtrace
+   \\[sldb-end-of-backtrace]   - end of backtrace
 
 Miscellaneous commands:
    \\[sldb-restart-frame]   - restart frame
    \\[sldb-return-from-frame]   - return from frame
    \\[sldb-step]   - step
-   \\[sldb-break-with-default-debugger]   - switch to default debugger
+   \\[sldb-break-with-default-debugger]   - switch to native debugger
+   \\[sldb-break-with-system-debugger]   - switch to system debugger (gdb)
    \\[slime-interactive-eval]   - eval
+   \\[sldb-inspect-condition]   - inspect signalled condition
 
 Full list of commands:
 
@@ -5700,7 +5706,10 @@
 (defun sldb-goto-last-frame ()
   (goto-char (point-max))
   (while (not (get-text-property (point) 'frame))
-    (goto-char (previous-single-property-change (point) 'frame))))
+    (goto-char (previous-single-property-change (point) 'frame))
+    ;; Recenter to bottom of the window; -2 to account for the
+    ;; empty last line displayed in sldb buffers.
+    (recenter -2)))
 
 (defun sldb-beginning-of-backtrace ()
   "Goto the first frame."