Browse Source

gn: python3-genenetwork2: Remove unnecessary begin form

* gn/packages/genenetwork.scm (python3-genenetwork2):
[arguments] {generate-graph}: Remove begin form.
pull/5/head
Bonface Munyoki 2 years ago
committed by Gitea
parent
commit
bee25d7a67
  1. 39
      gn/packages/genenetwork.scm

39
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

Loading…
Cancel
Save