diff options
| author | K. Handa <handa@gnu.org> | 2015-09-08 20:43:11 +0900 |
|---|---|---|
| committer | K. Handa <handa@gnu.org> | 2015-09-08 20:43:11 +0900 |
| commit | 94ed5167557112fb00eeca05e62589db744206de (patch) | |
| tree | 80a544f8534802dd61fbd218b97441d3419dbf6b /lisp/emacs-lisp/macroexp.el | |
| parent | 33f2e0023a5ef03db3e99ade0b93a7a1a913dbe1 (diff) | |
| parent | 10e7f7de910ca816799062f33b830f7598801f0e (diff) | |
| download | emacs-94ed5167557112fb00eeca05e62589db744206de.tar.gz | |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs
Diffstat (limited to 'lisp/emacs-lisp/macroexp.el')
| -rw-r--r-- | lisp/emacs-lisp/macroexp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 6189976e866..2c33d39c32f 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -147,10 +147,10 @@ and also to avoid outputting the warning during normal execution." (let ((instead (car obsolescence-data)) (asof (nth 2 obsolescence-data))) (format-message - "ā%sā is an obsolete %s%s%s" fun type + "`%s' is an obsolete %s%s%s" fun type (if asof (concat " (as of " asof ")") "") (cond ((stringp instead) (concat "; " (substitute-command-keys instead))) - (instead (format-message "; use ā%sā instead." instead)) + (instead (format-message "; use `%s' instead." instead)) (t "."))))) (defun macroexpand-1 (form &optional environment) |
