2 files changed, 138 insertions, 0 deletions
diff --git a/gn/packages/web.scm b/gn/packages/web.scm
new file mode 100644
index 0000000..0a13924
--- /dev/null
+++ b/gn/packages/web.scm
@@ -0,0 +1,46 @@
+(define-module (gn packages web)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (gnu packages)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module (guix utils)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix build-system trivial)
+  #:use-module (srfi srfi-1))
+
+(define-public web-bootstrap-native-css
+  (let ((commit "2e48d7ee29d4063e3bd2024ff83ddc50a550c4dd"))
+  (package
+    (name "web-bootstrap-native-css")
+    (version (string-append "4.0.0" "-beta-" (string-take commit 7)))
+    (source (origin
+             (method git-fetch)
+             (uri (git-reference
+                   (url "https://github.com/thednp/bootstrap.native.git")
+                   (commit commit)))
+             (file-name (string-append name "-" commit))
+             (sha256
+              (base32
+               "1hkyibyfby0mnkavr3xbmr20kb88wy6jw28b206pd236xnp2qkx0"))))
+    (build-system trivial-build-system)
+    (native-inputs `(("source" ,source)))
+    (arguments
+     `(#:modules ((guix build utils))
+       #:builder
+       (let* ((out (assoc-ref %outputs "out"))
+              (name "bootstrap-native")
+              (targetdir (string-append out "/share/web/" name))
+              )
+           (begin
+             (use-modules (guix build utils))
+             (let ((source (assoc-ref %build-inputs "source"))
+                   )
+               (and
+                    ; (mkdir-p targetdir)
+                    (copy-recursively source targetdir)
+                    ))))))
+    (home-page "https://github.com/thednp/bootstrap.native")
+    (synopsis "Bootstrap minimal")
+    (description "Bootstrap native does not use jquery.")
+    (license license:expat))))
diff --git a/gn/packages/yaj.scm b/gn/packages/yaj.scm
new file mode 100644
index 0000000..0ae47ed
--- /dev/null
+++ b/gn/packages/yaj.scm
@@ -0,0 +1,92 @@
+(define-module (gn packages yaj)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix packages)
+  #:use-module (guix utils)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system gnu)
+  #:use-module (guix build-system cmake)
+  #:use-module (guix build-system perl)
+  #:use-module (guix build-system python)
+  ;; #:use-module (guix build-system ruby)
+  #:use-module (guix build-system r)
+  #:use-module (guix build-system trivial)
+  #:use-module (gnu packages)
+  #:use-module (gnu packages algebra)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages bioinformatics)
+  #:use-module (gnu packages boost)
+  #:use-module (gnu packages compression)
+  #:use-module (gnu packages databases)
+  #:use-module (gnu packages cpio)
+  #:use-module (gnu packages file)
+  #:use-module (gnu packages gcc)
+  #:use-module (gnu packages graphviz)
+  #:use-module (gnu packages java)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu packages ldc)
+  #:use-module (gnu packages machine-learning)
+  #:use-module (gnu packages maths)
+  #:use-module (gnu packages ncurses)
+  #:use-module (gnu packages perl)
+  #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages popt)
+  #:use-module (gnu packages protobuf)
+  #:use-module (gnu packages python)
+  #:use-module (gnu packages statistics)
+  #:use-module (gnu packages tbb)
+  #:use-module (gnu packages textutils)
+  #:use-module (gnu packages vim)
+  #:use-module (gnu packages web)
+  #:use-module (gnu packages xml)
+  #:use-module (gnu packages bootstrap)
+  #:use-module (gnu packages version-control)
+  #:use-module (gn packages bioinformatics)
+  #:use-module (gn packages gemma)
+  #:use-module (gn packages javascript)
+  #:use-module (gn packages phewas)
+  #:use-module (gn packages python)
+  #:use-module (gn packages statistics)
+  #:use-module (gn packages web)
+  #:use-module (srfi srfi-1))
+
+(define-public yaj
+  (let ((md5 "93e745e9c"))
+    (package
+    (name "yaj")
+    (version "0.0.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri "http://files.genenetwork.org/raw_database/md5sum.txt") ; any old file
+       (file-name (string-append name "-" md5))
+       (sha256
+        (base32 "1cnkiwid4h0nnf93rm647ji9vhfzjl23arp1xj374la7mmic9jqs"))))
+    (build-system trivial-build-system)
+    (native-inputs `(("unzip" ,unzip)
+                     ("source" ,source)))
+    (inputs `(("sassc" ,sassc)))
+    (propagated-inputs
+     `(("python" ,python)
+       ("python-flask" ,python-flask)
+       ("python-jinja2" ,python-jinja2)
+       ("python-mako" ,python-mako)
+       ("web-bootstrap-native-css" ,web-bootstrap-native-css)
+       ("sassc" ,sassc)
+       ))
+    (arguments
+     `(#:modules ((guix build utils))
+       #:builder
+       (begin
+         (use-modules (guix build utils))
+         (let ((target (string-append (assoc-ref %outputs "out")
+                                      "/share")))
+             (write target)
+             (mkdir-p target)
+             ; (copy-recursively (assoc-ref %build-inputs "source") target)
+             #t))))
+
+    (home-page "http://github.com/pjotrp/yaj/")
+    (synopsis "Yet another journal")
+    (description "YAJ.")
+    (license license:agpl3+))))