org-caldav-sync hangs

[Loris Bennett]

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.