From 2689fd209af1e2b988dce81c093264b0abdf8562 Mon Sep 17 00:00:00 2001 From: Mats Lidell Date: Wed, 12 Oct 2022 23:27:34 +0200 Subject: [PATCH] Silence warning about reference to free variable --- ChangeLog | 18 ++++++++++++++++++ hargs.el | 6 +++++- hload-path.el | 7 ++++++- hmouse-drv.el | 7 ++++++- hmouse-info.el | 7 ++++++- hmouse-sh.el | 3 ++- hsettings.el | 4 +++- hui-mouse.el | 8 +++++++- hyrolo.el | 9 ++++++++- kotl/klink.el | 3 ++- kotl/kotl-mode.el | 10 +++++++++- 11 files changed, 72 insertions(+), 10 deletions(-) diff --git a/ChangeLog b/ChangeLog index 2a6d34c1..39f93c94 100644 --- a/ChangeLog +++ b/ChangeLog @@ -4,6 +4,24 @@ 2022-10-16 Mats Lidell +* kotl/klink.el (hmouse-tag): Require hmouse-tag. +* hui-mouse.el (imenu): Require imenu. +* hmouse-sh.el (kmacro): Require kmacro. + +* kotl/kotl-mode.el (cmpl-last-insert-location, cmpl-original-string) + (completion-to-accept): +* hyrolo.el (org-roam-directory, org-roam-db-autosync-mode) + (markdown-regex-header): +* hui-mouse.el (magit-root-section): +* hsettings.el (helm-allow-mouse): +* hmouse-info.el (Info-complete-menu-buffer): +* hmouse-drv.el (start-window): +* hload-path.el (generated-autoload-file): Declare variable. + +* hargs.el (hargs:reading-symbol): Define variable. + +2022-10-16 Mats Lidell + * kotl/kview.el (kview:insert-contents): Don't use global name for parameter. (kview:set-label-separator): Remove unused variable. diff --git a/hargs.el b/hargs.el index f61577d3..a6ef33a4 100644 --- a/hargs.el +++ b/hargs.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 31-Oct-91 at 23:17:35 -;; Last-Mod: 7-Oct-22 at 22:40:26 by Mats Lidell +;; Last-Mod: 12-Oct-22 at 22:30:53 by Mats Lidell ;; ;; Copyright (C) 1991-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -30,6 +30,7 @@ (require 'hpath) (require 'hypb) (require 'set) +(require 'info) ;;; ************************************************************************ ;;; Public variables @@ -665,6 +666,9 @@ help when appropriate." ;;; Private variables ;;; ************************************************************************ +(defvar hargs:reading-symbol nil + "Remember what symbol is being read.") + (defconst hargs:iform-vector (hargs:make-iform-vector ;; Get function symbol. diff --git a/hload-path.el b/hload-path.el index 7fc8b40b..b7672da7 100644 --- a/hload-path.el +++ b/hload-path.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 29-Jun-16 at 14:39:33 -;; Last-Mod: 20-Oct-22 at 23:20:50 by Mats Lidell +;; Last-Mod: 23-Oct-22 at 00:38:27 by Mats Lidell ;; ;; Copyright (C) 1992-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -14,6 +14,11 @@ ;;; Code: +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ +(defvar generated-autoload-file) + ;;; ************************************************************************ ;;; Public variables ;;; ************************************************************************ diff --git a/hmouse-drv.el b/hmouse-drv.el index e5c12e21..05ad425f 100644 --- a/hmouse-drv.el +++ b/hmouse-drv.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 04-Feb-90 -;; Last-Mod: 7-Oct-22 at 23:30:30 by Mats Lidell +;; Last-Mod: 12-Oct-22 at 23:12:43 by Mats Lidell ;; ;; Copyright (C) 1989-2021 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -20,6 +20,11 @@ (require 'hui-window) (require 'hypb) +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ +(defvar start-window) + ;;; ************************************************************************ ;;; Public variables ;;; ************************************************************************ diff --git a/hmouse-info.el b/hmouse-info.el index b2c6dd2a..5e10db04 100644 --- a/hmouse-info.el +++ b/hmouse-info.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 04-Apr-89 -;; Last-Mod: 25-Jul-22 at 23:34:19 by Mats Lidell +;; Last-Mod: 12-Oct-22 at 22:52:44 by Mats Lidell ;; ;; Copyright (C) 1989-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -23,6 +23,11 @@ (require 'info) +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ +(defvar Info-complete-menu-buffer) + ;;; ************************************************************************ ;;; Public functions ;;; ************************************************************************ diff --git a/hmouse-sh.el b/hmouse-sh.el index 46e179f1..ca4940e5 100644 --- a/hmouse-sh.el +++ b/hmouse-sh.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 3-Sep-91 at 21:40:58 -;; Last-Mod: 13-Oct-22 at 22:02:30 by Mats Lidell +;; Last-Mod: 16-Oct-22 at 19:32:50 by Mats Lidell ;; ;; Copyright (C) 1991-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -20,6 +20,7 @@ ;;; ************************************************************************ (require 'hvar) +(require 'kmacro) ;;; ************************************************************************ ;;; Public declarations diff --git a/hsettings.el b/hsettings.el index e76ec350..ba4e028c 100644 --- a/hsettings.el +++ b/hsettings.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 15-Apr-91 at 00:48:49 -;; Last-Mod: 1-Aug-22 at 21:34:56 by Mats Lidell +;; Last-Mod: 12-Oct-22 at 22:46:00 by Mats Lidell ;; ;; Copyright (C) 1991-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -33,6 +33,8 @@ ;;; ************************************************************************ (declare-function hproperty:but-create "hui-em-but") +(defvar helm-allow-mouse) + ;;; Read the comments and modify as desired. ;;; ************************************************************************ diff --git a/hui-mouse.el b/hui-mouse.el index 444820cf..594ea233 100644 --- a/hui-mouse.el +++ b/hui-mouse.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 04-Feb-89 -;; Last-Mod: 9-Oct-22 at 18:14:25 by Bob Weiner +;; Last-Mod: 16-Oct-22 at 19:29:34 by Mats Lidell ;; ;; Copyright (C) 1991-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -45,9 +45,15 @@ (require 'hmouse-info)) (unless (fboundp 'smart-c-at-tag-p) (require 'hmouse-tag)) +(require 'imenu) (eval-when-compile (require 'tar-mode)) +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ +(defvar magit-root-section) + ;;; ************************************************************************ ;;; Public variables ;;; ************************************************************************ diff --git a/hyrolo.el b/hyrolo.el index b6e0b57a..8d2570c5 100644 --- a/hyrolo.el +++ b/hyrolo.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 7-Jun-89 at 22:08:29 -;; Last-Mod: 7-Oct-22 at 22:03:04 by Mats Lidell +;; Last-Mod: 12-Oct-22 at 22:47:51 by Mats Lidell ;; ;; Copyright (C) 1991-2022 Free Software Foundation, Inc. ;; See the "HY-COPY" file for license information. @@ -40,6 +40,13 @@ (defvar google-contacts-buffer-name nil)) (defvar next-entry-exists nil)) +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ +(defvar org-roam-directory) +(defvar org-roam-db-autosync-mode) +(defvar markdown-regex-header) + ;;; ************************************************************************ ;;; Public variables ;;; ************************************************************************ diff --git a/kotl/klink.el b/kotl/klink.el index 41b38549..689610c5 100644 --- a/kotl/klink.el +++ b/kotl/klink.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 15-Nov-93 at 12:15:16 -;; Last-Mod: 18-Sep-22 at 09:55:49 by Bob Weiner +;; Last-Mod: 12-Oct-22 at 21:21:34 by Mats Lidell ;; ;; Copyright (C) 1993-2022 Free Software Foundation, Inc. ;; See the "../HY-COPY" file for license information. @@ -62,6 +62,7 @@ ;;; ************************************************************************ (require 'subr-x) ;; For string-trim +(require 'hmouse-tag) ;; For smart-c-include-regexp (eval-when-compile (require 'hbut)) ;; For defib. ;;; ************************************************************************ diff --git a/kotl/kotl-mode.el b/kotl/kotl-mode.el index 1be45bd2..8d1077d4 100644 --- a/kotl/kotl-mode.el +++ b/kotl/kotl-mode.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 6/30/93 -;; Last-Mod: 9-Oct-22 at 16:25:35 by Bob Weiner +;; Last-Mod: 16-Oct-22 at 19:29:20 by Mats Lidell ;; ;; Copyright (C) 1993-2022 Free Software Foundation, Inc. ;; See the "../HY-COPY" file for license information. @@ -20,6 +20,14 @@ (eval-and-compile (mapc #'require '(cl-lib delsel hsettings hmail hypb kfile kvspec kcell outline org org-table kotl-orgtbl))) +;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ + +(defvar cmpl-last-insert-location) +(defvar cmpl-original-string) +(defvar completion-to-accept) + ;;; ************************************************************************ ;;; Public variables ;;; ************************************************************************