path: root/src/drive-google-com-fix-browse
diff options
context:
space:
mode:
authorWojtek Kosior <koszko@koszko.org>2022-08-16 12:20:27 +0200
committerWojtek Kosior <koszko@koszko.org>2022-08-16 13:03:12 +0200
commitdb146c2ed116767ef648b4829cc6730480811e3b (patch)
tree3d7df33a0ac76244c6e58c80059704f4d3c74815 /src/drive-google-com-fix-browse
parent91ee5c76d39cb1aebe34581857e62dbd3846e872 (diff)
parent07374f81693d83cdd56b8f64537d054c0b35d555 (diff)
downloadhydrilla-fixes-bundle-db146c2ed116767ef648b4829cc6730480811e3b.tar.gz
hydrilla-fixes-bundle-db146c2ed116767ef648b4829cc6730480811e3b.zip
[Google Forms] Merge improvements from JacobK
Diffstat (limited to 'src/drive-google-com-fix-browse')
0 files changed, 0 insertions, 0 deletions
1) (loop))) (mkdir #$output))) (guile (package-derivation store %bootstrap-guile)) (drv (run-with-store store (gexp->derivation "foo" exp #:guile-for-build guile))) (thread (call-with-new-thread (lambda () (build-derivations store (list drv))))) (_ (let loop () (unless (file-exists? token1) (usleep 200) (loop)))) (session (find (lambda (session) (= (getpid) (process-id (daemon-session-client session)))) (daemon-sessions))) (locks (daemon-session-locks-held (pk 'session session)))) (call-with-output-file token2 (const #t)) (equal? (list (string-append (derivation->output-path drv) ".lock")) locks)))))) (test-end "processes")