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

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

[nongnu] elpa/hyperdrive 9fd951a926 29/31: Fix: (hyperdrive-mirror--meta


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 9fd951a926 29/31: Fix: (hyperdrive-mirror--metadata-finally) Don't insert empty sections
Date: Fri, 3 Nov 2023 22:00:48 -0400 (EDT)

branch: elpa/hyperdrive
commit 9fd951a9261e71a84ec28e7c41d607b70bd34a7e
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Fix: (hyperdrive-mirror--metadata-finally) Don't insert empty sections
    
    For now, at least, because taxy-magit-section doesn't expect that to
    be attempted.
---
 hyperdrive-mirror.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/hyperdrive-mirror.el b/hyperdrive-mirror.el
index 58661b1a6a..5f51c002cf 100644
--- a/hyperdrive-mirror.el
+++ b/hyperdrive-mirror.el
@@ -279,8 +279,10 @@ Callback for queue finalizer in `hyperdrive-mirror'."
         (add-hook 'kill-buffer-hook #'hyperdrive-mirror--cache-visibility nil 
'local)
         (delete-all-overlays)
         (erase-buffer)
-        (hyperdrive-mirror--insert-taxy :name "Ignored" :items non-uploadable)
-        (hyperdrive-mirror--insert-taxy :name "To upload" :items uploadable)
+        (when non-uploadable
+          (hyperdrive-mirror--insert-taxy :name "Ignored" :items 
non-uploadable))
+        (when uploadable
+          (hyperdrive-mirror--insert-taxy :name "To upload" :items uploadable))
         (if-let ((section-ident)
                  (section (magit-get-section section-ident)))
             (goto-char (oref section start))



reply via email to

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