Comment puis-je recevoir un avertissement avant de supprimer un tampon temporaire dans Emacs?

Question

Plus d'une fois, j'ai perdu mon travail en détruisant accidentellement un tampon temporaire dans Emacs. Puis-je configurer Emacs pour me donner un avertissement lorsque je tue un tampon non associé à un fichier?

Answer 1

Créez une fonction qui vous demandera si vous êtes sûr que le tampon a été modifié et n'est pas associé à un fichier. Ajoutez ensuite cette fonction à la liste kill-buffer-query-functions.

regardant la documentation Buffer File Name vous comprenez:

• un tampon ne visitant pas un fichier si et seulement si la variable buffer-file-name est nulle

Utilisez cette compréhension pour écrire la fonction:

(defun maybe-kill-buffer() 
    (if (and (not buffer-file-name) 
      (buffer-modified-p)) 
     ;; buffer is not visiting a file 
     (y-or-n-p "This buffer is not visiting a file but has been edited. Kill it anyway? ") 
    t)) 

Ensuite, ajoutez la fonction au crochet comme suit:

(add-to-list 'kill-buffer-query-functions 'maybe-kill-buffer) 

Answer 2

(defun maybe-kill-buffer() 
    (if (and (not buffer-file-name) 
      (buffer-modified-p)) 
     ;; buffer is not visiting a file 
     (y-or-n-p (format "Buffer %s has been edited. Kill it anyway? " 
         (buffer-name))) 
    t)) 

(add-to-list 'kill-buffer-query-functions 'maybe-kill-buffer)