Function: calendar-count-days-region
calendar-count-days-region is an interactive and byte-compiled
function defined in calendar.el.gz.
Signature
(calendar-count-days-region)
Documentation
Count the number of days (inclusive) between point and the mark.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/calendar.el.gz
(defun calendar-count-days-region ()
"Count the number of days (inclusive) between point and the mark."
(interactive)
(let* ((days (- (calendar-absolute-from-gregorian
(calendar-cursor-to-date t))
(calendar-absolute-from-gregorian
(or (car calendar-mark-ring)
(error "No mark set in this buffer")))))
(days (1+ (if (> days 0) days (- days)))))
(message "Region has %d day%s (inclusive)"
days (if (> days 1) "s" ""))))