Re: Calendar-like view of the org-agenda

[Bastien <bzg@altern.org>]

[-- Attachment #1: Type: text/plain, Size: 508 bytes --]

Hi Masashi,

SAKURAI Masashi <m.sakurai@kiwanami.net> writes:

> Then, I use the function org-agenda-get-day-entries to get schedule
> items of the org-agenda-files. The function can receive some arguments
> to limit the tasks, but I didn't understand exactly.  

See the attached patch -- org-agenda-get-day-entries can take more
arguments like :scheduled :deadline to help reduce the size of listed
entries.  See the docstring of org-diary, which understands the same
list of arguments.

Hope this helps,


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-Variable-for-faster-use-of-org-agenda-get-day-entrie.patch --]
[-- Type: text/x-patch, Size: 1170 bytes --]

From 7d54f5dc7cca22912d3dd9a8f6d00df7138942f3 Mon Sep 17 00:00:00 2001
From: Bastien Guerry <bzg@altern.org>
Date: Thu, 7 Jul 2011 17:15:08 +0200
Subject: [PATCH] Variable for faster use of org-agenda-get-day-entries.

This is just an example.
---
 calfw-org.el |    7 ++++++-
 1 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/calfw-org.el b/calfw-org.el
index 99fe18e..ec43796 100644
--- a/calfw-org.el
+++ b/calfw-org.el
@@ -34,6 +34,9 @@
 (require 'org)
 (require 'org-agenda)
 
+(defvar cfw:org-agenda-schedule-args '(:scheduled)
+  "Default arguments for collecting agenda entries.")
+
 (defun cfw:org-collect-schedules-period (begin end)
   "[internal] Return org schedule items between BEGIN and END."
   (let ((org-agenda-prefix-format "")
@@ -43,7 +46,9 @@
           (loop for file in (org-agenda-files nil 'ifmode) append
                 (progn
                   (org-check-agenda-file file)
-                  (org-agenda-get-day-entries file date))))))
+                  (apply 'org-agenda-get-day-entries 
+			 file date 
+			 cfw:org-agenda-schedule-args))))))
 
 (defun cfw:org-onclick ()
   "Jump to the clicked org item."
-- 
1.7.5.2


[-- Attachment #3: Type: text/plain, Size: 14 bytes --]


-- 
 Bastien