From: Stefan Monnier Date: Wed, 13 Mar 2013 02:08:33 +0000 (-0400) Subject: * lisp/international/mule.el (find-auto-coding): Include file name in X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~2026^2~568^2~22 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=175600dafc370c425502f0e6017deb2604c7e84f;p=emacs.git * lisp/international/mule.el (find-auto-coding): Include file name in obsolescence warning. Fixes: debbugs:13922 --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3b5051155ef..39bc71e8e13 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-03-13 Stefan Monnier + + * international/mule.el (find-auto-coding): Include file name in + obsolescence warning (bug#13922). + 2013-03-12 Teodor Zlatanov * progmodes/cfengine.el (cfengine-parameters-indent): New variable diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 47c7087518e..dd0f3821728 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1844,8 +1844,11 @@ If nothing is specified, the return value is nil." (re-search-forward "\\(.*;\\)?[ \t]*unibyte:[ \t]*\\([^ ;]+\\)" head-end t)) - (display-warning 'mule "`unibyte: t' is obsolete; \ -use \"coding: 'raw-text\" instead." :warning) + (display-warning 'mule + (format "\"unibyte: t\" (in %s) is obsolete; \ +use \"coding: 'raw-text\" instead." + (file-relative-name filename)) + :warning) (setq coding-system 'raw-text)) (when (and (not coding-system) (re-search-forward