From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: patch to org-exp.el fixing priority value of icalendar export Date: Tue, 28 Oct 2008 15:40:26 +0100 Message-ID: References: <20081028.230213.222899582.kames@fa2.so-net.ne.jp> Mime-Version: 1.0 (Apple Message framework v929.2) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Kupkc-0006w5-DS for emacs-orgmode@gnu.org; Tue, 28 Oct 2008 10:40:54 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Kupka-0006tJ-GP for emacs-orgmode@gnu.org; Tue, 28 Oct 2008 10:40:53 -0400 Received: from [199.232.76.173] (port=34273 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Kupka-0006t5-5M for emacs-orgmode@gnu.org; Tue, 28 Oct 2008 10:40:52 -0400 Received: from ug-out-1314.google.com ([66.249.92.172]:13878) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1KupkY-0001JT-Ah for emacs-orgmode@gnu.org; Tue, 28 Oct 2008 10:40:50 -0400 Received: by ug-out-1314.google.com with SMTP id 36so308871uga.17 for ; Tue, 28 Oct 2008 07:40:48 -0700 (PDT) In-Reply-To: <20081028.230213.222899582.kames@fa2.so-net.ne.jp> 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: Tokuya Kameshima Cc: emacs-orgmode@gnu.org Applied, thanks. - Carsten On Oct 28, 2008, at 3:02 PM, Tokuya Kameshima wrote: > Hi, > > Per RFC 2445, the priority value of 1 is the highest priority and 9 is > the lowest priority. But `org-print-icalendar-entries' writes the > opposite ones. > > Thanks, > --Tokuya > > PS. I found this bug when I started using Rainlendar to view ICS > exported events and tasks. > > ---------------------------------------- > diff --git a/lisp/org-exp.el b/lisp/org-exp.el > index 744952b..a4bf3ae 100644 > --- a/lisp/org-exp.el > +++ b/lisp/org-exp.el > @@ -3826,7 +3826,7 @@ END:VEVENT\n" > hd (concat (substring hd 0 (match-beginning 1)) > (substring hd (match-end 1)))) > (setq pri org-default-priority)) > - (setq pri (floor (1+ (* 8. (/ (float (- org-lowest-priority > pri)) > + (setq pri (floor (- 9 (* 8. (/ (float (- org-lowest-priority > pri)) > (- org-lowest-priority org-highest-priority)))))) > > (princ (format "BEGIN:VTODO > > > _______________________________________________ > Emacs-orgmode mailing list > Remember: use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode