branch: externals/hyperbole
commit 37a343cf09a66be401e5e1a59fd09e9444a76308
Author: Bob Weiner <r...@gnu.org>
Commit: Bob Weiner <r...@gnu.org>
Fix hyperb:generate-autoloads default-directory bug
---
ChangeLog | 3 +++
hyperbole.el | 5 ++---
2 files changed, 5 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 8484366..dc0d67e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
2021-05-13 Bob Weiner <r...@gnu.org>
+* hyperbole.el (hyperb:generate-autoloads): Fix improper default-directory
+ when building kotl/kotl-autoloads.el.
+
* hycontrol.el (hycontrol-frames-mode): Add :group.
(hycontrol-make-windows-grid):
(hycontrol--buffer-list): Add this var and use instead of
diff --git a/hyperbole.el b/hyperbole.el
index 24668ef..b21d4ad 100644
--- a/hyperbole.el
+++ b/hyperbole.el
@@ -671,8 +671,7 @@ This is used only when running from git source and not a
package release."
"Renerate Hyperbole *-autoload.el files whether they already exist or not."
(let* ((default-directory hyperb:dir)
(backup-inhibited t)
- (al-file (expand-file-name "hyperbole-autoloads.el"))
- (generated-autoload-file))
+ (al-file (expand-file-name "hyperbole-autoloads.el")))
;; (make-local-variable 'generated-autoload-file)
(with-current-buffer (find-file-noselect al-file)
(setq generated-autoload-file al-file)
@@ -680,7 +679,7 @@ This is used only when running from git source and not a
package release."
(setq al-file (expand-file-name "kotl/kotl-autoloads.el"))
(with-current-buffer (find-file-noselect al-file)
(setq generated-autoload-file al-file)
- (update-directory-autoloads "kotl/")))
+ (update-directory-autoloads ".")))
(unless (hyperb:autoloads-exist-p)
(error (format "Hyperbole failed to generate autoload files; try running
'make src' in a shell in %s" hyperb:dir))))
