|
From: | z_axis |
Subject: | [STUMP] A shell command causes stumpwm freezed |
Date: | Mon, 29 Oct 2012 13:30:33 +0800 |
User-agent: | Opera Mail/11.62 (FreeBSD) |
(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 ? Best Regards!
[Prev in Thread] | Current Thread | [Next in Thread] |