[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: diary sexp question
From: |
bxf4 |
Subject: |
Re: diary sexp question |
Date: |
Thu, 15 Dec 2005 00:13:23 -0800 |
User-agent: |
Gnus/5.110003 (No Gnus v0.3) Emacs/22.0.50 (darwin) |
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.