(in-package :stumpwm) (defcommand sensors () () "Start XTerm with `sensors'." (run-shell-command (join (list *xterm-big-command* "-e" "watch" "sensors"))))