X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/eb350a68507dc58085f785bb72e9250df97bf5c4..b00707ade8ad89c5f310a4e068b7a5191f7746fd:/packages/auctex/tex.el diff --git a/packages/auctex/tex.el b/packages/auctex/tex.el index e11f16b3a..0ff821ce0 100644 --- a/packages/auctex/tex.el +++ b/packages/auctex/tex.el @@ -1,6 +1,6 @@ ;;; tex.el --- Support for TeX documents. -;; Copyright (C) 1985-1987, 1991, 1993, 1994, 1996, 1997, 1999-2012 +;; Copyright (C) 1985-1987, 1991, 1993, 1994, 1996, 1997, 1999-2013 ;; Free Software Foundation, Inc. ;; Maintainer: auctex-devel@gnu.org @@ -39,6 +39,11 @@ (eval-when-compile (require 'cl)) +(defun TeX--call-3/2 (f arg1 arg2 arg3) + (condition-case nil + (funcall f arg1 arg2 arg3) + (wrong-number-of-arguments (funcall f arg1 arg2)))) + (defgroup TeX-file nil "Files used by AUCTeX." :group 'AUCTeX) @@ -121,7 +126,8 @@ If nil, none is specified." :type '(choice (const :tag "Unspecified" nil) string)) ;; At least in TeXLive 2009 ConTeXt does not support an omega option anymore. -(make-obsolete-variable 'ConTeXt-Omega-engine 'TeX-engine-alist) +(TeX--call-3/2 #'make-obsolete-variable 'ConTeXt-Omega-engine + 'TeX-engine-alist "before 11.86") (defcustom TeX-queue-command "lpq -P%p" "*Command used to show the status of a printer queue. @@ -1285,8 +1291,9 @@ TYPE can be one of the following symbols:\n" :group 'TeX-command (TeX-engine-set (if TeX-Omega-mode 'omega 'default))) (defalias 'tex-omega-mode 'TeX-Omega-mode) -(make-obsolete 'TeX-Omega-mode 'TeX-engine-set) -(make-obsolete-variable 'TeX-Omega-mode 'TeX-engine) +(TeX--call-3/2 #'make-obsolete 'TeX-Omega-mode 'TeX-engine-set "before 11.86") +(TeX--call-3/2 #'make-obsolete-variable 'TeX-Omega-mode + 'TeX-engine "before 11.86") ;;; Forward and inverse search @@ -1434,7 +1441,8 @@ SyncTeX are recognized." (when TeX-source-correlate-mode 'TeX-synctex-output-page)))) (defalias 'TeX-source-specials-mode 'TeX-source-correlate-mode) -(make-obsolete 'TeX-source-specials-mode 'TeX-source-correlate-mode) +(TeX--call-3/2 #'make-obsolete 'TeX-source-specials-mode + 'TeX-source-correlate-mode "before 11.86") (defalias 'tex-source-correlate-mode 'TeX-source-correlate-mode) (put 'TeX-source-correlate-mode 'safe-local-variable 'TeX-booleanp) ;; We do not want the custom variable to require tex.el. This is only