From: tomo <tomo>
Date: Sat, 12 Aug 2000 03:44:39 +0000 (+0000)
Subject: (butlast): Use `defun' instead of `defun-maybe'.
X-Git-Tag: semi21-2000-08-26~3
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6b03816d49eb898adaba04e2f9a596c9914a34bd;p=elisp%2Flemi.git

(butlast): Use `defun' instead of `defun-maybe'.
(nbutlast): Likewise.
---

diff --git a/poe/poe.el b/poe/poe.el
index c324dde..1458a0c 100644
--- a/poe/poe.el
+++ b/poe/poe.el
@@ -651,12 +651,12 @@ If N is bigger than the length of X, return X."
     x))
 
 ;; Actually, `butlast' and `nbutlast' are defined in lisp/cl.el.
-(defun-maybe butlast (x &optional n)
+(defun butlast (x &optional n)
   "Returns a copy of LIST with the last N elements removed."
   (if (and n (<= n 0)) x
     (nbutlast (copy-sequence x) n)))
 
-(defun-maybe nbutlast (x &optional n)
+(defun nbutlast (x &optional n)
   "Modifies LIST to remove the last N elements."
   (let ((m (length x)))
     (or n (setq n 1))