/[emacs]/emacs/lisp/calendar/timeclock.el
ViewVC logotype

Diff of /emacs/lisp/calendar/timeclock.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17.12.1 by eliz, Sat Nov 3 15:43:08 2001 UTC revision 1.17.12.2 by lektu, Wed Jul 3 13:30:33 2002 UTC
# Line 458  as with time remaining, where negative t Line 458  as with time remaining, where negative t
458              (% (truncate (/ (abs seconds) 60)) 60))))              (% (truncate (/ (abs seconds) 60)) 60))))
459    
460  (defsubst timeclock-workday-remaining (&optional today-only)  (defsubst timeclock-workday-remaining (&optional today-only)
461    "Return a the number of seconds until the workday is complete.    "Return the number of seconds until the workday is complete.
462  The amount returned is relative to the value of `timeclock-workday'.  The amount returned is relative to the value of `timeclock-workday'.
463  If TODAY-ONLY is non-nil, the value returned will be relative only to  If TODAY-ONLY is non-nil, the value returned will be relative only to
464  the time worked today, and not to past time.  This argument only makes  the time worked today, and not to past time.  This argument only makes
# Line 491  See `timeclock-relative' for more inform Line 491  See `timeclock-relative' for more inform
491        string)))        string)))
492    
493  (defsubst timeclock-workday-elapsed ()  (defsubst timeclock-workday-elapsed ()
494    "Return a the number of seconds worked so far today.    "Return the number of seconds worked so far today.
495  If RELATIVE is non-nil, the amount returned will be relative to past  If RELATIVE is non-nil, the amount returned will be relative to past
496  time worked.  The default is to return only the time that has elapsed  time worked.  The default is to return only the time that has elapsed
497  so far today."  so far today."

Legend:
Removed from v.1.17.12.1  
changed lines
  Added in v.1.17.12.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26