From: hermit <hermit>
Date: Tue, 2 Oct 2001 04:03:18 +0000 (+0000)
Subject: * AUTHORS: Update maintainer's mail address.
X-Git-Tag: liece-1_4_7~30
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6bc5d4be30448d6463b8de3ccd53cfb5fc7b7a85;p=elisp%2Fliece.git

* AUTHORS: Update maintainer's mail address.

* lisp/liece-misc.el (liece-time-difference): Use `abs' for
`liece-check-buffers-if-interval-expired'.
---

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 <ueno@ueda.info.waseda.ac.jp>.
+  Liece is mainly written by Daiki Ueno <ueno@unixuser.org>.
   
   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  <hermit@koka-in.org>
+
+	* liece-misc.el (liece-time-difference): Use `abs' for
+	`liece-check-buffers-if-interval-expired'.
+
 2001-09-16  Katsuhiro Hermit Endo  <hermit@koka-in.org>
 
 	* 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.