tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

iCalendar export: Honor user request to skip plain time stamps

This commit is contained in:
Carsten Dominik 2009-10-28 16:21:09 +01:00
parent 848b2039a1
commit 1029daee03
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,5 +1,9 @@
2009-10-28 Carsten Dominik <carsten.dominik@gmail.com>
* org-icalendar.el (org-icalendar-use-plain-timestamp): New option.
(org-print-icalendar-entries): Skip entries where the timestamp is
not a deadline and not scheduled, if the user requests that.
* org-latex.el (org-export-latex-quotation-marks): Allow a bracket
before an opening quote.

8
lisp/org-icalendar.el
View File

@ -47,6 +47,11 @@ The file name should be absolute, the file will be overwritten without warning."
:group 'org-export-icalendar
:type 'string)
(defcustom org-icalendar-use-plain-timestamp t
"Non-nil means, make an event from every plain time stamp."
:group 'org-export-icalendar
:type 'boolean)
(defcustom org-icalendar-use-deadline '(event-if-not-todo todo-due)
"Contexts where iCalendar export should use a deadline time stamp.
This is a list with several symbols in it. Valid symbol are:
@ -307,6 +312,9 @@ When COMBINE is non nil, add the category to each line."
todo (org-get-todo-state)
;; donep (org-entry-is-done-p)
))
(when (and (not org-icalendar-use-plain-timestamp)
(not deadlinep) (not scheduledp))
(throw :skip t))
(when (and
deadlinep
(if todo