Mercurial > emacs
changeset 10095:ace8ae9f015f
(gud-basic-call): Detect error earlier.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 30 Nov 1994 21:44:25 +0000 |
| parents | e36adc507c9b |
| children | f404f4123318 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Wed Nov 30 21:41:10 1994 +0000 +++ b/lisp/gud.el Wed Nov 30 21:44:25 1994 +0000 @@ -1213,7 +1213,7 @@ (gud-set-buffer) (let ((command (concat command "\n")) (proc (get-buffer-process gud-comint-buffer))) - + (or proc (error "Current buffer has no process")) ;; Arrange for the current prompt to get deleted. (save-excursion (set-buffer gud-comint-buffer)