From: Karl Heuer Date: Sat, 29 Aug 1998 15:59:01 +0000 (+0000) Subject: (chinese-year-cache): Change range of years from X-Git-Tag: emacs-20.4~1806 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6bd677fa1b7f574b1610fc874ef8117a96b7b3ea;p=emacs.git (chinese-year-cache): Change range of years from 1989-2000 to 1990-2010. --- diff --git a/lisp/calendar/cal-china.el b/lisp/calendar/cal-china.el index fbb167fa40b..304d2c28327 100644 --- a/lisp/calendar/cal-china.el +++ b/lisp/calendar/cal-china.el @@ -182,9 +182,7 @@ The Zodiac signs begin when the sun's longitude is a multiple of 30 degrees." (calendar-astro-from-absolute d)))))) (defvar chinese-year-cache - '((1989 (12 726110) (1 726139) (2 726169) (3 726198) (4 726227) (5 726257) - (6 726286) (7 726316) (8 726345) (9 726375) (10 726404) (11 726434)) - (1990 (12 726464) (1 726494) (2 726523) (3 726553) (4 726582) (5 726611) + '((1990 (12 726464) (1 726494) (2 726523) (3 726553) (4 726582) (5 726611) (5.5 726641) (6 726670) (7 726699) (8 726729) (9 726758) (10 726788) (11 726818)) (1991 (12 726848) (1 726878) (2 726907) (3 726937) (4 726966) (5 726995) @@ -209,12 +207,36 @@ The Zodiac signs begin when the sun's longitude is a multiple of 30 degrees." (1999 (12 729771) (1 729801) (2 729831) (3 729860) (4 729889) (5 729919) (6 729948) (7 729977) (8 730007) (9 730036) (10 730066) (11 730096)) (2000 (12 730126) (1 730155) (2 730185) (3 730215) (4 730244) (5 730273) - (6 730303) (7 730332) (8 730361) (9 730391) (10 730420) (11 730450))) + (6 730303) (7 730332) (8 730361) (9 730391) (10 730420) (11 730450)) + (2001 (12 730480) (1 730509) (2 730539) (3 730569) (4 730598) (4.5 730628) + (5 730657) (6 730687) (7 730716) (8 730745) (9 730775) (10 730804) + (11 730834)) + (2002 (12 730863) (1 730893) (2 730923) (3 730953) (4 730982) (5 731012) + (6 731041) (7 731071) (8 731100) (9 731129) (10 731159) (11 731188)) + (2003 (12 731218) (1 731247) (2 731277) (3 731307) (4 731336) (5 731366) + (6 731396) (7 731425) (8 731455) (9 731484) (10 731513) (11 731543)) + (2004 (12 731572) (1 731602) (2 731631) (2.5 731661) (3 731690) (4 731720) + (5 731750) (6 731779) (7 731809) (8 731838) (9 731868) (10 731897) + (11 731927)) + (2005 (12 731956) (1 731986) (2 732015) (3 732045) (4 732074) (5 732104) + (6 732133) (7 732163) (8 732193) (9 732222) (10 732252) (11 732281)) + (2006 (12 732311) (1 732340) (2 732370) (3 732399) (4 732429) (5 732458) + (6 732488) (7 732517) (7.5 732547) (8 732576) (9 732606) (10 732636) + (11 732665)) + (2007 (12 732695) (1 732725) (2 732754) (3 732783) (4 732813) (5 732842) + (6 732871) (7 732901) (8 732930) (9 732960) (10 732990) (11 733020)) + (2008 (12 733049) (1 733079) (2 733109) (3 733138) (4 733167) (5 733197) + (6 733226) (7 733255) (8 733285) (9 733314) (10 733344) (11 733374)) + (2009 (12 733403) (1 733433) (2 733463) (3 733493) (4 733522) (5 733551) + (5.5 733581) (6 733610) (7 733639) (8 733669) (9 733698) (10 733728) + (11 733757)) + (2010 (12 733787) (1 733817) (2 733847) (3 733876) (4 733906) (5 733935) + (6 733965) (7 733994) (8 734023) (9 734053) (10 734082) (11 734112))) "An assoc list of Chinese year structures as determined by `chinese-year'. Values are computed as needed, but to save time, the initial value consists -of the precomputed years 1989-2000. The code works just as well with this -set to nil initially (which is how the value for 1989-2000 was computed).") +of the precomputed years 1990-2010. The code works just as well with this +set to nil initially (which is how the value for 1990-2010 was computed).") (defun chinese-year (y) "The structure of the Chinese year for Gregorian year Y.