From 6bc5d4be30448d6463b8de3ccd53cfb5fc7b7a85 Mon Sep 17 00:00:00 2001 From: hermit Date: Tue, 2 Oct 2001 04:03:18 +0000 Subject: [PATCH] * AUTHORS: Update maintainer's mail address. * lisp/liece-misc.el (liece-time-difference): Use `abs' for `liece-check-buffers-if-interval-expired'. --- AUTHORS | 2 +- lisp/ChangeLog | 5 +++++ lisp/liece-misc.el | 4 ++-- 3 files changed, 8 insertions(+), 3 deletions(-) diff --git a/AUTHORS b/AUTHORS index 071acdb..71f1248 100644 --- a/AUTHORS +++ b/AUTHORS @@ -1,6 +1,6 @@ -*- mode: text; left-margin: 2; fill-column: 70; -*- - Liece is mainly written by Daiki Ueno . + Liece is mainly written by Daiki Ueno . This package based on Irchat (version 3.01) which has been distributed under GPL1 or later. diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0658a60..31c2534 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-10-02 Katsuhiro Hermit Endo + + * liece-misc.el (liece-time-difference): Use `abs' for + `liece-check-buffers-if-interval-expired'. + 2001-09-16 Katsuhiro Hermit Endo * liece-vars.el (liece-server-alist): Update default value. diff --git a/lisp/liece-misc.el b/lisp/liece-misc.el index 79f6cea..4820e9a 100644 --- a/lisp/liece-misc.el +++ b/lisp/liece-misc.el @@ -434,8 +434,8 @@ (defmacro liece-time-difference (t0 t1) "Difference in seconds between T0 and T1. Both T0 and T1 are in the encoded time format." - `(+ (* (- (car ,t1) (car ,t0)) 65536) - (- (cadr ,t1)) (cadr ,t0))) + `(abs (+ (* (- (car ,t1) (car ,t0)) 65536) + (- (cadr ,t1)) (cadr ,t0)))) (defmacro liece-time-add (t0 t1) "Add T0 seconds to time T1. -- 1.7.10.4