Как посчитать все окна в рамке?

Как и в случае с вопросом, мне бы хотелось, чтобы функция подсчитывала количество окон, которые в данный момент отображаются в этом кадре.

Итак, это:

+--------------+-------------+
|              |             |
|              |             |
|  *scratch*   | *Messages*  |
|              |             |
|              |             |
|              |             |
+--------------+-------------+
|           *Help*           |
|                            |
+----------------------------+

Вернется => 3

Я запустил функцию ниже:

(defun count-windows ()
  "Count how many buffers are currently being shown."
  (interactive)
)

Если вы имеете в виду количество окон независимо от того, какие буферы отображаются, то: (length (window-list))сделаем это. Более того, вы можете просто использовать существующую (count-windows)функцию.

Если вы хотите посчитать количество уникальных буферов, видимых в окнах на фрейме, вы можете использовать:

(length (cl-delete-duplicates (mapcar #'window-buffer (window-list))))

(Обратите внимание, что window-listтакже может принимать необязательный аргумент FRAME, если вы хотите что-то, кроме выбранного кадра.)

Заключение последнего в ваш вызов функции даст вам:

(defun count-unique-visible-buffers (&optional frame)
  "Count how many buffers are currently being shown.  Defaults to
selected frame."
  (length (cl-delete-duplicates (mapcar #'window-buffer (window-list frame)))))

(Обратите внимание, что эта функция предполагает, что вы загрузили 'cl-lib. Согласно комментариям, вы можете использовать delete-dupsвместо, cl-delete-duplicatesесли вы хотите избежать cl-lib.)