tests: samba: Add delay in some tests.

* gnu/tests/samba.scm (run-samba-test)[smbclient connect, smbclient
connect]: Add a delay before checking the connection to the samba
server.

Change-Id: Iffe378756f05b8b1a63e861ed626c943aceb3fc2
This commit is contained in:
Efraim Flashner 2025-10-26 12:09:49 +02:00
parent e2d6046754
commit 6cfea0e121
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -137,15 +137,19 @@
(test-equal "smbclient connect"
0
(marionette-eval
'(system* #$(file-append samba "/bin/smbclient")
"--list=localhost" "--no-pass")
'(begin
(sleep 2)
(system* #$(file-append samba "/bin/smbclient")
"--list=localhost" "--no-pass"))
marionette))
(test-equal "smbclient connect"
0
(marionette-eval
'(system* #$(file-append samba "/bin/smbclient")
"--list=localhost" "--no-pass")
'(begin
(sleep 2)
(system* #$(file-append samba "/bin/smbclient")
"--list=localhost" "--no-pass"))
marionette))
(test-end))))