From fa1a9aad8e574b399db168c5ea73a79fcb5b1017 Mon Sep 17 00:00:00 2001 From: Aaron Ecay Date: Fri, 6 Nov 2015 12:28:59 +0000 Subject: [PATCH] =?UTF-8?q?org.el:=20Don=E2=80=99t=20special-case=20?= =?UTF-8?q?=E2=80=98define-obsolete-function-alias=E2=80=99=20for=20emacs?= =?UTF-8?q?=20<=3D=2023?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lisp/org.el | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 1184484e4..85999abb0 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -8116,13 +8116,7 @@ even level numbers will become the next higher odd number." ((> change 0) (1+ (* 2 (/ (+ level (* 2 change)) 2)))) ((< change 0) (max 1 (1+ (* 2 (/ (+ level (* 2 change)) 2)))))) (max 1 (+ level (or change 0))))) - -(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"))) +(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."