[bug#39730] [PATCH 1/2] gnu: Add cl-clss.

[Dimakis Dimakakos]

From: Dimakakos Dimos <address@hidden>

* gnu/packages/lisp-xyz.scm (cl-clss, sbcl-clss, ecl-clss): New variables.
---
 gnu/packages/lisp-xyz.scm | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 0ed074b766..c6f64ae278 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -17,6 +17,7 @@
 ;;; Copyright © 2019, 2020 Guillaume Le Vaillant <address@hidden>
 ;;; Copyright © 2019 Brett Gilio <address@hidden>
 ;;; Copyright © 2020 Konrad Hinsen <address@hidden>
+;;; Copyright © 2020 Dimakis Dimakakos <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -10645,3 +10646,36 @@ lightweight messaging kernel.")
 
 (define-public ecl-pzmq
   (sbcl-package->ecl-package sbcl-pzmq))
+
+(define-public sbcl-clss
+  (let ((revision "1")
+       (commit "2a8e8615ab55870d4ca01928f3ed3bbeb4e75c8d"))
+    (package
+      (name "sbcl-clss")
+      (version (string-append "0.3.1-" revision "." (string-take commit 7)))
+      (source
+       (origin
+         (method git-fetch)
+         (uri
+          (git-reference
+           (url "https://github.com/Shinmera/clss.git";)
+           (commit commit)))
+         (sha256
+          (base32 "0la4dbcda78x29szanylccrsljqrn9d1mhh569sqkyp44ni5fv91"))
+         (file-name
+          (string-append "clss" version "-checkout"))))
+      (inputs
+       `(("array-utils" ,sbcl-array-utils)
+         ("plump" ,sbcl-plump)))
+      (build-system asdf-build-system/sbcl)
+      (synopsis "A DOM tree searching engine based on CSS selectors")
+      (description "CLSS is a DOM traversal engine based on CSS
+selectors. It makes use of the Plump-DOM and is used by lQuery.")
+      (home-page "https://github.com/Shinmera/clss";)
+      (license license:zlib))))
+
+(define-public cl-clss
+  (sbcl-package->cl-source-package sbcl-clss))
+
+(define-public ecl-clss
+  (sbcl-package->ecl-package sbcl-clss))
-- 
2.25.0