diff options
author | BonfaceKilz | 2020-12-05 23:56:18 +0300 |
---|---|---|
committer | Gitea | 2020-12-06 10:51:06 -0600 |
commit | bee25d7a671449baca81b63398e67ec0a36b7b9e (patch) | |
tree | 35f2d34c7b3611150db1acd633d1969e82233c6c | |
parent | b418d966b131abf6291493b525b9828161ecb02f (diff) | |
download | guix-bioinformatics-bee25d7a671449baca81b63398e67ec0a36b7b9e.tar.gz |
gn: python3-genenetwork2: Remove unnecessary begin form
* gn/packages/genenetwork.scm (python3-genenetwork2):
[arguments] {generate-graph}: Remove begin form.
-rw-r--r-- | gn/packages/genenetwork.scm | 39 |
1 files changed, 19 insertions, 20 deletions
diff --git a/gn/packages/genenetwork.scm b/gn/packages/genenetwork.scm index 8454410..5987af8 100644 --- a/gn/packages/genenetwork.scm +++ b/gn/packages/genenetwork.scm @@ -501,26 +501,25 @@ Graphical Fragment Assembly} files and related formats.") #t)) (add-after 'install 'generate-graph (lambda* (#:key inputs outputs #:allow-other-keys) - (begin - (call-with-output-file - (string-append - (assoc-ref outputs "out") - "/lib/python3.8/site-packages" - "/wqflask/dependency-graph.html") - (lambda (port) - (format - port "~a" - ,(call-with-output-string - (lambda (p) - (with-output-to-port p - (lambda () - (run-with-store - (open-connection) - (export-graph - (list this-package) - p - #:node-type %package-node-type - #:backend %d3js-backend)))))))))))) + (call-with-output-file + (string-append + (assoc-ref outputs "out") + "/lib/python3.8/site-packages" + "/wqflask/dependency-graph.html") + (lambda (port) + (format + port "~a" + ,(call-with-output-string + (lambda (p) + (with-output-to-port p + (lambda () + (run-with-store + (open-connection) + (export-graph + (list this-package) + p + #:node-type %package-node-type + #:backend %d3js-backend))))))))))) (add-after 'install 'generate-dependency-file (lambda* (#:key inputs outputs #:allow-other-keys) (call-with-output-file |