# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1103026691 0
# Node ID eb752b1a84b11c1325f062018aa5cf8f8e1f6b45
# Parent  2a281af9d3ad5ed6addf148b8331f280e5f8eb9d
(beginning-of-defun, end-of-defun): Don't
use inhibit-mark-movement.

diff -r 2a281af9d3ad -r eb752b1a84b1 lisp/emacs-lisp/lisp.el
--- a/lisp/emacs-lisp/lisp.el	Tue Dec 14 12:17:43 2004 +0000
+++ b/lisp/emacs-lisp/lisp.el	Tue Dec 14 12:18:11 2004 +0000
@@ -192,8 +192,7 @@
 If variable `beginning-of-defun-function' is non-nil, its value
 is called as a function to find the defun's beginning."
   (interactive "p")
-  (or inhibit-mark-movement
-      (not (eq this-command 'beginning-of-defun))
+  (or (not (eq this-command 'beginning-of-defun))
       (eq last-command 'beginning-of-defun)
       (and transient-mark-mode mark-active)
       (push-mark))
@@ -245,8 +244,7 @@
 If variable `end-of-defun-function' is non-nil, its value
 is called as a function to find the defun's end."
   (interactive "p")
-  (or inhibit-mark-movement
-      (not (eq this-command 'end-of-defun))
+  (or (not (eq this-command 'end-of-defun))
       (eq last-command 'end-of-defun)
       (and transient-mark-mode mark-active)
       (push-mark))