# HG changeset patch # User Glenn Morris # Date 1207426808 0 # Node ID 4228779bdf81bc157c150c27c333165ad638a2e5 # Parent 8dc921bd717183c777939c94d4f86c29d00e2bc1 (diary-hebrew-entry-symbol): Rename hebrew-diary-entry-symbol. Keep old name as alias. (diary-islamic-entry-symbol): Rename islamic-diary-entry-symbol. Keep old name as alias. (diary-bahai-entry-symbol): Rename bahai-diary-entry-symbol. Keep old name as alias. (hebrew-holidays-1, hebrew-holidays-2, hebrew-holidays-3) (hebrew-holidays-4): Don't autoload obsolescence. diff -r 8dc921bd7171 -r 4228779bdf81 lisp/calendar/calendar.el --- a/lisp/calendar/calendar.el Sat Apr 05 20:18:32 2008 +0000 +++ b/lisp/calendar/calendar.el Sat Apr 05 20:20:08 2008 +0000 @@ -429,21 +429,30 @@ :type 'string :group 'diary) -(defcustom hebrew-diary-entry-symbol "H" +(defcustom diary-hebrew-entry-symbol "H" "Symbol indicating a diary entry according to the Hebrew calendar." :type 'string :group 'diary) -(defcustom islamic-diary-entry-symbol "I" +(define-obsolete-variable-alias 'hebrew-diary-entry-symbol + 'diary-hebrew-entry-symbol "23.1") + +(defcustom diary-islamic-entry-symbol "I" "Symbol indicating a diary entry according to the Islamic calendar." :type 'string :group 'diary) -(defcustom bahai-diary-entry-symbol "B" +(define-obsolete-variable-alias 'islamic-diary-entry-symbol + 'diary-islamic-entry-symbol "23.1") + +(defcustom diary-bahai-entry-symbol "B" "Symbol indicating a diary entry according to the Baha'i calendar." :type 'string :group 'diary) +(define-obsolete-variable-alias 'bahai-diary-entry-symbol + 'diary-bahai-entry-symbol "23.1") + ;;;###autoload (defcustom european-calendar-style nil "Non-nil means use the European style of dates in the diary and display. @@ -831,7 +840,6 @@ "Component of the default value of `hebrew-holidays'.") ;;;###autoload (put 'hebrew-holidays-1 'risky-local-variable t) -;;;###autoload (make-obsolete-variable 'hebrew-holidays-1 'hebrew-holidays "23.1") ;;;###autoload @@ -853,7 +861,6 @@ "Component of the default value of `hebrew-holidays'.") ;;;###autoload (put 'hebrew-holidays-2 'risky-local-variable t) -;;;###autoload (make-obsolete-variable 'hebrew-holidays-2 'hebrew-holidays "23.1") ;;;###autoload @@ -887,7 +894,6 @@ "Component of the default value of `hebrew-holidays'.") ;;;###autoload (put 'hebrew-holidays-3 'risky-local-variable t) -;;;###autoload (make-obsolete-variable 'hebrew-holidays-3 'hebrew-holidays "23.1") ;;;###autoload @@ -908,7 +914,6 @@ "Component of the default value of `hebrew-holidays'.") ;;;###autoload (put 'hebrew-holidays-4 'risky-local-variable t) -;;;###autoload (make-obsolete-variable 'hebrew-holidays-4 'hebrew-holidays "23.1") ;;;###autoload