summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/shell.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/shell.scm b/tests/shell.scm
index 3561010..b0acb08 100644
--- a/tests/shell.scm
+++ b/tests/shell.scm
@@ -66,6 +66,14 @@
(and (zero? exit-code)
(string=? (car result) "which 'uname'"))))))))
+(test-assert-with-log "command-available?"
+ (run-client-test
+ start-server/exec
+ (lambda ()
+ (call-with-connected-session/shell
+ (lambda (session)
+ (command-available? session "guile"))))))
+
(test-assert-with-log "fallback-pgrep"
(run-client-test
start-server/exec