mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00
Code Issues Releases Activity

(date-to-time, time-subtract, time-add, safe-date-to-time): Doc fixes.

Browse Source
This commit is contained in:
Glenn Morris 2008-03-08 20:22:36 +00:00
parent 4e0ace2316
commit 7d4005cc08
2 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -102,6 +102,9 @@
* calendar/cal-hebrew.el, calendar/holidays.el, calendar/lunar.el:
* calendar/solar.el: Unquote lambda functions.
* calendar/time-date.el (date-to-time, time-subtract, time-add)
(safe-date-to-time): Doc fixes.
* calendar/todo-mode.el: Remove un-needed eval-when-compile.
* textmodes/org.el (list-diary-entries-hook): Declare for compiler.

8
lisp/calendar/time-date.el
View File

@ -97,7 +97,7 @@ and type 2 is the list (HIGH LOW MICRO)."
;;;###autoload
(defun date-to-time (date)
"Parse a string that represents a date-time and return a time value."
"Parse a string DATE that represents a date-time and return a time value."
(condition-case ()
(apply 'encode-time
(parse-time-string
@ -160,7 +160,7 @@ TIME should be either a time value or a date-time string."
;;;###autoload
(defun time-subtract (t1 t2)
"Subtract two time values.
"Subtract two time values, T1 minus T2.
Return the difference in the format of a time value."
(with-decoded-time-value ((high low micro type t1)
(high2 low2 micro2 type2 t2))
@ -178,7 +178,7 @@ Return the difference in the format of a time value."
;;;###autoload
(defun time-add (t1 t2)
"Add two time values. One should represent a time difference."
"Add two time values T1 and T2. One should represent a time difference."
(with-decoded-time-value ((high low micro type t1)
(high2 low2 micro2 type2 t2))
(setq high (+ high high2)
@ -248,7 +248,7 @@ The number of days will be returned as a floating point number."
;;;###autoload
(defun safe-date-to-time (date)
"Parse a string that represents a date-time and return a time value.
"Parse a string DATE that represents a date-time and return a time value.
If DATE is malformed, return a time value of zeros."
(condition-case ()
(date-to-time date)