branch: elpa/hyperdrive
commit 0575f0f2f67a90ba1068def6051a84e151423dbe
Author: Joseph Turner <jos...@breatheoutbreathe.in>
Commit: Joseph Turner <jos...@ushin.org>
Fix: Correct info node
---
doc/hyperdrive-manual.org | 2 +-
doc/hyperdrive-manual.texi | 2 +-
hyperdrive-history.el | 2 +-
hyperdrive-menu.el | 2 +-
hyperdrive.el | 8 ++++----
5 files changed, 8 insertions(+), 8 deletions(-)
diff --git a/doc/hyperdrive-manual.org b/doc/hyperdrive-manual.org
index 99bbe285f3..81ef702a14 100644
--- a/doc/hyperdrive-manual.org
+++ b/doc/hyperdrive-manual.org
@@ -5,7 +5,7 @@
#+setupfile: doc-setup.org
#+texinfo_dir_category: Emacs
-#+texinfo_dir_title: Hyperdrive: (hyperdrive)
+#+texinfo_dir_title: Hyperdrive: (hyperdrive-manual)
#+texinfo_dir_desc: P2P filesystem in Emacs
[[https://docs.holepunch.to/building-blocks/hyperdrive][Hyperdrive]] is a P2P,
real-time, local-first, versioned filesystem
diff --git a/doc/hyperdrive-manual.texi b/doc/hyperdrive-manual.texi
index 09f9c82b2a..fa311e23d0 100644
--- a/doc/hyperdrive-manual.texi
+++ b/doc/hyperdrive-manual.texi
@@ -14,7 +14,7 @@
@dircategory Emacs
@direntry
-* Hyperdrive: (hyperdrive). P2P filesystem in Emacs.
+* Hyperdrive: (hyperdrive-manual). P2P filesystem in Emacs.
@end direntry
@finalout
diff --git a/hyperdrive-history.el b/hyperdrive-history.el
index 130e6d8994..d11fe9b316 100644
--- a/hyperdrive-history.el
+++ b/hyperdrive-history.el
@@ -165,7 +165,7 @@ prefix argument \\[universal-argument], prompt for ENTRY."
(mapcar (lambda (range)
;; Some entries may not exist at `range-start',
;; as in the version before it was created, see:
- ;; (info "(hyperdrive)Versioning")
+ ;; (info "(hyperdrive-manual)Versioning")
(cons range
(hyperdrive-entry-create
:hyperdrive hyperdrive
diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index 70fc26c170..20d288679d 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -58,7 +58,7 @@
;;;###autoload (autoload 'hyperdrive-menu "hyperdrive-menu" nil t)
(transient-define-prefix hyperdrive-menu (entry)
"Show the hyperdrive transient menu."
- :info-manual "(Hyperdrive)"
+ :info-manual "(hyperdrive-manual)"
[["Hyperdrive"
:description
(lambda ()
diff --git a/hyperdrive.el b/hyperdrive.el
index a318de7753..86c711a818 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -704,7 +704,7 @@ Universal prefix argument \\[universal-argument] forces
:mode '(emacs-lisp-mode . "hyperdrive")
:regexp (rx word-boundary "hyperdrive-" (1+ (not (any " \n
\"'(),[]`‘’"))))
:doc-spec '((;; INFO-NODE
- "(hyperdrive)Function Index"
+ "(hyperdrive-manual)Function Index"
;; TRANS-FUNC
nil
;; PREFIX
@@ -712,7 +712,7 @@ Universal prefix argument \\[universal-argument] forces
;; SUFFIX
"\\( \\|$\\)")
(;; INFO-NODE
- "(hyperdrive)Variable Index"
+ "(hyperdrive-manual)Variable Index"
;; TRANS-FUNC
nil
;; PREFIX
@@ -720,7 +720,7 @@ Universal prefix argument \\[universal-argument] forces
;; SUFFIX
"\\( \\|$\\)")
(;; INFO-NODE
- "(hyperdrive)Keystroke Index"
+ "(hyperdrive-manual)Keystroke Index"
;; TRANS-FUNC
nil
;; PREFIX
@@ -1142,7 +1142,7 @@ The return value of this function is the retrieval
buffer."
(defun hyperdrive-info-manual ()
"Open hyperdrive.el info manual."
(interactive)
- (info "hyperdrive"))
+ (info "(hyperdrive-manual) Top"))
;;;; Footer
