summaryrefslogtreecommitdiff
path: root/gnu/tests
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2025-05-06 21:37:44 +0900
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2025-05-06 23:22:25 +0900
commitfbf8b81971475ee712338f1c955be6ac44099fac (patch)
tree91c2d2137448c29e190ac5ae191cc2f9f732d5de /gnu/tests
parentb8afb3100ec4f0b29701e49be6fc8d218ce963f6 (diff)
tests: Fix (gnu tests base.scm) module indentation.
* gnu/tests/base.scm: Fix indentation. Change-Id: I3432fafa2f5c2853a14b5d125cf9377786ca6594
Diffstat (limited to 'gnu/tests')
-rw-r--r--gnu/tests/base.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/gnu/tests/base.scm b/gnu/tests/base.scm
index 612af21b549..20fc848e5ce 100644
--- a/gnu/tests/base.scm
+++ b/gnu/tests/base.scm
@@ -227,7 +227,7 @@ info --version")
227 marionette))) 227 marionette)))
228 228
229 (test-equal "/var/log/messages is not world-readable" 229 (test-equal "/var/log/messages is not world-readable"
230 #o640 ;<https://bugs.gnu.org/40405> 230 #o640 ;<https://bugs.gnu.org/40405>
231 (begin 231 (begin
232 (wait-for-file "/var/log/messages" marionette 232 (wait-for-file "/var/log/messages" marionette
233 #:read 'get-u8) 233 #:read 'get-u8)
@@ -448,7 +448,7 @@ info --version")
448 marionette)) 448 marionette))
449 449
450 (test-equal "nscd invalidate action" 450 (test-equal "nscd invalidate action"
451 '(#t) ;one value, #t 451 '(#t) ;one value, #t
452 (marionette-eval '(with-shepherd-action 'nscd ('invalidate "hosts") 452 (marionette-eval '(with-shepherd-action 'nscd ('invalidate "hosts")
453 result 453 result
454 result) 454 result)
@@ -458,7 +458,7 @@ info --version")
458 ;; code of 'nscd' so skip this test. 458 ;; code of 'nscd' so skip this test.
459 (test-skip 1) 459 (test-skip 1)
460 (test-equal "nscd invalidate action, wrong table" 460 (test-equal "nscd invalidate action, wrong table"
461 '(#f) ;one value, #f 461 '(#f) ;one value, #f
462 (marionette-eval '(with-shepherd-action 'nscd ('invalidate "xyz") 462 (marionette-eval '(with-shepherd-action 'nscd ('invalidate "xyz")
463 result 463 result
464 result) 464 result)
@@ -509,7 +509,7 @@ info --version")
509 marionette)) 509 marionette))
510 510
511 (test-equal "guix-daemon set-http-proxy action" 511 (test-equal "guix-daemon set-http-proxy action"
512 '(#t) ;one value, #t 512 '(#t) ;one value, #t
513 (marionette-eval '(with-shepherd-action 'guix-daemon 513 (marionette-eval '(with-shepherd-action 'guix-daemon
514 ('set-http-proxy "http://localhost:8118") 514 ('set-http-proxy "http://localhost:8118")
515 result 515 result
@@ -517,7 +517,7 @@ info --version")
517 marionette)) 517 marionette))
518 518
519 (test-equal "guix-daemon set-http-proxy action, clear" 519 (test-equal "guix-daemon set-http-proxy action, clear"
520 '(#t) ;one value, #t 520 '(#t) ;one value, #t
521 (marionette-eval '(with-shepherd-action 'guix-daemon 521 (marionette-eval '(with-shepherd-action 'guix-daemon
522 ('set-http-proxy) 522 ('set-http-proxy)
523 result 523 result