Selaa lähdekoodia

Use org-icalendar-verify-function only if non-nil

Patch by Andrew Lawson.
Carsten Dominik 15 vuotta sitten
vanhempi
commit
3e84540bfa
2 muutettua tiedostoa jossa 5 lisäystä ja 2 poistoa
  1. 3 0
      lisp/ChangeLog
  2. 2 2
      lisp/org-icalendar.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-11-05  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-icalendar.el (org-print-icalendar-entries): Use
+	org-icalendar-verify-function only if non-nil.
+
 	* org.el (org-refile): Refile to clock only if the prefix arg is
 	2.
 	(org-sparse-tree): Fix docstring to be in line with prompt.

+ 2 - 2
lisp/org-icalendar.el

@@ -280,7 +280,7 @@ When COMBINE is non nil, add the category to each line."
       (while (re-search-forward re1 nil t)
 	(catch :skip
 	  (org-agenda-skip)
-	  (when (boundp 'org-icalendar-verify-function)
+	  (when org-icalendar-verify-function
 	    (unless (funcall org-icalendar-verify-function)
 	      (outline-next-heading)
 	      (backward-char 1)
@@ -403,7 +403,7 @@ END:VEVENT\n"
 	(while (re-search-forward org-todo-line-regexp nil t)
 	  (catch :skip
 	    (org-agenda-skip)
-	    (when (boundp 'org-icalendar-verify-function)
+	    (when org-icalendar-verify-function
 	      (unless (save-match-data
 			(funcall org-icalendar-verify-function))
 		(outline-next-heading)