GNU bug report logs - #26890
[PATCH] gnu: Add agrep.

Previous Next

Full log

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Ricardo Wurmus <rekado <at> elephly.net>
To: guix-patches <at> gnu.org
Cc: Ricardo Wurmus <rekado <at> elephly.net>
Subject: [PATCH] gnu: Add agrep.
Date: Thu, 11 May 2017 21:30:45 +0200

* gnu/packages/base.scm (agrep): New variable.
---
 gnu/packages/base.scm | 33 ++++++++++++++++++++++++++++++++-
 1 file changed, 32 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 59a9acd67..a07638c38 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -8,6 +8,7 @@
 ;;; Copyright © 2016 Efraim Flashner <efraim <at> flashner.co.il>
 ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke <at> gnu.org>
 ;;; Copyright © 2017 Marius Bakke <mbakke <at> fastmail.com>
+;;; Copyright © 2017 Ricardo Wurmus <rekado <at> elephly.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -26,7 +27,7 @@
 
 (define-module (gnu packages base)
   #:use-module ((guix licenses)
-                #:select (gpl3+ lgpl2.0+ lgpl3+ public-domain))
+                #:select (gpl2+ gpl3+ lgpl2.0+ lgpl3+ public-domain))
   #:use-module (gnu packages)
   #:use-module (gnu packages acl)
   #:use-module (gnu packages bash)
@@ -116,6 +117,36 @@ including, for example, recursive directory searching.")
    (license gpl3+)
    (home-page "https://www.gnu.org/software/grep/")))
 
+(define-public agrep
+  (package
+    (name "agrep")
+    (version "3.41")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://www.tgries.de/agrep/agrep-"
+                                  version ".tgz"))
+              (sha256
+               (base32
+                "0ki3gbvc7lh8alks9zm48f216l2gp8r6vssmr5yccpvjz7xfl205"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:tests? #f ; no "check" target
+       #:phases
+       (modify-phases %standard-phases
+         (delete 'configure)
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+               (mkdir-p bin)
+               (install-file "agrep" bin)
+               #t))))))
+    (home-page "https://www.tgries.de/agrep/")
+    (synopsis "Approximate grep for fast fuzzy string searching")
+    (description "Agrep is a tool for fast searching of files for a string or
+regular expression, with approximate matching capabilities and user-definable
+records.")
+    (license gpl2+)))
+
 (define-public sed
   (package
    (name "sed")
-- 
2.12.2

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.