2

Настроил emacs таким образом, что в заголовке фрейма (окна) он отображает имя текущего буфера. Задача такова. Нужно чтоб emacs отображал в заголовке какой-нибудь символ (напр., *), если буфер модифицирован. Подскажите, пожалуйста, как это можно реализовать?

1 ответ 1

3

Есть два полезных крючка: first-change-hook и after-save-hook. Можна к ним подключить функции, модифицирующие имя буфера:

(defvar *modified-marker* "*")

(defun mark-modified ()
  "Добавить знак перед именем буфера"
  (let ((buffer-name (buffer-name)))
    (rename-buffer (concat *modified-marker* buffer-name))))

(defun unmark-modified ()
  "Удалить знак с имени буфера"
  (let ((buffer-name (buffer-name)))
    (rename-buffer (string-trim-left buffer-name *modified-marker*))))

;; Подключить функции к крючком
(add-hook 'first-change-hook 'mark-modified)
(add-hook 'after-save-hook 'unmark-modified)

Есть ещё проблема функции undo. Это можна наверно выполнить используя advice-add. Посмотри здесь.

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими условиями использования и подтверждаете, что прочитали и поняли наши политику конфиденциальности и нормы поведения.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.