Bastien <[EMAIL PROTECTED]> writes:
> ;; Use (org-write-agenda file)
> (defun org-agenda-to-file (key file &optional max-line-width)
> "Write the `org-agenda' view associated with KEY to FILE.
> MAX-LINE-WIDTH optionally specifies the maximum line width for
> the text in the resulting file."
> (interactive)
> (save-window-excursion
> (org-agenda nil key)
> (switch-to-buffer "*Org Agenda*")
> (org-write-agenda file)
> (org-agenda-quit))
> (if max-width (put-file-content-in-procustes-bed
> file max-line-length)))
Sorry, typos, should read:
(defun org-agenda-to-file (key file &optional max-line-width)
"Write the `org-agenda' view associated with KEY to FILE.
MAX-LINE-WIDTH optionally specifies the maximum line width for
the text in the resulting file."
(interactive)
(save-window-excursion
(org-agenda nil key)
(switch-to-buffer "*Org Agenda*")
(org-write-agenda file)
(org-agenda-quit))
(if max-line-width (put-file-content-in-procustes-bed
file max-line-width)))
--
Bastien
_______________________________________________
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
