(decode-coding-inserted-region): Call

find-operation-coding-system with (FILENAME . BUFFER).

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