emacs中組織模式的自動標頭

Question

我正在使用define-auto-insert'（“ .org。”“ .orgorg”）宏來插入標頭。 每當我創建任何新的組織文件時，這都可以正常工作。 但是，它還將自動標頭插入另一個空的orgs文件（出於某些特定原因使用touch命令創建）。 有人可以以任何方式建議我，以便在emacs中打開宏時不會在已創建的空文件中添加標頭嗎？

Answer 1

Autoinsert並非真正旨在實現這種區分。 實現此目的的最簡單方法是將自動插入功能與另一個功能一起包裝，然后使用新的文件掛鈎注冊該功能。 例如：

(defun auto-insert-guard ()
   "Prevent auto-insertion for files that exist already"
   (interactive)
   (unless (file-exists-p (buffer-file-name))
     (auto-insert)))

使用此鈎子代替：

(add-hook 'find-file-hook 'auto-insert-guard)

顯然，它比這要復雜得多，在這種情況下，您可能只希望對某些類型的文件設置此保護。

有時，您會發現使用defadvice完成類似的操作，但這通常更脆弱，以后再回過頭來可能很難理解。