Commit 98023080 authored by pfdietz's avatar pfdietz

Removed dubious test listen.5

parent 2834ac46
......@@ -21,10 +21,10 @@
(with-input-from-string (*standard-input* "A") (notnot-mv (listen)))
t)
(deftest listen.5
(when (interactive-stream-p *standard-input*)
(clear-input) (listen))
nil)
;;; (deftest listen.5
;;; (when (interactive-stream-p *standard-input*)
;;; (clear-input) (listen))
;;; nil)
(deftest listen.6
(with-input-from-string
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment