+2009-11-27 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * progmodes/gud.el (gud-basic-call): Don't only save the buffer but
+ the excursion as well.
+
2009-11-27 Michael Albinus <michael.albinus@gmx.de>
* eshell/em-unix.el (eshell/su, eshell/sudo): New defuns,
* man.el (Man-completion-table): Trim a terminating "(".
Remove the space between name page a section.
Add the command's description on the `help-echo' property.
- Remove `process-connection-type' binding since it's unused by call-process.
+ Remove `process-connection-type' binding since it's unused by
+ call-process.
Provide completion for the "<section> <name>" format as well.
(Man-default-man-entry): Remove spurious var shadowing the argument.
(or proc (error "Current buffer has no process"))
;; Arrange for the current prompt to get deleted.
(with-current-buffer gud-comint-buffer
- (save-restriction
- (widen)
- (if (marker-position gud-delete-prompt-marker)
- ;; We get here when printing an expression.
- (goto-char gud-delete-prompt-marker)
- (goto-char (process-mark proc))
- (forward-line 0))
- (if (looking-at comint-prompt-regexp)
- (set-marker gud-delete-prompt-marker (point)))
- (if (eq gud-minor-mode 'gdbmi)
- (apply comint-input-sender (list proc command))
- (process-send-string proc (concat command "\n")))))))
+ (save-excursion
+ (save-restriction
+ (widen)
+ (if (marker-position gud-delete-prompt-marker)
+ ;; We get here when printing an expression.
+ (goto-char gud-delete-prompt-marker)
+ (goto-char (process-mark proc))
+ (forward-line 0))
+ (if (looking-at comint-prompt-regexp)
+ (set-marker gud-delete-prompt-marker (point)))
+ (if (eq gud-minor-mode 'gdbmi)
+ (apply comint-input-sender (list proc command))
+ (process-send-string proc (concat command "\n"))))))))
(defun gud-refresh (&optional arg)
"Fix up a possibly garbled display, and redraw the arrow."