Function: calendar-mark-date-pattern
calendar-mark-date-pattern is a byte-compiled function defined in
diary-lib.el.gz.
Signature
(calendar-mark-date-pattern MONTH DAY YEAR &optional COLOR)
Documentation
Mark all dates in the calendar window that conform to MONTH/DAY/YEAR.
A value of 0 in any position is a wildcard. Optional argument COLOR is
passed to calendar-mark-visible-date as MARK.
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/diary-lib.el.gz
(defun calendar-mark-date-pattern (month day year &optional color)
"Mark all dates in the calendar window that conform to MONTH/DAY/YEAR.
A value of 0 in any position is a wildcard. Optional argument COLOR is
passed to `calendar-mark-visible-date' as MARK."
(with-current-buffer calendar-buffer
(let ((m displayed-month)
(y displayed-year))
(calendar-increment-month m y -1)
(dotimes (_ 3)
(calendar-mark-month m y month day year color)
(calendar-increment-month m y 1)))))