Function: timeclock-workday-remaining

timeclock-workday-remaining is a byte-compiled function defined in timeclock.el.gz.

Signature

(timeclock-workday-remaining &optional TODAY-ONLY)

Documentation

Return the number of seconds until the workday is complete.

The amount returned is relative to the value of timeclock-workday. If TODAY-ONLY is non-nil, the value returned will be relative only to the time worked today, and not to past time.

View in manual

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/timeclock.el.gz
;; Should today-only be removed in favor of timeclock-relative? - gm
(defsubst timeclock-workday-remaining (&optional today-only)
  "Return the number of seconds until the workday is complete.
The amount returned is relative to the value of `timeclock-workday'.
If TODAY-ONLY is non-nil, the value returned will be relative only to
the time worked today, and not to past time."
  (let ((discrep (timeclock-find-discrep)))
    (if discrep
        (- (if today-only (cadr discrep)
             (car discrep)))
      0.0)))