unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#56174] [PATCH] gnu: Add mle.
@ 2022-06-23 19:30 Nikolay Korotkiy via Guix-patches via
  2022-06-25 21:45 ` bug#56174: " Ludovic Courtès
  0 siblings, 1 reply; 2+ messages in thread
From: Nikolay Korotkiy via Guix-patches via @ 2022-06-23 19:30 UTC (permalink / raw)
  To: 56174; +Cc: Nikolay Korotkiy

* gnu/packages/text-editors.scm (mle): New variable.
---
 gnu/packages/text-editors.scm | 52 +++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)

diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm
index 1c936be6a8..03df69667a 100644
--- a/gnu/packages/text-editors.scm
+++ b/gnu/packages/text-editors.scm
@@ -56,6 +56,7 @@ (define-module (gnu packages text-editors)
   #:use-module (gnu packages code)
   #:use-module (gnu packages cpp)
   #:use-module (gnu packages crates-io)
+  #:use-module (gnu packages datastructures)
   #:use-module (gnu packages documentation)
   #:use-module (gnu packages fontutils)
   #:use-module (gnu packages freedesktop)
@@ -1215,3 +1216,54 @@ (define-public tree-sitter
 This package includes the @code{libtree-sitter} runtime library.
 ")
     (license license:expat)))
+
+(define-public mle
+  (package
+    (name "mle")
+    (version "1.5.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/adsr/mle")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "1nhd00lsx9v12zdmps92magz76c2d8zzln3lxvzl4ng73gbvq3n0"))))
+    (build-system gnu-build-system)
+    (inputs (list lua pcre uthash))
+    (arguments
+     `(#:test-target "test"
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'fix-lua
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "mle.h"
+               (("<lua5.4/") "<"))
+             (substitute* "Makefile"
+               (("-llua5.4") "-llua")
+               (("/bin/sh") (which "sh")))))
+         (add-after 'unpack 'patch-test-shebangs
+           (lambda _
+             (substitute* (find-files "tests/func" "\\.sh$")
+               (("/usr/bin/env bash") (which "bash")))))
+         (delete 'configure) ;no configure script
+         (add-after 'install 'install-man-pages
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out")) (man (string-append out
+                                                          "/share/man/man1")))
+               (install-file "mle.1"
+                             (string-append man))))))
+       #:make-flags
+       (list (string-append "CC="
+                            ,(cc-for-target))
+             (string-append "prefix=" %output))))
+    (home-page "https://github.com/adsr/mle")
+    (synopsis "Small, flexible, terminal-based text editor")
+    (description
+     "mle is a small, flexible, terminal-based text editor written in C.
+Notable features include: full Unicode support, syntax highlighting,
+scriptable rc file, macros, search and replace (PCRE), window
+splitting, multiple cursors, and integration with various shell
+commands.")
+    (license license:asl2.0)))
-- 
2.36.1





^ permalink raw reply related	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2022-06-25 21:46 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-06-23 19:30 [bug#56174] [PATCH] gnu: Add mle Nikolay Korotkiy via Guix-patches via
2022-06-25 21:45 ` bug#56174: " Ludovic Courtès

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).