diff --git a/calfw-cal.el b/calfw-cal.el index 2a09711..a7c68ab 100644 --- a/calfw-cal.el +++ b/calfw-cal.el @@ -49,9 +49,9 @@ (defun cfw:cal-entry-to-event (date string) "[internal] Add text properties to string, allowing calfw to act on it." - (let* ((lines (split-string + (let* ((lines (split-string (replace-regexp-in-string - "[\t ]+" " " (cfw:trim string)) + "[\t ]+" " " string) "\n")) (first (car lines)) (desc (mapconcat 'identity (cdr lines) "\n"))