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))