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

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

2 files changed, 12 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a49549f9921..b39bf122642 100644
--- 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 2c9365b2ba6..32411914a19 100644
--- 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)