diff options
Diffstat (limited to 'lisp/calendar/icalendar.el')
| -rw-r--r-- | lisp/calendar/icalendar.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/calendar/icalendar.el b/lisp/calendar/icalendar.el index b75e4423080..4b71530febb 100644 --- a/lisp/calendar/icalendar.el +++ b/lisp/calendar/icalendar.el @@ -482,7 +482,7 @@ children." result)) (defun icalendar--split-value (value-string) - "Split VALUE-STRING at ‘;=’." + "Split VALUE-STRING at `;='." (let ((result '()) param-name param-value) (when value-string @@ -1118,7 +1118,7 @@ FExport diary data into iCalendar file: ") (setq found-error t) (save-current-buffer (set-buffer (get-buffer-create "*icalendar-errors*")) - (insert (format-message "Error in line %d -- %s: ‘%s’\n" + (insert (format-message "Error in line %d -- %s: `%s'\n" (count-lines (point-min) (point)) error-val entry-main)))))) @@ -1741,7 +1741,7 @@ entries. ENTRY-MAIN is the first line of the diary entry." (when day (progn (icalendar--dmsg "diary-float %s" entry-main) - (error "Don't know if or how to implement day in ‘diary-float’"))) + (error "Don't know if or how to implement day in `diary-float'"))) (cons (concat ;;Start today (yes this is an arbitrary choice): @@ -1788,7 +1788,7 @@ entries. ENTRY-MAIN is the first line of the diary entry." entry-main) (progn (icalendar--dmsg "diary-date %s" entry-main) - (error "‘diary-date’ is not supported yet")) + (error "`diary-date' is not supported yet")) ;; no match nil)) @@ -2104,7 +2104,7 @@ written into the buffer `*icalendar-errors*'." (rrule (icalendar--get-event-property e 'RRULE)) (rdate (icalendar--get-event-property e 'RDATE)) (duration (icalendar--get-event-property e 'DURATION))) - (icalendar--dmsg "%s: ‘%s’" start-d summary) + (icalendar--dmsg "%s: `%s'" start-d summary) ;; check whether start-time is missing (if (and dtstart (string= @@ -2282,7 +2282,7 @@ END-T is the event's end time in diary format." interval)))) ) (t - (message "Cannot handle COUNT attribute for ‘%s’ events." + (message "Cannot handle COUNT attribute for `%s' events." frequency))) (setq until-conv (icalendar--datetime-to-diary-date until)) (setq until-1-conv (icalendar--datetime-to-diary-date until-1)) @@ -2473,7 +2473,7 @@ SUMMARY is not nil it must be a string that gives the summary of the entry. In this case the user will be asked whether he wants to insert the entry." (when (or (not summary) - (y-or-n-p (format-message "Add appointment for ‘%s’ to diary? " + (y-or-n-p (format-message "Add appointment for `%s' to diary? " summary))) (when summary (setq non-marking |