* follow.el (scroll-bar-toolkit-scroll, scroll-bar-drag)

(scroll-bar-scroll-up, scroll-bar-scroll-down, mwheel-scroll): Declare.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a49549f9921c0a4903253a143e9eebb9012bec5d..b39bf12264200e0e8f3c9dff34a2e96e27dca122 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -19,6 +19,10 @@
        * faces.el (x-display-list, x-open-connection, x-get-resource):
        Declare.
 
+       * follow.el (scroll-bar-toolkit-scroll, scroll-bar-drag)
+       (scroll-bar-scroll-up, scroll-bar-scroll-down, mwheel-scroll):
+       Declare.
+
        * frame.el (x-display-grayscale-p, x-display-name): Declare.
 
        * simple.el (font-info): Declare.

diff --git a/lisp/follow.el b/lisp/follow.el
index 2c9365b2ba6017bf797ee313a67d90e682b5667a..32411914a198f6c70ef5876042fb935b330630d2 100644 (file)
--- a/lisp/follow.el
+++ b/lisp/follow.el
@@ -1,6 +1,6 @@
 ;;; follow.el --- synchronize windows showing the same buffer
-;; Copyright (C) 1995-1997, 1999, 2001-2013 Free Software Foundation,
-;; Inc.
+
+;; Copyright (C) 1995-1997, 1999, 2001-2013 Free Software Foundation, Inc.
 
 ;; Author: Anders Lindgren <andersl@andersl.com>
 ;; Maintainer: FSF (Anders' email bounces, Sep 2005)
@@ -1299,6 +1299,12 @@ non-first windows in Follow mode."
 ;; This handles the case where the user drags the scroll bar of a
 ;; non-selected window whose buffer is in Follow mode.
 
+(declare-function scroll-bar-toolkit-scroll "scroll-bar" (event))
+(declare-function scroll-bar-drag "scroll-bar" (event))
+(declare-function scroll-bar-scroll-up "scroll-bar" (event))
+(declare-function scroll-bar-scroll-down "scroll-bar" (event))
+(declare-function mwheel-scroll "mwheel" (event))
+
 (defun follow-scroll-bar-toolkit-scroll (event)
   (interactive "e")
   (scroll-bar-toolkit-scroll event)