diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/editfns.c b/src/editfns.c index daea7463871..47509c23d04 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -1677,7 +1677,9 @@ See `current-time-string' for the various forms of a time value. */) | |||
| 1677 | } | 1677 | } |
| 1678 | 1678 | ||
| 1679 | DEFUN ("time-equal-p", Ftime_equal_p, Stime_equal_p, 2, 2, 0, | 1679 | DEFUN ("time-equal-p", Ftime_equal_p, Stime_equal_p, 2, 2, 0, |
| 1680 | doc: /* Return non-nil if T1 and T2 are equal time values. */) | 1680 | doc: /* Return non-nil if T1 and T2 are equal time values. |
| 1681 | A nil value for either argument stands for the current time. | ||
| 1682 | See `current-time-string' for the various forms of a time value. */) | ||
| 1681 | (Lisp_Object t1, Lisp_Object t2) | 1683 | (Lisp_Object t1, Lisp_Object t2) |
| 1682 | { | 1684 | { |
| 1683 | return time_cmp (t1, t2) == 0 ? Qt : Qnil; | 1685 | return time_cmp (t1, t2) == 0 ? Qt : Qnil; |