|
@@ -5275,15 +5275,7 @@ each date. It also removes lines that contain only whitespace."
|
|
|
Needed to avoid empty dates which mess up holiday display."
|
|
|
;; Catch the error if dealing with the new add-to-diary-alist
|
|
|
(when org-disable-agenda-to-diary
|
|
|
- (condition-case nil
|
|
|
- (org-add-to-diary-list original-date "Org mode dummy" "")
|
|
|
- (error
|
|
|
- (org-add-to-diary-list original-date "Org mode dummy" "" nil)))))
|
|
|
-
|
|
|
-(defun org-add-to-diary-list (&rest args)
|
|
|
- (if (fboundp 'diary-add-to-list)
|
|
|
- (apply 'diary-add-to-list args)
|
|
|
- (apply 'add-to-diary-list args)))
|
|
|
+ (diary-add-to-list original-date "Org mode dummy" "")))
|
|
|
|
|
|
(defvar org-diary-last-run-time nil)
|
|
|
|