From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Gijs Hillenius Newsgroups: gmane.emacs.devel Subject: Re: calendar thinks 2007 == 2008 Date: Mon, 07 Apr 2008 22:26:53 +0200 Message-ID: <87fxtxe7hu.fsf@hillenius.net> References: <87zls5edgh.fsf@hillenius.net> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1207666920 22300 80.91.229.12 (8 Apr 2008 15:02:00 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Tue, 8 Apr 2008 15:02:00 +0000 (UTC) To: Emacs-Devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Tue Apr 08 17:02:28 2008 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1JjFKf-0006e6-TI for ged-emacs-devel@m.gmane.org; Tue, 08 Apr 2008 17:01:58 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1JjFK2-0000YM-N7 for ged-emacs-devel@m.gmane.org; Tue, 08 Apr 2008 11:01:18 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Jixvd-0000OB-6A for emacs-devel@gnu.org; Mon, 07 Apr 2008 16:26:57 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Jixvb-0000Lu-SC for Emacs-Devel@gnu.org; Mon, 07 Apr 2008 16:26:56 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Jixvb-0000LU-JB for Emacs-Devel@gnu.org; Mon, 07 Apr 2008 16:26:55 -0400 Original-Received: from hillenius.net ([82.95.145.236]) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1Jixvb-0006Ac-1A for Emacs-Devel@gnu.org; Mon, 07 Apr 2008 16:26:55 -0400 Original-Received: from localhost ([127.0.0.1] helo=bufo-sapiens) by hillenius.net with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.67) (envelope-from ) id 1JixvZ-0003EY-J4 for Emacs-Devel@gnu.org; Mon, 07 Apr 2008 22:26:53 +0200 Original-Received: from gijs by bufo-sapiens with local (Exim 4.69) (envelope-from ) id 1JixvZ-0006ob-6F for Emacs-Devel@gnu.org; Mon, 07 Apr 2008 22:26:53 +0200 X-Operating-System: Debian GNU/Linux Sid X-GPGP-Fingerprint: 0D0B 9C67 0520 3B27 A91C 369B 7154 1B0A 04CF 3929 In-Reply-To: (Glenn Morris's message of "Mon, 07 Apr 2008 15:17:33 -0400") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) X-detected-kernel: by monty-python.gnu.org: Genre and OS details not recognized. X-Mailman-Approved-At: Tue, 08 Apr 2008 10:57:21 -0400 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:94703 Archived-At: On 7 Apr 2008, Glenn Morris replied: to what I wrote: >> I'm use emacs-cvs, and erm, this could very well be my own doing, but >> since the last update of my debian cvs package, my calendar block >> appointments seem to randomly show up most or some other days. In any case >> don't stop at the block end date. > > Recipe starting from emacs -Q and including minimal example diary file please. > > If the debian package is old, tests with the current CVS trunk are > more useful. Hello, thx for the reply. That shows me the error is prolly in one of my start-up files: Here is what happens if I start emacs-snapshot-gtk -Q and then open the calendar and point to a date: Bad sexp at line 941 in ~/diary: (cyclic-diary-block 09 02 2007 25 05 2007 7) Preparing diary...done And then I get this when I click on the date %%(diary-block 27 01 2006 29 01 2006) appointments & stuff %%(diary-block 23 4 2006 30 4 2006) stuff.. %%(diary-block 14 7 2007 29 7 2007) stuff .. %%(diary-block 6 8 2007 23 8 2007) stuff %%(diary-block 4 20 2008 4 23 2008) stuff line 941 (indeed) is &%%(cyclic-diary-block 09 02 2007 25 05 2007 7) stuff which is a function in one of my files: (defun cyclic-diary-block (sday smon syear eday emon eyear interv) (let ((beg (calendar-absolute-from-gregorian (list smon sday syear))) (end (calendar-absolute-from-gregorian (list emon eday eyear))) (now (calendar-absolute-from-gregorian date)) (int interv)) (when (and (>= now beg) (<= now end) (= (mod (- now beg) int) 0)) t))) Hm. -- Who would have guessed reading and writing would pay off! -- Homer, "Mr. Lisa Goes to Washington"