Hi,
The following used to work ca. 6-8 weeks ago to work and allow me to
synchronise events in an Org file with a calendar provided by a
Nextcloud instance:
(defun lb/caldav-sync-fu ()
(interactive)
(let ((org-caldav-inbox "~/org/calendar_fu.org")
(org-caldav-url
"https://box.fu-berlin.de/remote.php/dav/calendars/loris";)
(org-caldav-calendar-id "work")
(org-caldav-files nil))
(call-interactively 'org-caldav-sync)))
However, at some point this stopped working and causes Emacs to hang.
When I interrupt the process, the debug output looks like this:
Debugger entered--Lisp error: (quit)
looking-at("^[ \011]*\n[ \011]*\n")
org-element--list-struct(178045)
org-element--current-element(178045 element nil nil)
org-element--parse-to(173969)
org-element-at-point()
org-element-context()
#f(compiled-function (specific end ts) #<bytecode 0x36584ed>)(nil 178045 nil)
org-entry-properties(nil)
org-cached-entry-get(nil "ID")
(or (org-cached-entry-get nil "ID") "")
(org-string<> (or (org-cached-entry-get nil "ID") "") "")
(and (org-string<> (or (org-cached-entry-get nil "ID") "") ""))
(or (and (org-string<> (or (org-cached-entry-get nil "ID") "") "")))
(progn (setq org-cached-props nil) (or (and (org-string<> (or
(org-cached-entry-get nil "ID") "") ""))))
(lambda (todo tags-list level) (progn (setq org-cached-props nil) (or (and
(org-string<> (or (org-cached-entry-get nil "ID") "") "")))))("TODO"
(#("office" 0 6 (inherited t))) 3)
org-scan-tags(#f(compiled-function () #<bytecode 0x30a1dd5>) (lambda (todo
tags-list level) (progn (setq org-cached-props nil) (or (and (org-string<> (or
(org-cached-entry-get nil "ID") "") ""))))) nil nil)
org-map-entries(#f(compiled-function () #<bytecode 0x30a1dd5>) "ID<>\"\"")
org-id-update-id-locations(nil t)
org-id-find("040000008200E00074C5B7101A82E0080000000058FD669EF11ED601000000000000000010000000569400313380EA48ADA6B07C1CF71CF8"
t)
org-caldav-generate-md5-for-org-entry("040000008200E00074C5B7101A82E0080000000058FD669EF11ED601000000000000000010000000569400313380EA48ADA6B07C1CF71CF8")
org-caldav-update-eventdb-from-org(#<buffer org-caldav-4TH4ol>)
#f(compiled-function () #<bytecode 0x1841c31>)()
funcall(#f(compiled-function () #<bytecode 0x1841c31>))
(let nil (funcall '#f(compiled-function () #<bytecode 0x1841c31>)))
eval((let nil (funcall '#f(compiled-function () #<bytecode 0x1841c31>))))
org-caldav-sync-calendar()
org-caldav-sync()
funcall-interactively(org-caldav-sync)
call-interactively(org-caldav-sync)
(let ((org-caldav-inbox "~/org/calendar_fu.org") (org-caldav-url
"https://box.fu-berlin.de/remote.php/dav/calendars/loris";)
(org-caldav-calendar-id "work") (org-caldav-files nil)) (call-interactively
'org-caldav-sync))
lb/caldav-sync-fu()
funcall-interactively(lb/caldav-sync-fu)
call-interactively(lb/caldav-sync-fu record nil)
command-execute(lb/caldav-sync-fu record)
execute-extended-command(nil "lb/caldav-sync-fu" nil)
funcall-interactively(execute-extended-command nil "lb/caldav-sync-fu" nil)
call-interactively(execute-extended-command nil nil)
command-execute(execute-extended-command)
Does anyone have any ideas about where things could be going wrong?
I'm using
GNU Emacs 26.1 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.24.5)
Org mode version 9.3.7 (9.3.7-18-g093b47-elpa @
/home/loris/.emacs.d/elpa/org-20200810/)
Cheers,
Loris
--
This signature is currently under construction.
