[Emacs-diffs] trunk r114306: * test/automated/eshell.el (eshell-test/for-name-shadow-loop):

[Glenn Morris]

------------------------------------------------------------
revno: 114306
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Mon 2013-09-16 14:42:41 -0400
message:
  * test/automated/eshell.el (eshell-test/for-name-shadow-loop):
  Test value before and after loop as well as during.
modified:
  test/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-8588
  test/automated/eshell.el       eshtest.el-20091113204419-o5vbwnq5f7feedwu-1875

=== modified file 'test/ChangeLog'
--- a/test/ChangeLog    2013-09-15 00:10:45 +0000
+++ b/test/ChangeLog    2013-09-16 18:42:41 +0000
@@ -1,3 +1,8 @@
+2013-09-16  Glenn Morris  <address@hidden>
+
+       * automated/eshell.el (eshell-test/for-name-shadow-loop):
+       Test value before and after loop as well as during.
+
 2013-09-15  Glenn Morris  <address@hidden>
 
        * automated/eshell.el (eshell-test/for-name-shadow-loop):

=== modified file 'test/automated/eshell.el'
--- a/test/automated/eshell.el  2013-09-15 00:10:45 +0000
+++ b/test/automated/eshell.el  2013-09-16 18:42:41 +0000
@@ -89,8 +89,10 @@
 (ert-deftest eshell-test/for-name-shadow-loop () ; bug#15372
   "Test `eshell-command-result' with a for loop using an env-var."
   (let ((process-environment (cons "name=env-value" process-environment)))
+    (should (equal (eshell-test-command-result "echo $name") "env-value"))
     (should (equal (eshell-test-command-result
-                    "for name in 3 { echo $name }") 3))))
+                    "for name in 3 { echo $name }") 3))
+    (should (equal (eshell-test-command-result "echo $name") "env-value"))))
 
 (ert-deftest eshell-test/lisp-command-args ()
   "Test `eshell-command-result' with elisp and trailing args.