; Fix compiler warnings

* lisp/tab-bar.el (touch-screen-delay):

* lisp/tab-line.el (touch-screen-delay): Declare variables.

* lisp/touch-screen.el (touch-screen-hold): Autoload.

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index e21367255a0cf947b816065696c9bb8d12b4a7d7..4fda4b027a6d2196573f5120c9b926efffb1c581 100644 (file)
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -416,6 +416,8 @@ Beep, then throw to `context-menu' and return."
   (beep)
   (throw 'context-menu 'context-menu))
 
+(defvar touch-screen-delay)
+
 (defun tab-bar-touchscreen-begin (event)
   "Handle a touchscreen begin EVENT on the tab bar.
 

diff --git a/lisp/tab-line.el b/lisp/tab-line.el
index 4637dafcd90b805fa958beb6a7e66652a1a3e916..0c9ef72084b8387c709d95d679e3eff79a20c24c 100644 (file)
--- a/lisp/tab-line.el
+++ b/lisp/tab-line.el
@@ -958,6 +958,8 @@ sight of the tab line."
 \f
 ;;; Touch screen support.
 
+(defvar touch-screen-delay)
+
 (defun tab-line-track-tap (event &optional function)
   "Track a tap starting from EVENT.
 If EVENT is not a `touchscreen-begin' event, return t.

diff --git a/lisp/touch-screen.el b/lisp/touch-screen.el
index be08ae1d3c8261d809e5e819dc1d4ab53bddf630..bae0e097688a3b803625f3051ea510d3084f6d43 100644 (file)
--- a/lisp/touch-screen.el
+++ b/lisp/touch-screen.el
@@ -320,6 +320,7 @@ the event."
 
 ;;; Drag-to-select gesture.
 
+;;;###autoload
 (defun touch-screen-hold (event)
   "Handle a long press EVENT.
 Ding and select the window at EVENT, then activate the mark.  If