Commit 92c56fe7 authored by Glenn Morris's avatar Glenn Morris

* lisp/calendar/diary-lib.el (diary-outlook-format-1): Fix match-strings.

parent d01d7b8d
......@@ -309,11 +309,10 @@ If this variable is nil, years must be written in full."
"Return a replace-match template for an element of `diary-outlook-formats'.
Returns a string using match elements 1-5, where:
1 = month name, 2 = day, 3 = year, 4 = time, 5 = location; also uses
%s = message subject.
The argument BODY is not used."
(let* ((monthname (match-string 1))
(day (match-string 2))
(year (match-string 3))
%s = message subject. BODY is the string from which the matches derive."
(let* ((monthname (match-string 1 body))
(day (match-string 2 body))
(year (match-string 3 body))
;; Blech.
(month (catch 'found
(dotimes (i (length calendar-month-name-array))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment