Просмотр исходного кода

Move obsolete aliases into "org-compat.el"

Nicolas Goaziou 6 лет назад
Родитель
Сommit
a63073ec04
2 измененных файлов с 6 добавлено и 4 удалено
  1. 0 4
      lisp/org-agenda.el
  2. 6 0
      lisp/org-compat.el

+ 0 - 4
lisp/org-agenda.el

@@ -1642,8 +1642,6 @@ part of an agenda sorting strategy."
   :group 'org-agenda-sorting
   :group 'org-agenda-sorting
   :type 'symbol)
   :type 'symbol)
 
 
-(define-obsolete-variable-alias 'org-sort-agenda-notime-is-late
-  'org-agenda-sort-notime-is-late "9.4")
 (defcustom org-agenda-sort-notime-is-late t
 (defcustom org-agenda-sort-notime-is-late t
   "Non-nil means items without time are considered late.
   "Non-nil means items without time are considered late.
 This is only relevant for sorting.  When t, items which have no explicit
 This is only relevant for sorting.  When t, items which have no explicit
@@ -1654,8 +1652,6 @@ agenda entries."
   :group 'org-agenda-sorting
   :group 'org-agenda-sorting
   :type 'boolean)
   :type 'boolean)
 
 
-(define-obsolete-variable-alias 'org-sort-agenda-noeffort-is-high
-  'org-agenda-sort-noeffort-is-high "9.4")
 (defcustom org-agenda-sort-noeffort-is-high t
 (defcustom org-agenda-sort-noeffort-is-high t
   "Non-nil means items without effort estimate are sorted as high effort.
   "Non-nil means items without effort estimate are sorted as high effort.
 This also applies when filtering an agenda view with respect to the
 This also applies when filtering an agenda view with respect to the

+ 6 - 0
lisp/org-compat.el

@@ -631,6 +631,12 @@ use of this function is for the stuck project list."
 (define-obsolete-function-alias 'org-babel-strip-quotes
 (define-obsolete-function-alias 'org-babel-strip-quotes
   'org-strip-quotes "Org 9.2")
   'org-strip-quotes "Org 9.2")
 
 
+(define-obsolete-variable-alias 'org-sort-agenda-notime-is-late
+  'org-agenda-sort-notime-is-late "9.4")
+
+(define-obsolete-variable-alias 'org-sort-agenda-noeffort-is-high
+  'org-agenda-sort-noeffort-is-high "9.4")
+
 ;;;; Obsolete link types
 ;;;; Obsolete link types
 
 
 (eval-after-load 'ol
 (eval-after-load 'ol