diff options
| author | Kenichi Handa <handa@m17n.org> | 2006-05-26 04:47:47 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2006-05-26 04:47:47 +0000 |
| commit | 47a355de933fe933c6e936ca5745a2bf3047d383 (patch) | |
| tree | ed416ba313af1885e9b45b12ee84c52cfe90bc01 /lisp | |
| parent | e0b582b8e1a36463483c76f85c43fd6bf2579885 (diff) | |
| download | emacs-47a355de933fe933c6e936ca5745a2bf3047d383.tar.gz emacs-47a355de933fe933c6e936ca5745a2bf3047d383.tar.bz2 emacs-47a355de933fe933c6e936ca5745a2bf3047d383.zip | |
(decode-coding-inserted-region): Call
find-operation-coding-system with (FILENAME . BUFFER).
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/international/mule.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 72198bb1258..b66345ea3a8 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1986,7 +1986,8 @@ Part of the job of this function is setting `buffer-undo-list' appropriately." (or coding (setq coding (car (find-operation-coding-system 'insert-file-contents - filename visit beg end replace)))) + (cons filename (current-buffer)) + visit beg end replace)))) (if (coding-system-p coding) (or enable-multibyte-characters (setq coding |