(butlast): Use `defun' instead of `defun-maybe'.
authortomo <tomo>
Sat, 12 Aug 2000 03:44:39 +0000 (03:44 +0000)
committertomo <tomo>
Sat, 12 Aug 2000 03:44:39 +0000 (03:44 +0000)
(nbutlast): Likewise.

poe/poe.el

index c324dde..1458a0c 100644 (file)
@@ -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))