Function: smart-calendar
smart-calendar is an interactive and byte-compiled function defined in
hui-mouse.el.
Signature
(smart-calendar)
Documentation
Use a single key or mouse key to manipulate the scrolling calendar.
Invoked via a key press when in calendar-mode. It assumes that its
caller has already checked that the key was pressed in an appropriate buffer
and has moved the cursor there.
If key is pressed:
(1) at the end of the buffer, the calendar is scrolled forward 3 months;
(2) to the left of any dates on a calendar line, the calendar is scrolled
backward 3 months;
(3) on a date, the diary entries for the date, if any, are displayed.
Key Bindings
Source Code
;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hui-mouse.el
;;; ************************************************************************
;;; smart-calendar functions
;;; ************************************************************************
(defun smart-calendar ()
"Use a single key or mouse key to manipulate the scrolling calendar.
Invoked via a key press when in `calendar-mode'. It assumes that its
caller has already checked that the key was pressed in an appropriate buffer
and has moved the cursor there.
If key is pressed:
(1) at the end of the buffer, the calendar is scrolled forward 3 months;
(2) to the left of any dates on a calendar line, the calendar is scrolled
backward 3 months;
(3) on a date, the diary entries for the date, if any, are displayed."
(interactive)
(cond ((smart-eobp) (calendar-cursor-to-nearest-date)
(calendar-scroll-left-three-months 1))
((< (current-column) 5) (calendar-cursor-to-nearest-date)
(calendar-scroll-right-three-months 1))
(t (calendar-cursor-to-nearest-date)
(diary-view-entries 1))))