@@ -7,6 +7,7 @@
;;; Copyright © 2018 Adam Massmann <massmannak@gmail.com>
;;; Copyright © 2020 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; Copyright © 2021 Vinicius Monego <monego@posteo.net>
+;;; Copyright © 2021 Alexandr Vityazev <avityazev@posteo.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -33,6 +34,7 @@
#:use-module (guix build-system gnu)
#:use-module (guix build-system perl)
#:use-module (guix build-system python)
+ #:use-module (guix build-system meson)
#:use-module (gnu packages)
#:use-module (gnu packages compression)
#:use-module (gnu packages check)
@@ -51,7 +53,8 @@
#:use-module (gnu packages time)
#:use-module (gnu packages web)
#:use-module (gnu packages xdisorg)
- #:use-module (gnu packages xml))
+ #:use-module (gnu packages xml)
+ #:use-module (gnu packages pkg-config))
(define-public xapian
(package
@@ -333,6 +336,37 @@ with slocate, and attempts to be compatible to GNU locate when it does not
conflict with slocate compatibility.")
(license gpl2)))
+(define-public plocate
+ (package
+ (name "plocate")
+ (version "1.1.11")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append
+ "https://plocate.sesse.net/download/plocate-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "0kwfp3hwf9dbakf3h378qrhl0jd1spxxrs4snmgb5jsbdijwd777"))))
+ (build-system meson-build-system)
+ (arguments
+ `(#:configure-flags
+ (list
+ (string-append
+ "--sharedstatedir=" (assoc-ref %outputs "out") "/var"))))
+ (inputs
+ `(("zstd" ,zstd "lib")
+ ("liburing" ,liburing)))
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (home-page "https://plocate.sesse.net/")
+ (synopsis "Much faster locate")
+ (description "Plocate is a @code{locate} based on posting lists,
+completely replacing @code{mlocate} with a much faster and smaller index.
+It is suitable as a default locate on your system.")
+ (license gpl2)))
+
(define-public swish-e
(package
(name "swish-e")