diff options
| author | Dave Love <[email protected]> | 2001-03-01 20:17:08 +0000 |
|---|---|---|
| committer | Dave Love <[email protected]> | 2001-03-01 20:17:08 +0000 |
| commit | 244d58bac0a04868434866e1a0d72e3ff540c257 (patch) | |
| tree | 8cbe430c11b204b1d88cad72a1cf31636225c117 /lisp | |
| parent | c3c45f65ba3d99aa53796cbfe47de73bcb7b949a (diff) | |
(mm-inhibit-file-name-handlers): Add
image-file-handler.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/mm-util.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el index e083c05249..b788a19113 100644 --- a/lisp/gnus/mm-util.el +++ b/lisp/gnus/mm-util.el @@ -455,7 +455,7 @@ Mule4 only." (nreverse out))) (defvar mm-inhibit-file-name-handlers - '(jka-compr-handler) + '(jka-compr-handler image-file-handler) "A list of handlers doing (un)compression (etc) thingies.") (defun mm-insert-file-contents (filename &optional visit beg end replace @@ -494,6 +494,8 @@ If INHIBIT is non-nil, inhibit mm-inhibit-file-name-handlers." (let ((coding-system-for-write (or codesys mm-text-coding-system-for-write mm-text-coding-system)) + ;; Why on earth doesn't this just nullify + ;; file-name-handler-alist? -- fx (inhibit-file-name-operation (if inhibit 'append-to-file inhibit-file-name-operation)) |