Belirli bir uzantıya sahip dosyaların yedeklemesini kapatmak için bir Emacs değişkeni var mı?

Question

Örneğin, çeşitli veri dosyalarını düzenlerken, yedek veriler kullanılamaz ve aslında araçlarımızı açar. Bu nedenle, adında bir regexp içeren dosyalar için yedeklemeyi devre dışı bırakmak istiyorum.

justinhj

Answer 1

ben sadece bu gibi sorulara diğer online kaynaklar referans istemem ama bu ihtiyaçlarınız için mükemmel bir seçim gibi görünüyor.

http://anirudhs.chaosnet.org/blog/2005.01.21.html

o sayfada açıklanandan ettik kurulum, sadece emacs'ın sürümüne bağlı olarak .emacs veya .emacs.d/init.el dosyaya bu ekleyebilir kez:

(setq auto-mode-alist (append '(("\\.ext1$" . sensitive-mode)) auto-mode-alist)) 
(setq auto-mode-alist (append '(("\\.ext2$" . sensitive-mode)) auto-mode-alist)) 
(setq auto-mode-alist (append '(("\\.ext3$" . sensitive-mode)) auto-mode-alist)) 
(setq auto-mode-alist (append '(("\\.ext4$" . sensitive-mode)) auto-mode-alist)) 

\\.ext1$, \\.ext2$, vb., yedeklemeyi istemediğiniz dosya adlarıyla eşleşen normal ifadelerdir.

Answer 2

Yedekleme/otomatik kaydetme dosyalarını evinizin direklerine koymak için her zaman emacs isteyebilirsiniz.

http://amitp.blogspot.com/2007/03/emacs-move-autosave-and-backup-files.html

(defvar user-temporary-file-directory 
    (concat temporary-file-directory user-login-name "/")) 
(make-directory user-temporary-file-directory t) 
(setq backup-by-copying t) 
(setq backup-directory-alist 
     `(("." . ,user-temporary-file-directory) 
     (,tramp-file-name-regexp nil))) 
(setq auto-save-list-file-prefix 
     (concat user-temporary-file-directory ".auto-saves-")) 
(setq auto-save-file-name-transforms 
     `((".*" ,user-temporary-file-directory t))) 

Answer 3

Kullanmak isterseniz yerleşik Emacs işlevselliği böyle bir şey yapmak:

(defvar my-backup-ignore-regexps (list "foo.*" "\\.bar$") 
    "*List of filename regexps to not backup") 

(defun my-backup-enable-p (name) 
    "Filter certain file backups" 
    (when (normal-backup-enable-predicate name) 
    (let ((backup t)) 
     (mapc (lambda (re) 
       (setq backup (and backup (not (string-match re name))))) 
      my-backup-ignore-regexps) 
     backup))) 

(setq backup-enable-predicate 'my-backup-enable-p)