aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/disk.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/disk.scm')
-rw-r--r--gnu/packages/disk.scm41
1 files changed, 41 insertions, 0 deletions
diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 0853eb6d28..8912bb74bc 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -24,6 +24,7 @@
;;; Copyright © 2021 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2014, 2022 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
+;;; Copyright © 2022 Disseminate Dissent <disseminatedissent@protonmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -835,6 +836,46 @@ hierarchy. It ships with @code{rifle}, a file launcher that is good at
automatically finding out which program to use for what file type.")
(license license:gpl3)))
+(define-public fff
+ (package
+ (name "fff")
+ (version "2.2")
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/dylanaraps/fff")
+ (commit version)))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "14ymdw6l6phnil0xf1frd5kgznaiwppcic0v4hb61s1zpf4wrshg"))))
+ (build-system gnu-build-system)
+ (inputs
+ (list bash
+ file))
+ (arguments
+ (list
+ #:tests? #f ; no tests
+ #:make-flags
+ #~(list
+ (string-append "PREFIX=" #$output))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'refer-to-inputs
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((file (assoc-ref inputs "file")))
+ (substitute* "fff"
+ (("\\bfile [-\"]" match)
+ (string-append file "/bin/" match))))))
+ (delete 'configure)))) ; no configure script
+ (home-page "https://github.com/dylanaraps/fff")
+ (synopsis "Simple file manager written in bash")
+ (description
+ "@command{fff} (fast file-manager) is a simple, blazing fast and minimal
+file manager for Linux, written in bash. It only requires bash and coreutils,
+and its highly optimized now for efficient performance.")
+ (license license:expat)))
+
(define-public volume-key
(package
(name "volume-key")