diff options
-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 |