From mboxrd@z Thu Jan 1 00:00:00 1970 From: Daniel Martins Subject: Re: Re: Organizing a students live Date: Sat, 26 Dec 2009 22:51:31 -0200 Message-ID: <6ac505ad0912261651v553e4701y8299e3cd0ad0fdb9@mail.gmail.com> References: <877hskh81j.fsf@uni-mainz.de> <4B2C9A00.4000101@jboecker.de> <87oclv2osr.fsf@uni-mainz.de> <6ac505ad0912201454r1a9a951wbe4607adfa824376@mail.gmail.com> <6ac505ad0912210754x72a4e37cx674d3bf0af5cb4d6@mail.gmail.com> <0B9ABBC1-4CE1-4F14-B056-8BEBFCB5B0F0@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=windows-1252 Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NOhNA-0007Al-9i for emacs-orgmode@gnu.org; Sat, 26 Dec 2009 19:52:40 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NOhN5-00078Y-Gq for Emacs-orgmode@gnu.org; Sat, 26 Dec 2009 19:52:39 -0500 Received: from [199.232.76.173] (port=36988 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NOhN5-00078V-CJ for Emacs-orgmode@gnu.org; Sat, 26 Dec 2009 19:52:35 -0500 Received: from mail-qy0-f196.google.com ([209.85.221.196]:45184) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1NOhMz-0003Rc-VU for Emacs-orgmode@gnu.org; Sat, 26 Dec 2009 19:52:35 -0500 Received: by qyk34 with SMTP id 34so4707274qyk.14 for ; Sat, 26 Dec 2009 16:51:32 -0800 (PST) In-Reply-To: <0B9ABBC1-4CE1-4F14-B056-8BEBFCB5B0F0@gmail.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Carsten Dominik Cc: Matt Lundin , Emacs-orgmode@gnu.org I liked the idea of org-diary-class! About avoiding holidays and certain weeks: I used remind and wyrd for a while and they are a quite good software for dealing with such appts. There we have the OMIT function where we determine holidays and other non-working days including Sat and Sundays Normally we have an OMIT list at the beginning of file Some functions simply omit those dates Other expressions use another keyword AFTER (or BEFORE) to change OMIT behaviour like 23 Mar AFTER OMIT "Bank payment" eg If 23 Mar is in Saturday it will appear in Monday This preamble is just to say 2 things: 1) remind/wyrd could be used as a benchmark for some of the calendar isuues we have 2) I do not know if the week number in a year is a practical way of setting exceptions to org-diary-class Daniel PS Wyrd page is http://pessimization.com/software/wyrd/ 2009/12/26 Carsten Dominik : > Hi Daniel, > > I think it is a good idea to add such a function to org-mode. =A0But I > am not sure if skipping holidays is the best, because Universities > also have lecture-free weeks etc. > > So I am more thinking about a function like this (untested) > > (defun org-diary-class (m1 d1 y1 m2 d2 y2 dayname &rest skip-weeks) > =A0"Entry applies if date is between dates on DAYNAME, but skips SKIP-WEE= KS. > Order of the parameters is M1, D1, Y1, M2, D2, Y2 if > `european-calendar-style' is nil, and D1, M1, Y1, D2, M2, Y2 if > `european-calendar-style' is t. =A0The weeks are ISO week numbers where > the item should not apply." > =A0(let* ((date1 (calendar-absolute-from-gregorian > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (if european-calendar-style > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list d1 m1 y1) > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list m1 d1 y1)))) > =A0 =A0 =A0 =A0 (date2 (calendar-absolute-from-gregorian > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (if european-calendar-style > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list d2 m2 y2) > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list m2 d2 y2)))) > =A0 =A0 =A0 =A0 (d (calendar-absolute-from-gregorian date))) > =A0 =A0(and > =A0 =A0 (<=3D date1 d) > =A0 =A0 (<=3D d date2) > =A0 =A0 (=3D (calendar-day-of-week date) dayname) > =A0 =A0 (or (not skip-weeks) > =A0 =A0 =A0 =A0 (progn > =A0 =A0 =A0 =A0 =A0 (require 'cal-iso) > =A0 =A0 =A0 =A0 =A0 (not (member (car (calendar-iso-from-absolute d)) ski= p-weeks)))) > =A0 =A0 entry))) > > > What do you think? > > - Carsten > > On Dec 21, 2009, at 4:54 PM, Daniel Martins wrote: > >> In fact, it helps! Thanks >> >> However a sentence like this: >> >> >> +# a class that meets every Monday evening between February 16 and >> April 20, 2009 >> ** Class 7:00pm-9:00pm >> <%%(and (=3D 1 (calendar-day-of-week date)) (diary-block 2 16 2009 4 20 >> 2009))> >> >> is not an example of simplicity and visibility for a quite common featur= e! >> >> Maybe as a suggestion we could encapsulate such a huge expression in a >> simpler org-mode function ? >> >> Daniel >> >> >> PS In >> >> http://www.emacswiki.org/cgi-bin/wiki/DiaryMode#toc12 >> >> I found another suggestion which I do not know how to include in org-mod= e >> >> >> ------------------------------------ >> Schedule >> >> If you want to write a schedule for school or university, you need to >> define a block (it=92s derived from diary-block) between two dates and a >> weekday. The following function also recognizes holidays and won=92t >> send you to school on those days=85 :) >> >> =A0 (defun diary-schedule (m1 d1 y1 m2 d2 y2 dayname) >> =A0 =A0 "Entry applies if date is between dates on DAYNAME. >> =A0 Order of the parameters is M1, D1, Y1, M2, D2, Y2 if >> =A0 `european-calendar-style' is nil, and D1, M1, Y1, D2, M2, Y2 if >> =A0 `european-calendar-style' is t. Entry does not apply on a history." >> =A0 =A0 (let ((date1 (calendar-absolute-from-gregorian >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (if european-calendar-style >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list d1 m1 y1) >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list m1 d1 y1)))) >> =A0 =A0 =A0 =A0 =A0 (date2 (calendar-absolute-from-gregorian >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (if european-calendar-style >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list d2 m2 y2) >> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (list m2 d2 y2)))) >> =A0 =A0 =A0 =A0 =A0 (d (calendar-absolute-from-gregorian date))) >> =A0 =A0 =A0 (if (and >> =A0 =A0 =A0 =A0 =A0 =A0(<=3D date1 d) >> =A0 =A0 =A0 =A0 =A0 =A0(<=3D d date2) >> =A0 =A0 =A0 =A0 =A0 =A0(=3D (calendar-day-of-week date) dayname) >> =A0 =A0 =A0 =A0 =A0 =A0(not (check-calendar-holidays date)) >> =A0 =A0 =A0 =A0 =A0 =A0) >> =A0 =A0 =A0 =A0 =A0 =A0entry))) >> >> Then: "&%%(diary-schedule 22 4 2003 1 8 2003 2) 18:00 History" >> >> >> ------------------------------------ >> >> >> >> 2009/12/20 Matt Lundin : >>> >>> Daniel Martins writes: >>> >>>> All academics here present (including of course Carsten) suffer from >>>> the same problem, I think >>>> >>>> >>>> *** Math classes >>>> <2009-12-10 Thu 11:00-14:00 +1w> >>>> >>>> >>>> will repeat forever and ever... >>>> >>>> We need to create a schedule for a period. >>>> >>>> The package "remind" (and its simple interface "wyrd") do this job >>>> wonderfully but I do not know how to deal with this problem in Org >>>> mode >>> >>> The following FAQ should help: >>> >>> http://orgmode.org/worg/org-faq.php#diary-sexp-in-org-files >>> >>> - Matt >>> >> > >