[nongnu] elpa/hyperdrive 47f7f80f8b 018/123: WIP

[ELPA Syncer]

branch: elpa/hyperdrive
commit 47f7f80f8bf788953017ab90fa2506cf71cec68b
Author: Adam Porter <adam@alphapapa.net>
Commit: Joseph Turner <joseph@ushin.org>

    WIP
---
 hyperdrive.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/hyperdrive.el b/hyperdrive.el
index 726331520e..20e2dd69de 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -768,6 +768,15 @@ The return value of this function is the retrieval buffer."
 
 (require 'transient)
 
+;; TODO: Use something like this later.
+;; (defmacro hyperdrive-transient-lambda (&rest body)
+;;   (declare (indent defun))
+;;   `(lambda ()
+;;      (when hyperdrive-current-entry
+;;        (pcase-let (((cl-struct hyperdrive-entry hyperdrive)
+;;                     hyperdrive-current-entry))
+;;          ,@body))))
+
 (transient-define-prefix hyperdrive-menu ()
   "Show the hyperdrive transient menu."