Re: [T-gnus 6.14] SCORE file

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

>>>>> In [semi-gnus-ja : No.4642] 
>>>>>	Haruki Nakagoshi <nakagosi@xxxxxxxxxxxxxxx> wrote:

中越さん> 私も今は、ソースファイルの修正個所を元に戻して使っています。

Lars さんはきっとユーザが設定した変なファイル名に対して防御をしている
んでしょうね。(ちゃんと ChangeLog に書いておいて欲しいなあ。)

困っていらっしゃる方が複数みたいなので、ここはやはり T-gnus で対処すべ
きだと思います。こんな感じでいかがでしょうか?

(defun nnheader-translate-file-chars (file &optional full)
  "Translate FILE into something that can be a file name.
If FULL, translate everything."
  (if full
      ;; Do complete translation.
      (convert-standard-filename file)
    ;; We translate -- but only the file name.  We leave the directory alone.
    (expand-file-name
     (convert-standard-filename (file-name-nondirectory file))
     (file-name-directory file))))

で、nnheader-file-name-translation-alist は廃止する、と。

ところで、オリジナルの関数にある

	(if (string-match "/[^/]+\\'" file)
	    ;; This is needed on NT's and stuff.
	    (setq leaf (substring file (1+ (match-beginning 0)))
		  path (substring file 0 (1+ (match-beginning 0))))

というものは必要なんでしょうか? → NT な人
-- 
Katsumi Yamaoka <yamaoka@xxxxxxx>