branch: externals/auctex
commit f107ca1d55ff6d5058274c3a31bd83ea55d6d3fc
Author: Ikumi Keita <[email protected]>
Commit: Ikumi Keita <[email protected]>
Make compatible with emacs 24
* latex.el (TeX-read-label): Use `format' instead of `format-message'
if the latter is not available.
---
latex.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/latex.el b/latex.el
index 9df3d52..bf96729 100644
--- a/latex.el
+++ b/latex.el
@@ -1932,7 +1932,10 @@ defined and ask user for confirmation before proceeding."
(assoc label (LaTeX-label-list)))
(ding)
(when (y-or-n-p
- (format-message "Label `%s' exists. Use anyway? " label))
+ ;; Emacs 24 compatibility
+ (if (fboundp 'format-message)
+ (format-message "Label `%s' exists. Use anyway? " label)
+ (format "Label `%s' exists. Use anyway? " label)))
(setq valid t)))
(t
(setq valid t))))
