aboutsummaryrefslogtreecommitdiff
path: root/gn/packages
diff options
context:
space:
mode:
authorpjotrp2018-04-06 10:34:26 +0000
committerpjotrp2018-04-06 10:34:26 +0000
commit4521668b12e186fa40fe2549a546db48b3f0c609 (patch)
treeae4fcd0048393913397b5be733da33676bd70eb4 /gn/packages
parented5ce61bd063ed6d77e9bacc8bc640a81757fe39 (diff)
downloadguix-bioinformatics-4521668b12e186fa40fe2549a546db48b3f0c609.tar.gz
Two JS packages
Diffstat (limited to 'gn/packages')
-rw-r--r--gn/packages/genenetwork.scm4
-rw-r--r--gn/packages/javascript.scm80
2 files changed, 83 insertions, 1 deletions
diff --git a/gn/packages/genenetwork.scm b/gn/packages/genenetwork.scm
index 8783717..b860787 100644
--- a/gn/packages/genenetwork.scm
+++ b/gn/packages/genenetwork.scm
@@ -434,7 +434,9 @@ location of a putative QTL.")
("python-parameterized" ,python-parameterized) ;; used for the tests
("genenetwork2-files-small" ,genenetwork2-files-small)
("javascript-twitter-post-fetcher" ,javascript-twitter-post-fetcher)
- ; ("javascript-cytoscape" ,javascript-cytoscape)
+ ("javascript-cytoscape" ,javascript-cytoscape)
+ ("javascript-panzoom" ,javascript-cytoscape-panzoom)
+ ("javascript-qtip" ,javascript-cytoscape-qtip)
;; With Python3 support
("gunicorn" ,gunicorn)
diff --git a/gn/packages/javascript.scm b/gn/packages/javascript.scm
index e9173ca..a964405 100644
--- a/gn/packages/javascript.scm
+++ b/gn/packages/javascript.scm
@@ -11,6 +11,8 @@
#:use-module (guix build-system trivial)
#:use-module (srfi srfi-1))
+;; see color-make package for great example - also install-file and invoke
+
(define-public javascript-twitter-post-fetcher
(let ((commit "27440ffebd4c1ba7abc9aec92a581155715f2e4e"))
(package
@@ -83,3 +85,81 @@
(synopsis "Cytoscape.js")
(description "Cytoscape.")
(license license:expat)))
+
+(define-public javascript-cytoscape-panzoom
+ (package
+ ;; (inherit javascript-cytoscape)
+ (name "javascript-cytoscape-panzoom")
+ (version "2.5.2") ; ancient version
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "https://github.com/cytoscape/cytoscape.js-panzoom/archive/" version ".tar.gz"))
+ (file-name (string-append name "-" version ".tar.gz"))
+ (sha256
+ (base32 "154xzi693gbv89y221gkpi03k84lccmr55v5z43mn1i1s1fdhm2b"))))
+ (inputs `(("javascript-cytoscape" ,javascript-cytoscape)))
+ (build-system trivial-build-system)
+ (native-inputs `(("gzip" ,gzip)
+ ("tar" ,tar)
+ ("source" ,source)))
+ (arguments
+ `(#:modules ((guix build utils))
+ #:builder
+ (begin
+ (use-modules (guix build utils))
+ (let* ((out (assoc-ref %outputs "out"))
+ (tarcmd (string-append (assoc-ref %build-inputs "tar") "/bin/tar"))
+ (targetdir (string-append out "/share/genenetwork2/javascript/cytoscape-panzoom"))
+ (source (assoc-ref %build-inputs "source")))
+ (setenv "PATH" (string-append
+ (assoc-ref %build-inputs "tar") "/bin" ":"
+ (assoc-ref %build-inputs "gzip") "/bin"))
+ (invoke "tar" "xvf" (assoc-ref %build-inputs "source") "--strip-components=1")
+ (mkdir-p targetdir)
+ (install-file "cytoscape-panzoom.js" targetdir)
+ (install-file "cytoscape.js-panzoom.css" targetdir)
+ ))))
+ (home-page "https://github.com/cytoscape/cytoscape.js")
+ (synopsis "Cytoscape.js")
+ (description "Cytoscape.")
+ (license license:expat)))
+
+;; https://github.com/cytoscape/cytoscape.js-qtip/archive/2.7.1.tar.gz
+(define-public javascript-cytoscape-qtip
+ (package
+ ;; (inherit javascript-cytoscape)
+ (name "javascript-cytoscape-qtip")
+ (version "2.7.1") ; ancient version
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "https://github.com/cytoscape/cytoscape.js-qtip/archive/" version ".tar.gz"))
+ (file-name (string-append name "-" version ".tar.gz"))
+ (sha256
+ (base32 "0f2qhxi9qx5r3rcmxqgdqnwd9apnjlb4s4hckwhaqgsp6rf8lzlb"))))
+ (inputs `(("javascript-cytoscape" ,javascript-cytoscape)))
+ (build-system trivial-build-system)
+ (native-inputs `(("gzip" ,gzip)
+ ("tar" ,tar)
+ ("source" ,source)))
+ (arguments
+ `(#:modules ((guix build utils))
+ #:builder
+ (begin
+ (use-modules (guix build utils))
+ (let* ((out (assoc-ref %outputs "out"))
+ (tarcmd (string-append (assoc-ref %build-inputs "tar") "/bin/tar"))
+ (targetdir (string-append out "/share/genenetwork2/javascript/cytoscape-qtip"))
+ (source (assoc-ref %build-inputs "source")))
+ (setenv "PATH" (string-append
+ (assoc-ref %build-inputs "tar") "/bin" ":"
+ (assoc-ref %build-inputs "gzip") "/bin"))
+ (invoke "tar" "xvf" (assoc-ref %build-inputs "source") "--strip-components=1")
+ (mkdir-p targetdir)
+ (install-file "cytoscape-qtip.js" targetdir)
+ ))))
+ (home-page "https://github.com/cytoscape/cytoscape.js")
+ (synopsis "Cytoscape.js")
+ (description "Cytoscape.")
+ (license license:expat)))