diff options
Diffstat (limited to 'lisp/eshell/em-hist.el')
| -rw-r--r-- | lisp/eshell/em-hist.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index 62d0bd65e9d..64a7ad94c53 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el @@ -54,8 +54,7 @@ ;;; Code: -(eval-when-compile - (require 'cl)) +(eval-when-compile (require 'cl-lib)) (require 'ring) (require 'esh-opt) @@ -560,8 +559,8 @@ See also `eshell-read-history'." (forward-char)) (setq posb (cdr posb) pose (cdr pose)) - (assert (= (length posb) (length args))) - (assert (<= (length posb) (length pose)))) + (cl-assert (= (length posb) (length args))) + (cl-assert (<= (length posb) (length pose)))) (setq hist (buffer-substring-no-properties begin end)) (let ((b posb) (e pose)) (while b @@ -571,7 +570,7 @@ See also `eshell-read-history'." (setq b (cdr b) e (cdr e)))) (setq textargs (cdr textargs)) - (assert (= (length textargs) (length args))) + (cl-assert (= (length textargs) (length args))) (list textargs posb pose)))) (defun eshell-expand-history-references (beg end) |