From 638abbad22c4942f273bf75aaf2f69a200bf58af Mon Sep 17 00:00:00 2001
From: Alexander_Kabui
Date: Tue, 7 Nov 2023 16:12:52 +0300
Subject: gn: javascript: Add javascript-marked.

* gn/packages/javascript.scm (javascript-marked): New package.

Reviewed-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 gn/packages/javascript.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gn/packages/javascript.scm b/gn/packages/javascript.scm
index 68cb984..3d4c7e5 100644
--- a/gn/packages/javascript.scm
+++ b/gn/packages/javascript.scm
@@ -1914,3 +1914,35 @@ vector graphics.")
     (description
      "htmx allows you to access AJAX, CSS Transitions, WebSockets and Server Sent Events directly in HTML, using attributes, so you can build modern user interfaces with the simplicity and power of hypertext")
     (license license:expat)))
+
+(define-public javascript-marked
+  (package
+   (name "javascript-marked")
+   (version "9.1.5")
+   (source
+    (origin
+     (method url-fetch)
+     (uri (string-append "https://cdnjs.cloudflare.com/ajax/libs/marked/" version
+			 "/marked.min.js"))
+     (file-name "marked.min.js")
+     (sha256
+      (base32
+       "1f4hw8yjdm99hgw0bq62099d3kv23awsm8r7969m7lv84n2wid8y"))))
+   (build-system trivial-build-system)
+   (arguments
+    `(#:modules ((guix build utils))
+      #:builder
+      (begin
+	(use-modules (guix build utils))
+	(let* ((out (assoc-ref %outputs "out"))
+	       (targetdir
+		(string-append out "/share/genenetwork2/javascript/marked"))
+	       (source (assoc-ref %build-inputs "source")))
+	  (mkdir-p targetdir)
+	  (copy-file source (string-append targetdir "/marked.min.js"))))))
+   (native-inputs `(("source" ,source)))
+   (home-page "https://marked.js.org/")
+   (synopsis "A markdown parser and compiler. Built for speed.")
+   (description
+    "A low-level markdown compiler for parsing markdown without caching or blocking for long periods of time.")
+   (license license:expat)))
-- 
cgit v1.2.3