about summary refs log tree commit diff
diff options
context:
space:
mode:
authorBonfaceKilz2020-12-05 23:56:18 +0300
committerGitea2020-12-06 10:51:06 -0600
commitbee25d7a671449baca81b63398e67ec0a36b7b9e (patch)
tree35f2d34c7b3611150db1acd633d1969e82233c6c
parentb418d966b131abf6291493b525b9828161ecb02f (diff)
downloadguix-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.scm39
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