From 8cb0a5022537ee3a5a815075f8f76ea0156eaca5 Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Fri, 22 Dec 2000 00:25:38 +0000
Subject: [PATCH] * poe-18.el (numberp, mod): Removed.

---
 ChangeLog |    4 ++++
 poe-18.el |    4 ----
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6b6c124..291e0ba 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-12-21  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+	* poe-18.el (numberp, mod): Removed.
+
 2000-12-21  MORIOKA Tomohiko  <tomo@kanji.zinbun.kyoto-u.ac.jp>
 
 	* mcharset.el (default-mime-charset-for-write): Require `pces' for
diff --git a/poe-18.el b/poe-18.el
index 51541d1..f80caec 100644
--- a/poe-18.el
+++ b/poe-18.el
@@ -450,8 +450,6 @@ resolution finer than a second."
 ;;; @@ Floating point numbers.
 ;;;
 
-(defalias-maybe 'numberp 'integerp)
-
 (defun abs (arg)
   "Return the absolute value of ARG."
   (if (< arg 0) (- arg) arg))
@@ -465,8 +463,6 @@ With optional DIVISOR, return the largest integer no greater than ARG/DIVISOR."
       (- (/ (- divisor 1 arg) divisor))
     (/ arg divisor)))
 
-(defalias-maybe 'mod '%)
-
 ;;; @ Basic lisp subroutines.
 ;;;
 
-- 
1.7.10.4