[elpa] externals/detached fdf05c63a3 2/2: Fix error in detached-list-sessions

[ELPA Syncer]

branch: externals/detached
commit fdf05c63a3013cfaf095c616e330cafffe8b3d68
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>

    Fix error in detached-list-sessions
    
    We should not enable detached-list-mode and print entries if the
    detached list buffer already has detached-list-mode enabled.
---
 detached-list.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/detached-list.el b/detached-list.el
index fec5c9bf78..8d691c907f 100644
--- a/detached-list.el
+++ b/detached-list.el
@@ -480,11 +480,12 @@ If prefix-argument is provided unmark instead of mark."
            (get-buffer-window buffer)
            (display-buffer buffer detached-list-display-buffer-action))))
     (select-window window)
-    (detached-list-mode)
-    (setq tabulated-list-entries
-          (seq-map #'detached-list--get-entry
-                   (detached-list--get-filtered-sessions)))
-    (tabulated-list-print t)))
+    (unless (eq major-mode 'detached-list-mode)
+      (detached-list-mode)
+      (setq tabulated-list-entries
+            (seq-map #'detached-list--get-entry
+                     (detached-list--get-filtered-sessions)))
+      (tabulated-list-print t))))
 
 (defun detached-list-narrow-sessions (filters)
   "Narrow session(s) based on FILTERS."