X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fffi%2Fffi-magic.el;h=bb6ab164fce744dd416c9a88df9ab6d87c709bda;hb=c273570a7d78e3580eb3476f0521148d8993efa3;hp=955ab4df6fe92a2789a29b1ca042a05b769225e2;hpb=296f6c0cefc2dcb6c11d8adf050ef3143eced75a;p=sxemacs

diff --git a/lisp/ffi/ffi-magic.el b/lisp/ffi/ffi-magic.el
index 955ab4d..bb6ab16 100644
--- a/lisp/ffi/ffi-magic.el
+++ b/lisp/ffi/ffi-magic.el
@@ -590,7 +590,7 @@ set by something else prior.  For example, if the user had called
 (defun magic:find-file-noselect (file)
   (let* ((codesys (intern (magic:file file :mime-encoding)))
 	 (coding-system-for-read codesys)
-	 (buf (get-buffer-create (file-name-nondirectory file)))
+	 (buf (create-file-buffer file))
 	 (coding nil))
     (with-current-buffer buf
       (insert-file-contents file t)