[nongnu] elpa/with-simulated-input d32cbc3ac9 093/134: Revert "Remove interpolation test"

[ELPA Syncer]

branch: elpa/with-simulated-input
commit d32cbc3ac9264cc1a533e3ea9db3db985874c512
Author: Ryan C. Thompson <rct@thompsonclan.org>
Commit: Ryan C. Thompson <rct@thompsonclan.org>

    Revert "Remove interpolation test"
    
    This reverts commit dd21b9446f93ea89d8ab1af7eec17869a4de494f.
---
 tests/test-with-simulated-input.el | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/tests/test-with-simulated-input.el 
b/tests/test-with-simulated-input.el
index b175de53a9..0e4907ae96 100644
--- a/tests/test-with-simulated-input.el
+++ b/tests/test-with-simulated-input.el
@@ -164,7 +164,18 @@
             (read-string "Enter a string: "))
          nil)
         (expect my-non-lexical-var
-                :to-be-truthy)))))
+                :to-be-truthy)))
+
+    (it "should allow interpolation of variables into KEYS"
+      (let ((my-key-sequence "hello")
+            (my-lisp-form '(insert " world")))
+        (expect
+         (with-simulated-input (list
+                                my-key-sequence
+                                my-lisp-form
+                                "RET")
+           (read-string "Enter a string: "))
+         :to-equal "hello world")))))
 
 (defun time-equal-p (t1 t2)
   "Return non-nil if T1 and T2 represent the same time.