emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/hyperbole 92437c6c68: Preload `kotl-autoloads` (#355)


From: ELPA Syncer
Subject: [elpa] externals/hyperbole 92437c6c68: Preload `kotl-autoloads` (#355)
Date: Sat, 1 Jul 2023 18:57:52 -0400 (EDT)

branch: externals/hyperbole
commit 92437c6c68394a2efd9f3eb5083e51f824eb1583
Author: Mats Lidell <mats.lidell@lidells.se>
Commit: GitHub <noreply@github.com>

    Preload `kotl-autoloads` (#355)
---
 ChangeLog    |  5 +++++
 hyperbole.el | 15 ++++++++++++++-
 2 files changed, 19 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 40fc39e2b9..6303b89bcc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2023-07-01  Mats Lidell  <matsl@gnu.org>
+
+* hyperbole.el: Preload `kotl-autoloads`.  Submitted by Stefan
+    Monnier. Thanks Stefan.
+
 2023-06-29  Mats Lidell  <matsl@gnu.org>
 
 * hbut.el (defib): Remove redundant indent property. Change by Stefan
diff --git a/hyperbole.el b/hyperbole.el
index fb1afed7b7..1dcc9a57f5 100644
--- a/hyperbole.el
+++ b/hyperbole.el
@@ -7,7 +7,7 @@
 ;; Author:           Bob Weiner
 ;; Maintainer:       Bob Weiner <rsw@gnu.org>, Mats Lidell <matsl@gnu.org>
 ;; Created:          06-Oct-92 at 11:52:51
-;; Last-mod:     25-Jun-23 at 12:01:04 by Bob Weiner
+;; Last-Mod:      1-Jul-23 at 10:33:45 by Mats Lidell
 ;; Released:         03-Dec-22
 ;; Version:          8.0.1pre
 ;; Keywords:         comm, convenience, files, frames, hypermedia, languages, 
mail, matching, mouse, multimedia, outlines, tools, wp
@@ -560,6 +560,19 @@ frame, those functions by default still return the prior 
frame."
 
 (makunbound 'hyperbole-loading)
 
+;; Autoload this form so that when `package.el' activates Hyperbole's autoloads
+;; it also sets up Kotl's autoloads.
+;;;###autoload
+(let ((us (if (fboundp 'macroexp-file-name)
+              (macroexp-file-name) load-file-name)))
+  (when us
+    ;; Contrary to the usual ELPA autoloads files, `kotl-autoloads'
+    ;; does not add its directory to `load-path', so let's do it here
+    ;; by hand.
+    (add-to-list 'load-path
+                 (expand-file-name "kotl" (file-name-directory us)))
+    (require 'kotl-autoloads nil t)))
+
 (provide 'hyperbole)
 
 ;;; hyperbole.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]