diff options
| author | Kenichi Handa | 2010-11-01 16:55:44 +0900 |
|---|---|---|
| committer | Kenichi Handa | 2010-11-01 16:55:44 +0900 |
| commit | 8877ed24fa258b82e1e813bb2b328bd35677e31a (patch) | |
| tree | d9002c2ef8efd5979674e7f5ea7c94301b6f8db5 /lisp | |
| parent | f6f3366160e26ff5984f287e60616ec9f90acfa3 (diff) | |
| parent | 919dd7aa0a28d6baddd8802c132cba590d4baa85 (diff) | |
| download | emacs-8877ed24fa258b82e1e813bb2b328bd35677e31a.tar.gz emacs-8877ed24fa258b82e1e813bb2b328bd35677e31a.zip | |
merge trunk
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/calendar/holidays.el | 50 |
2 files changed, 30 insertions, 25 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9be6d045de3..94d7c9de921 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -14,6 +14,11 @@ | |||
| 14 | 14 | ||
| 15 | 2010-11-01 Glenn Morris <rgm@gnu.org> | 15 | 2010-11-01 Glenn Morris <rgm@gnu.org> |
| 16 | 16 | ||
| 17 | * calendar/holidays.el (general-holidays, oriental-holidays) | ||
| 18 | (local-holidays, other-holidays, hebrew-holidays, christian-holidays) | ||
| 19 | (islamic-holidays, bahai-holidays, solar-holidays): Move aliases before | ||
| 20 | the definitions of their targets. | ||
| 21 | |||
| 17 | * emacs-lisp/smie.el (smie): New custom group. | 22 | * emacs-lisp/smie.el (smie): New custom group. |
| 18 | (smie-blink-matching-inners, smie-indent-basic): Add :group. | 23 | (smie-blink-matching-inners, smie-indent-basic): Add :group. |
| 19 | 24 | ||
diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el index af61fdf149e..275c8a5ca29 100644 --- a/lisp/calendar/holidays.el +++ b/lisp/calendar/holidays.el | |||
| @@ -1,7 +1,8 @@ | |||
| 1 | ;;; holidays.el --- holiday functions for the calendar package | 1 | ;;; holidays.el --- holiday functions for the calendar package |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1989, 1990, 1992, 1993, 1994, 1997, 2001, 2002, 2003, | 3 | ;; Copyright (C) 1989, 1990, 1992, 1993, 1994, 1997, 2001, 2002, 2003, |
| 4 | ;; 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. | 4 | ;; 2004, 2005, 2006, 2007, 2008, 2009, 2010 |
| 5 | ;; Free Software Foundation, Inc. | ||
| 5 | 6 | ||
| 6 | ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu> | 7 | ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu> |
| 7 | ;; Maintainer: Glenn Morris <rgm@gnu.org> | 8 | ;; Maintainer: Glenn Morris <rgm@gnu.org> |
| @@ -43,6 +44,9 @@ | |||
| 43 | ;; explicitly load this file. | 44 | ;; explicitly load this file. |
| 44 | 45 | ||
| 45 | ;;;###autoload | 46 | ;;;###autoload |
| 47 | (define-obsolete-variable-alias 'general-holidays | ||
| 48 | 'holiday-general-holidays "23.1") | ||
| 49 | ;;;###autoload | ||
| 46 | (defcustom holiday-general-holidays | 50 | (defcustom holiday-general-holidays |
| 47 | (mapcar 'purecopy | 51 | (mapcar 'purecopy |
| 48 | '((holiday-fixed 1 1 "New Year's Day") | 52 | '((holiday-fixed 1 1 "New Year's Day") |
| @@ -68,11 +72,11 @@ See the documentation for `calendar-holidays' for details." | |||
| 68 | :group 'holidays) | 72 | :group 'holidays) |
| 69 | ;;;###autoload | 73 | ;;;###autoload |
| 70 | (put 'holiday-general-holidays 'risky-local-variable t) | 74 | (put 'holiday-general-holidays 'risky-local-variable t) |
| 71 | ;;;###autoload | ||
| 72 | (define-obsolete-variable-alias 'general-holidays | ||
| 73 | 'holiday-general-holidays "23.1") | ||
| 74 | 75 | ||
| 75 | ;;;###autoload | 76 | ;;;###autoload |
| 77 | (define-obsolete-variable-alias 'oriental-holidays | ||
| 78 | 'holiday-oriental-holidays "23.1") | ||
| 79 | ;;;###autoload | ||
| 76 | (defcustom holiday-oriental-holidays | 80 | (defcustom holiday-oriental-holidays |
| 77 | (mapcar 'purecopy | 81 | (mapcar 'purecopy |
| 78 | '((holiday-chinese-new-year) | 82 | '((holiday-chinese-new-year) |
| @@ -93,11 +97,10 @@ See the documentation for `calendar-holidays' for details." | |||
| 93 | :group 'holidays) | 97 | :group 'holidays) |
| 94 | ;;;###autoload | 98 | ;;;###autoload |
| 95 | (put 'holiday-oriental-holidays 'risky-local-variable t) | 99 | (put 'holiday-oriental-holidays 'risky-local-variable t) |
| 96 | ;;;###autoload | ||
| 97 | (define-obsolete-variable-alias 'oriental-holidays | ||
| 98 | 'holiday-oriental-holidays "23.1") | ||
| 99 | 100 | ||
| 100 | ;;;###autoload | 101 | ;;;###autoload |
| 102 | (define-obsolete-variable-alias 'local-holidays 'holiday-local-holidays "23.1") | ||
| 103 | ;;;###autoload | ||
| 101 | (defcustom holiday-local-holidays nil | 104 | (defcustom holiday-local-holidays nil |
| 102 | "Local holidays. | 105 | "Local holidays. |
| 103 | See the documentation for `calendar-holidays' for details." | 106 | See the documentation for `calendar-holidays' for details." |
| @@ -105,10 +108,10 @@ See the documentation for `calendar-holidays' for details." | |||
| 105 | :group 'holidays) | 108 | :group 'holidays) |
| 106 | ;;;###autoload | 109 | ;;;###autoload |
| 107 | (put 'holiday-local-holidays 'risky-local-variable t) | 110 | (put 'holiday-local-holidays 'risky-local-variable t) |
| 108 | ;;;###autoload | ||
| 109 | (define-obsolete-variable-alias 'local-holidays 'holiday-local-holidays "23.1") | ||
| 110 | 111 | ||
| 111 | ;;;###autoload | 112 | ;;;###autoload |
| 113 | (define-obsolete-variable-alias 'other-holidays 'holiday-other-holidays "23.1") | ||
| 114 | ;;;###autoload | ||
| 112 | (defcustom holiday-other-holidays nil | 115 | (defcustom holiday-other-holidays nil |
| 113 | "User defined holidays. | 116 | "User defined holidays. |
| 114 | See the documentation for `calendar-holidays' for details." | 117 | See the documentation for `calendar-holidays' for details." |
| @@ -116,8 +119,6 @@ See the documentation for `calendar-holidays' for details." | |||
| 116 | :group 'holidays) | 119 | :group 'holidays) |
| 117 | ;;;###autoload | 120 | ;;;###autoload |
| 118 | (put 'holiday-other-holidays 'risky-local-variable t) | 121 | (put 'holiday-other-holidays 'risky-local-variable t) |
| 119 | ;;;###autoload | ||
| 120 | (define-obsolete-variable-alias 'other-holidays 'holiday-other-holidays "23.1") | ||
| 121 | 122 | ||
| 122 | ;;;###autoload | 123 | ;;;###autoload |
| 123 | (defvar hebrew-holidays-1 | 124 | (defvar hebrew-holidays-1 |
| @@ -219,6 +220,9 @@ See the documentation for `calendar-holidays' for details." | |||
| 219 | (make-obsolete-variable 'hebrew-holidays-4 'hebrew-holidays "23.1") | 220 | (make-obsolete-variable 'hebrew-holidays-4 'hebrew-holidays "23.1") |
| 220 | 221 | ||
| 221 | ;;;###autoload | 222 | ;;;###autoload |
| 223 | (define-obsolete-variable-alias 'hebrew-holidays | ||
| 224 | 'holiday-hebrew-holidays "23.1") | ||
| 225 | ;;;###autoload | ||
| 222 | (defcustom holiday-hebrew-holidays | 226 | (defcustom holiday-hebrew-holidays |
| 223 | (mapcar 'purecopy | 227 | (mapcar 'purecopy |
| 224 | '((holiday-hebrew-passover) | 228 | '((holiday-hebrew-passover) |
| @@ -235,11 +239,11 @@ See the documentation for `calendar-holidays' for details." | |||
| 235 | :group 'holidays) | 239 | :group 'holidays) |
| 236 | ;;;###autoload | 240 | ;;;###autoload |
| 237 | (put 'holiday-hebrew-holidays 'risky-local-variable t) | 241 | (put 'holiday-hebrew-holidays 'risky-local-variable t) |
| 238 | ;;;###autoload | ||
| 239 | (define-obsolete-variable-alias 'hebrew-holidays | ||
| 240 | 'holiday-hebrew-holidays "23.1") | ||
| 241 | 242 | ||
| 242 | ;;;###autoload | 243 | ;;;###autoload |
| 244 | (define-obsolete-variable-alias 'christian-holidays | ||
| 245 | 'holiday-christian-holidays "23.1") | ||
| 246 | ;;;###autoload | ||
| 243 | (defcustom holiday-christian-holidays | 247 | (defcustom holiday-christian-holidays |
| 244 | (mapcar 'purecopy | 248 | (mapcar 'purecopy |
| 245 | '((holiday-easter-etc) ; respects calendar-christian-all-holidays-flag | 249 | '((holiday-easter-etc) ; respects calendar-christian-all-holidays-flag |
| @@ -257,11 +261,11 @@ See the documentation for `calendar-holidays' for details." | |||
| 257 | :group 'holidays) | 261 | :group 'holidays) |
| 258 | ;;;###autoload | 262 | ;;;###autoload |
| 259 | (put 'holiday-christian-holidays 'risky-local-variable t) | 263 | (put 'holiday-christian-holidays 'risky-local-variable t) |
| 260 | ;;;###autoload | ||
| 261 | (define-obsolete-variable-alias 'christian-holidays | ||
| 262 | 'holiday-christian-holidays "23.1") | ||
| 263 | 264 | ||
| 264 | ;;;###autoload | 265 | ;;;###autoload |
| 266 | (define-obsolete-variable-alias 'islamic-holidays | ||
| 267 | 'holiday-islamic-holidays "23.1") | ||
| 268 | ;;;###autoload | ||
| 265 | (defcustom holiday-islamic-holidays | 269 | (defcustom holiday-islamic-holidays |
| 266 | (mapcar 'purecopy | 270 | (mapcar 'purecopy |
| 267 | '((holiday-islamic-new-year) | 271 | '((holiday-islamic-new-year) |
| @@ -281,11 +285,10 @@ See the documentation for `calendar-holidays' for details." | |||
| 281 | :group 'holidays) | 285 | :group 'holidays) |
| 282 | ;;;###autoload | 286 | ;;;###autoload |
| 283 | (put 'holiday-islamic-holidays 'risky-local-variable t) | 287 | (put 'holiday-islamic-holidays 'risky-local-variable t) |
| 284 | ;;;###autoload | ||
| 285 | (define-obsolete-variable-alias 'islamic-holidays | ||
| 286 | 'holiday-islamic-holidays "23.1") | ||
| 287 | 288 | ||
| 288 | ;;;###autoload | 289 | ;;;###autoload |
| 290 | (define-obsolete-variable-alias 'bahai-holidays 'holiday-bahai-holidays "23.1") | ||
| 291 | ;;;###autoload | ||
| 289 | (defcustom holiday-bahai-holidays | 292 | (defcustom holiday-bahai-holidays |
| 290 | (mapcar 'purecopy | 293 | (mapcar 'purecopy |
| 291 | '((holiday-bahai-new-year) | 294 | '((holiday-bahai-new-year) |
| @@ -305,10 +308,10 @@ See the documentation for `calendar-holidays' for details." | |||
| 305 | :group 'holidays) | 308 | :group 'holidays) |
| 306 | ;;;###autoload | 309 | ;;;###autoload |
| 307 | (put 'holiday-bahai-holidays 'risky-local-variable t) | 310 | (put 'holiday-bahai-holidays 'risky-local-variable t) |
| 308 | ;;;###autoload | ||
| 309 | (define-obsolete-variable-alias 'bahai-holidays 'holiday-bahai-holidays "23.1") | ||
| 310 | 311 | ||
| 311 | ;;;###autoload | 312 | ;;;###autoload |
| 313 | (define-obsolete-variable-alias 'solar-holidays 'holiday-solar-holidays "23.1") | ||
| 314 | ;;;###autoload | ||
| 312 | (defcustom holiday-solar-holidays | 315 | (defcustom holiday-solar-holidays |
| 313 | (mapcar 'purecopy | 316 | (mapcar 'purecopy |
| 314 | '((solar-equinoxes-solstices) | 317 | '((solar-equinoxes-solstices) |
| @@ -328,8 +331,6 @@ See the documentation for `calendar-holidays' for details." | |||
| 328 | :group 'holidays) | 331 | :group 'holidays) |
| 329 | ;;;###autoload | 332 | ;;;###autoload |
| 330 | (put 'holiday-solar-holidays 'risky-local-variable t) | 333 | (put 'holiday-solar-holidays 'risky-local-variable t) |
| 331 | ;;;###autoload | ||
| 332 | (define-obsolete-variable-alias 'solar-holidays 'holiday-solar-holidays "23.1") | ||
| 333 | 334 | ||
| 334 | ;; This one should not be autoloaded, else .emacs changes of | 335 | ;; This one should not be autoloaded, else .emacs changes of |
| 335 | ;; holiday-general-holidays etc have no effect. | 336 | ;; holiday-general-holidays etc have no effect. |
| @@ -919,5 +920,4 @@ is non-nil)." | |||
| 919 | 920 | ||
| 920 | (provide 'holidays) | 921 | (provide 'holidays) |
| 921 | 922 | ||
| 922 | ;; arch-tag: 48eb3117-75a7-4dbe-8fd9-873c3cbb0d37 | ||
| 923 | ;;; holidays.el ends here | 923 | ;;; holidays.el ends here |