John Kitchin <jkitc...@andrew.cmu.edu> writes: > This slightly different code (differs only in assigning an anonymous face > instead of an actual face doesn't do that exactly. Today is still marked > red, but it is no longer selected with the inverse square. Neighboring days > do get the red square, but not "today". > > (let* ((mark-calendar (lambda () > (calendar-mark-visible-date > (read (format-time-string "(%m %d %Y)")) > (list :foreground "red" :weight 'bold)))) > (calendar-today-visible-hook)) > (add-hook 'calendar-today-visible-hook > mark-calendar) > (org-read-date))
That's because cursor background becomes the same as text foreground and Emacs prevents the clash. -- Ihor Radchenko // yantar92, Org mode contributor, Learn more about Org mode at <https://orgmode.org/>. Support Org development at <https://liberapay.com/org-mode>, or support my work at <https://liberapay.com/yantar92>
