* poe-18.el (numberp, mod): Removed.

diff --git a/ChangeLog b/ChangeLog
index 6b6c124..291e0ba 100644 (file)
--- 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 (file)
--- 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.
 ;;;