Compute freevars in cconv-analyse.

[bpt/emacs.git] / lisp / follow.el

diff --git a/lisp/follow.el b/lisp/follow.el
index a5463b8..7f4093d 100644 (file)
--- a/lisp/follow.el
+++ b/lisp/follow.el
@@ -1,7 +1,6 @@
 ;;; follow.el --- synchronize windows showing the same buffer
 
-;; Copyright (C) 1995, 1996, 1997, 1999, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1995-1997, 1999, 2001-2011 Free Software Foundation, Inc.
 
 ;; Author: Anders Lindgren <andersl@andersl.com>
 ;; Maintainer: FSF (Anders' email bounces, Sep 2005)
@@ -872,8 +871,7 @@ Returns (end-pos end-of-buffer-p)"
       ;; XEmacs can calculate the end of the window by using
       ;; the 'guarantee options. GOOD!
       (let ((end (window-end win t)))
-       (if (= end (funcall (symbol-function 'point-max)
-                           (window-buffer win)))
+       (if (= end (point-max (window-buffer win)))
            (list end t)
          (list (+ end 1) nil)))
     ;; Emacs: We have to calculate the end by ourselves.
@@ -2122,5 +2120,4 @@ This prevents `mouse-drag-region' from messing things up."
 ;; | save it".             -- Douglas Adams, "Last Chance to See"           |
 ;; \------------------------------------------------------------------------/
 
-;; arch-tag: 7b16bb1a-808c-4991-a8cc-66d3822936d0
 ;;; follow.el ends here