aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/valgrind.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2020-09-23 01:21:00 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2020-09-23 04:36:45 +0200
commit037cf6ec4f0b0036d955c4041c9b6f13f415c7e8 (patch)
tree18a763347601e9a3a673b2e71ec751ad236dd6ae /gnu/packages/valgrind.scm
parent255668baa70610ea151e37fb6320cabad4626e04 (diff)
downloadguix-037cf6ec4f0b0036d955c4041c9b6f13f415c7e8.tar.gz
guix-037cf6ec4f0b0036d955c4041c9b6f13f415c7e8.zip
gnu: mpdscribble: Order inputs alphabetically.
* gnu/packages/mpd.scm (mpdscribble)[inputs]: Sort.
Diffstat (limited to 'gnu/packages/valgrind.scm')
0 files changed, 0 insertions, 0 deletions
ort) "/read-only/input"))) marionette)) (test-equal "Test file correctly received from read-only share" "\"Hi!\" from the read-only share." (marionette-eval '(begin (use-modules (ice-9 rdelim)) (call-with-output-file "/srv/read-only/the-file" (lambda (port) (display "\"Hi!\" from the read-only share." port))) (zero? (system* "rsync" (string-append "rsync://localhost:" (number->string #$rsync-port) "/read-only/the-file") "/tmp/output")) (call-with-input-file "/tmp/output" read-line)) marionette)) (test-end)))) (gexp->derivation "rsync-test" test)) (define* %rsync-os ;; Return operating system under test. (let ((base-os (simple-operating-system (service dhcp-client-service-type) (service rsync-service-type (rsync-configuration (modules (list (rsync-module (name "read-only") (file-name "/srv/read-only")) (rsync-module (name "files") (file-name "/srv/read-write") (read-only? #f))))))))) (operating-system (inherit base-os) (packages (cons* rsync (operating-system-packages base-os)))))) (define %test-rsync (system-test (name "rsync") (description "Connect to a running RSYNC server.") (value (run-rsync-test %rsync-os))))