diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-09-01 03:18:44 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-09-01 03:18:44 +0000 |
| commit | 5f68c1b73688b4bae978c83e13d84051474e1a74 (patch) | |
| tree | 84ed4307a25e1d02b68bf09d23044406dc4ea601 /lisp/progmodes/idlw-shell.el | |
| parent | 52199878ae82e1ae43fefe98dd83957bab4a1631 (diff) | |
| download | emacs-5f68c1b73688b4bae978c83e13d84051474e1a74.tar.gz | |
Use forward-line rather than goto-line.
Diffstat (limited to 'lisp/progmodes/idlw-shell.el')
| -rw-r--r-- | lisp/progmodes/idlw-shell.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/idlw-shell.el b/lisp/progmodes/idlw-shell.el index 40418d7ad7f..2f959464415 100644 --- a/lisp/progmodes/idlw-shell.el +++ b/lisp/progmodes/idlw-shell.el @@ -2790,7 +2790,8 @@ Runs to the last statement and then steps 1 statement. Use the .out command." (or (not bp-line) (funcall closer-func cur-line bp-line))) (setq bp-line cur-line)))) (unless bp-line (error "No further breakpoints")) - (goto-line bp-line))) + (goto-char (point-min)) + (forward-line (1- bp-line)))) ;; Examine Commands ------------------------------------------------------ |