On Sun, Oct 28, 2012 at 10:30 PM, z_axis <z_a...@163.com> wrote: > I am using stumpwm built with threaded clisp-2.49. There is a user defined > #'sh function as below: > (defun sh (cmd) > (let ((str (ext:run-shell-command cmd :output :stream))) > (loop for line = (read-line str nil) > until (null line) > do (print line)))) > > When run (sh "ping 192.168.1.1"), The stumpwm will not do anything. I know > `ping 192.168.1.1` will not terminate unless user break it. > > What is an elegant way to handle such a problem ?
As far as I know ping never quits. It just pings endlessly. So you've written a function that reads ping's output line by line until it quits, which it will never do. What do you want to have happen? -Shawn _______________________________________________ Stumpwm-devel mailing list Stumpwm-devel@nongnu.org https://lists.nongnu.org/mailman/listinfo/stumpwm-devel