Jelajahi Sumber

org.el: Use `defalias' for priority aliases.

* lisp/org.el (org-highest-priority, org-lowest-priority)
(org-default-priority): Use `defalias'.
Bastien 5 tahun lalu
induk
melakukan
e062ca7199
1 mengubah file dengan 4 tambahan dan 3 penghapusan
  1. 4 3
      lisp/org.el

+ 4 - 3
lisp/org.el

@@ -2383,7 +2383,8 @@ set a priority."
   :group 'org-priorities
   :type 'boolean)
 
-(defvaralias 'org-highest-priority 'org-priority-highest)
+(defalias 'org-highest-priority 'org-priority-highest)
+
 (defcustom org-priority-highest ?A
   "The highest priority of TODO items.
 A character like ?A, ?B, etc., or a numeric value like 1, 2, etc.
@@ -2393,7 +2394,7 @@ Must be smaller than `org-priority-lowest'."
 	  (character :tag "Character")
 	  (integer :tag "Integer (< 65)")))
 
-(defvaralias 'org-lowest-priority 'org-priority-lowest)
+(defalias 'org-lowest-priority 'org-priority-lowest)
 (defcustom org-priority-lowest ?C
   "The lowest priority of TODO items.
 A character like ?A, ?B, etc., or a numeric value like 1, 2, etc.
@@ -2403,7 +2404,7 @@ Must be higher than `org-priority-highest'."
 	  (character :tag "Character")
 	  (integer :tag "Integer (< 65)")))
 
-(defvaralias 'org-default-priority 'org-priority-default)
+(defalias 'org-default-priority 'org-priority-default)
 (defcustom org-priority-default ?B
   "The default priority of TODO items.
 This is the priority an item gets if no explicit priority is given.