From 2537ddc2f77a14ad2c9bd4628ddb4f1194f60e73 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Sat, 5 Apr 2008 18:49:26 +0200 Subject: [PATCH] Check for define-obsolete-function-alias before using it. This is for Emacs 21 compatibility. --- lisp/org.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 0a0233ce3..9ec28d35c 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -4799,11 +4799,12 @@ even level numbers will become the next higher odd number." ((< change 0) (max 1 (1+ (* 2 (/ (+ level (* 2 change)) 2)))))) (max 1 (+ level change)))) -(if (or (featurep 'xemacs) (< emacs-major-version 23)) - (define-obsolete-function-alias 'org-get-legal-level - 'org-get-valid-level) - (define-obsolete-function-alias 'org-get-legal-level - 'org-get-valid-level "23.1")) +(if (boundp 'define-obsolete-function-alias) + (if (or (featurep 'xemacs) (< emacs-major-version 23)) + (define-obsolete-function-alias 'org-get-legal-level + 'org-get-valid-level) + (define-obsolete-function-alias 'org-get-legal-level + 'org-get-valid-level "23.1"))) (defun org-promote () "Promote the current heading higher up the tree.