Поместите все открытые файлы режима org в список для последующего использования со списками руля

Question

Я пытаюсь поместить все (открытые) файлы org в список, чтобы я мог добавить их в списки helm-projectile-switch-to-file.

Мне удалось получить этот код:

  (->> (buffer-list)
       (--select (with-current-buffer it
                   (derived-mode-p 'org-mode)))
       (mapc #'kill-buffer))

, но это убивает буферы, а не помещает их в агрегированный список.

Answer 1

Если вы не хотите уничтожать буферы, я предлагаю не применять kill-buffer к каждому элементу. Кроме этого, вы уже почти все сделали. Вот версия, которая не требует никаких внешних библиотек:

(seq-filter '(lambda (buffer)                                                                                                                                                            
               (with-current-buffer buffer
                 (derived-mode-p 'org-mode)))
            (buffer-list))