From: Glenn Morris <rgm@gnu.org>
Date: Sat, 5 Apr 2008 20:20:08 +0000 (+0000)
Subject: (diary-hebrew-entry-symbol): Rename hebrew-diary-entry-symbol.
X-Git-Tag: emacs-pretest-23.0.90~6527
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bf41c46cd978f748e4f16a95c1de03f45d40b575;p=emacs.git

(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 --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 72a70cddf6d..e95df24b942 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -429,21 +429,30 @@ details, see the documentation for the variable `list-diary-entries-hook'."
   :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 @@ calendar."
   "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 @@ calendar."
   "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 @@ calendar."
   "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 @@ calendar."
     "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