From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: bxf4@yahoo.com Newsgroups: gmane.emacs.help Subject: Re: diary sexp question Date: Thu, 15 Dec 2005 00:13:23 -0800 Organization: University of Washington Message-ID: References: <85fyoxk9ri.fsf@emr.cs.iit.edu> <858xunjsws.fsf@emr.cs.iit.edu> Reply-To: bxf4@yahoo.com NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1134637020 23868 80.91.229.2 (15 Dec 2005 08:57:00 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 15 Dec 2005 08:57:00 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Dec 15 09:56:51 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Emou9-0007xf-TI for geh-help-gnu-emacs@m.gmane.org; Thu, 15 Dec 2005 09:56:02 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Emoun-0001tN-4A for geh-help-gnu-emacs@m.gmane.org; Thu, 15 Dec 2005 03:56:41 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!logbridge.uoregon.edu!arclight.uoregon.edu!news.u.washington.edu!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 29 Original-NNTP-Posting-Host: pool-71-112-236-46.sttlwa.dsl-w.verizon.net Original-X-Trace: gnus01.u.washington.edu 1134634462 30544 71.112.236.46 (15 Dec 2005 08:14:22 GMT) Original-X-Complaints-To: help@cac.washington.edu Original-NNTP-Posting-Date: Thu, 15 Dec 2005 08:14:22 +0000 (UTC) User-Agent: Gnus/5.110003 (No Gnus v0.3) Emacs/22.0.50 (darwin) Cancel-Lock: sha1:zUgjned1F4BTj3/A4sdU0+KL3Ic= Original-Xref: shelby.stanford.edu gnu.emacs.help:136322 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:31950 Archived-At: reingold@emr.cs.iit.edu (Edward M. Reingold) writes: > I would use > > &%%(let ((dayname (calendar-day-of-week date)) > (day (extract-calendar-day date))) > (and (memq dayname '(2 4)) > (diary-block 1 23 2006 5 8 2006))) 1:30pm-2:20pm teach Bldg 1 Thank you very much for the functions. They work quite well. If I do this, &%%(progn (defun fall-quarter () (diary-block 9 27 2006 12 8 2006)) nil) &%%(progn (defun winter-quarter () (diary-block 1 3 2006 3 10 2006)) nil) &%%(progn (defun spring-quarter () (diary-block 3 27 2006 6 2 2006)) nil) how can I form the union of those three diary-blocks? I tried 'or' and 'cons', but I'm sure I was doing it incorrectly. I tried looking over the emacslisp-intro and emacs-lisp reference, but 'or' is a pretty common word. I was after something like this: &%%(let ((dayname (calendar-day-of-week date)) (day (extract-calendar-day date))) (and (memq dayname '(4)) (or fall-quarter winter-quarter spring-quarter))) 15:30 faculty meeting Thank you again. If I've worn out my welcome, please disregard this. You've already helped me greatly.