]> code.delx.au - gnu-emacs/commitdiff
(beginning-of-defun-raw): Don't err when called at end of buffer.
authorKarl Heuer <kwzh@gnu.org>
Sat, 19 Mar 1994 04:07:37 +0000 (04:07 +0000)
committerKarl Heuer <kwzh@gnu.org>
Sat, 19 Mar 1994 04:07:37 +0000 (04:07 +0000)
lisp/emacs-lisp/lisp.el

index 3156ff39b35d9a7e4ecec5ecffa3a85e79fb6b6c..f5904be736481b1a27c3dfe4c16eecde9404d291 100644 (file)
@@ -145,7 +145,7 @@ open-parenthesis, and point ends up at the beginning of the line."
 This is identical to beginning-of-defun, except that point does not move
 to the beginning of the line when `defun-prompt-regexp' is non-nil."
   (interactive "p")
-  (and arg (< arg 0) (forward-char 1))
+  (and arg (< arg 0) (not (eobp)) (forward-char 1))
   (and (re-search-backward (if defun-prompt-regexp
                               (concat "^\\s(\\|"
                                       "\\(" defun-prompt-regexp "\\)\\s(")