1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-08 20:58:58 +00:00

Fix detecting dotted pairs in icalendar-export-region

* lisp/calendar/icalendar.el (icalendar-export-region): Fix detecting
dotted pairs (bug#56241).
Copyright-paperwork-exempt: yes
This commit is contained in:
hokomo 2022-06-27 10:03:30 +02:00 committed by Lars Ingebrigtsen
parent bc3b20b441
commit c21487b2be

View File

@ -1144,7 +1144,8 @@ FExport diary data into iCalendar file: ")
(cdr contents-n-summary))))
(setq result (concat result header contents alarm
"\nEND:VEVENT")))
(if (consp cns-cons-or-list)
(if (and (consp cns-cons-or-list)
(not (listp (cdr cns-cons-or-list))))
(list cns-cons-or-list)
cns-cons-or-list)))
;; handle errors