X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/c71a0d48f3c880248a7f7f25e92ddbcbad5ef0e7..c077c0598d5c3c7982b53946a696ec7a75c7481e:/test/eshell.el diff --git a/test/eshell.el b/test/eshell.el index 3b392e84c2..4d6480c81b 100644 --- a/test/eshell.el +++ b/test/eshell.el @@ -1,6 +1,6 @@ ;;; esh-test.el --- Eshell test suite -;; Copyright (C) 1999-2011 Free Software Foundation, Inc. +;; Copyright (C) 1999-2012 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -28,7 +28,7 @@ ;;; Code: (eval-when-compile - (require 'cl) ; assert + (require 'cl-lib) (require 'eshell) (require 'esh-util)) (require 'esh-mode) @@ -267,9 +267,9 @@ (eshell-deftest banner banner-displayed "Startup banner is displayed at point-min" - (assert eshell-banner-message) + (cl-assert eshell-banner-message) (let ((msg (eval eshell-banner-message))) - (assert msg) + (cl-assert msg) (goto-char (point-min)) (looking-at msg))) @@ -396,7 +396,7 @@ (eshell-command-result-p "+ ${+ 1 2} 3" "6\n")) (eshell-deftest var interp-lisp - "Interpolate Lisp form evalution" + "Interpolate Lisp form evaluation" (eshell-command-result-p "+ $(+ 1 2) 3" "6\n")) (eshell-deftest var interp-concat