一人お手軽 Wiki もどき howm part4 (141ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

24(2): 2014/10/04(土) 22:07:01.53 AAS
Emacs 24.3.1 & howm 1.4.2 で空のファイルを削除するのに、
どこかで見かけた次の設定をしてます。

(if (not (memq 'delete-file-if-no-contents after-save-hook))
(setq after-save-hook
(cons 'delete-file-if-no-contents after-save-hook)))
(defun delete-file-if-no-contents ()
(when (and
(buffer-file-name (current-buffer))
(string-match "\\.howm" (buffer-file-name (current-buffer)))
(= (point-min) (point-max)))
(delete-file
(buffer-file-name (current-buffer)))))

~/.howm-keys がないと自動的に再生成されますが、
そのときに繰り返し delete-file-if-no-contents が呼ばれ、
次のようなメッセージが出て生成に失敗します。

Generating ~/.howm-keys ...
let*: Lisp nesting exceeds `max-lisp-eval-depth'

上の設定がなければ問題ないようですが、
どのように対処するべきでしょうか？

---

25(1): 2014/10/06(月) 20:06:06.42 AAS
>>24
"\\.howm" → "\\.howm$"

---

26: 24 2014/10/06(月) 20:38:24.44 AAS
>>25
ありがとうございます。

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.016s