From dfa23d2d7bf6336d3882bd3345ddec1ba62bd68b Mon Sep 17 00:00:00 2001 From: Steve Youngs Date: Sat, 18 Apr 2020 21:38:22 +1000 Subject: [PATCH] A couple of minor tweaks / updates. * 12-misc.el (mouse-avoidance-mode): Use 'exile' because 'banish' is too restrictive. * 10-pkgs.el (eshell-mode-map): #'defvar at compile time for byte-compiler nirvana. * 07-html.el (sy-htmlize-set-links): #'declare-boundp htmlbuf to keep the byte-compiler happy. Signed-off-by: Steve Youngs --- 07-html.el | 4 ++-- 10-pkgs.el | 3 ++- 12-misc.el | 4 ++-- 3 files changed, 6 insertions(+), 5 deletions(-) diff --git a/07-html.el b/07-html.el index 10155ba..4ff78aa 100644 --- a/07-html.el +++ b/07-html.el @@ -5,7 +5,7 @@ ;; Author: Steve Youngs ;; Maintainer: Steve Youngs ;; Created: <2007-12-02> -;; Time-stamp: +;; Time-stamp: ;; Download: ;; HTMLised: ;; Git Repo: git clone https://git.sxemacs.org/syinit @@ -163,7 +163,7 @@ Which would be converted to: Get the latest version here." ;; LOL, we actually need to _NOT_ do it in _this_ file so the doc ;; string for this function looks right. - (unless (string-match "07-html" (buffer-name htmlbuf)) + (unless (string-match "07-html" (buffer-name (declare-boundp htmlbuf))) (save-excursion (goto-char (point-min)) (mapcar diff --git a/10-pkgs.el b/10-pkgs.el index 71c5f6b..b14640c 100644 --- a/10-pkgs.el +++ b/10-pkgs.el @@ -5,7 +5,7 @@ ;; Author: Steve Youngs ;; Maintainer: Steve Youngs ;; Created: <2007-12-02> -;; Time-stamp: +;; Time-stamp: ;; Download: ;; HTMLised: ;; Git Repo: git clone https://git.sxemacs.org/syinit @@ -417,6 +417,7 @@ (prspos) (t lbpos))))) +(eval-when-compile (defvar eshell-mode-map)) (defun sy-eshell-bol-maybe-key () (define-key eshell-mode-map [(control ?a)] 'sy-eshell-bol-maybe)) diff --git a/12-misc.el b/12-misc.el index 25ff80b..ae83b36 100644 --- a/12-misc.el +++ b/12-misc.el @@ -5,7 +5,7 @@ ;; Author: Steve Youngs ;; Maintainer: Steve Youngs ;; Created: <2007-12-02> -;; Time-stamp: +;; Time-stamp: ;; Download: ;; HTMLised: ;; Git Repo: git clone https://git.sxemacs.org/syinit @@ -85,7 +85,7 @@ ;:*======================= ;:* Keep the mouse pointer away from the text cursor (require 'avoid) -(mouse-avoidance-mode 'banish) +(mouse-avoidance-mode 'exile) ;:*======================= ;:* Frame title. -- 2.25.1