* [bug#38776] [PATCH] Add qemacs
@ 2019-12-28 15:37 Nicolas Goaziou
2020-01-26 18:28 ` bug#38776: " Nicolas Goaziou
0 siblings, 1 reply; 2+ messages in thread
From: Nicolas Goaziou @ 2019-12-28 15:37 UTC (permalink / raw)
To: 38776
[-- Attachment #1: Type: text/plain, Size: 248 bytes --]
Hello,
The following patch adds qemacs.
Note that it is built /without/ ffmpeg support (to read audio and video
files from the editor). I can try to include the feature, if necessary.
As always, feedback welcome.
Regards,
--
Nicolas Goaziou
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Add qemacs --]
[-- Type: text/x-diff, Size: 5569 bytes --]
From a4a93fbf71746f8e27e048fa7b72173a1a01e2c7 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Sat, 28 Dec 2019 16:32:25 +0100
Subject: [PATCH] gnu: Add qemacs.
* gnu/packages/text-editors.scm (qemacs): New variable.
---
gnu/packages/text-editors.scm | 109 ++++++++++++++++++++++++++++++++++
1 file changed, 109 insertions(+)
diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm
index ac4c5b82ac..3945a5f8a7 100644
--- a/gnu/packages/text-editors.scm
+++ b/gnu/packages/text-editors.scm
@@ -58,6 +58,8 @@
#:use-module (gnu packages regex)
#:use-module (gnu packages ruby)
#:use-module (gnu packages terminals)
+ #:use-module (gnu packages texinfo)
+ #:use-module (gnu packages xorg)
#:use-module (gnu packages xml))
(define-public vis
@@ -613,3 +615,110 @@ card. It offers:
@item Compose function for Latin 1 characters
@end itemize")
(license license:gpl2+)))
+
+(define-public qemacs
+ (package
+ (name "qemacs")
+ (version "0.3.3")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "https://bellard.org/qemacs/"
+ "qemacs-" version ".tar.gz"))
+ (sha256
+ (base32 "156z4wpj49i6j388yjird5qvrph7hz0grb4r44l4jf3q8imadyrg"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ;no test
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'build 'build-qhtml
+ ;; Build fails without first creating qHTML library.
+ (lambda _ (invoke "make" "-C" "libqhtml")))
+ (add-before 'install 'fix-man-pages-directory
+ ;; Install in $out/share/man instead of $out/man.
+ (lambda _
+ (substitute* "Makefile"
+ (("/man/man1" all) (string-append "/share" all)))
+ #t))
+ (add-before 'install 'create-directories
+ ;; Ensure directories exist before installing files.
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (for-each (lambda (d) (mkdir-p (string-append out d)))
+ '("/bin" "/share/man/man1" "/share/qe"))
+ #t)))
+ (add-after 'install 'install-extra-documentation
+ ;; Install sample configuration file, Info, and HTML manual.
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((share (string-append (assoc-ref outputs "out") "/share"))
+ (doc (string-append share "/doc/" ,name "-" ,version))
+ (html (string-append share "/html"))
+ (info (string-append share "/info"))
+ (makeinfo (string-append (assoc-ref %build-inputs "texinfo")
+ "/bin/makeinfo")))
+ ;; First fix Texinfo documentation, create appropriate
+ ;; directories, then generate Info and HTML files there.
+ (substitute* "qe-doc.texi"
+ (("^M-([{}])" _ bracket) (string-append "M-@" bracket)))
+ (for-each (lambda (d) (mkdir-p d)) (list html info))
+ (invoke makeinfo "qe-doc.texi" "-o" info)
+ (invoke makeinfo "qe-doc.texi" "--html" "--no-split" "-o" html)
+ ;; Install sample configuration file.
+ (install-file "config.eg" doc)
+ #t))))))
+ (native-inputs
+ `(("texinfo" ,texinfo)))
+ (inputs
+ `(("libx11" ,libx11)
+ ("libxext" ,libxext)
+ ("libxv" ,libxv)))
+ (home-page "https://bellard.org/qemacs/")
+ (synopsis "Small but powerful text editor")
+ (description "QEmacs (for Quick Emacs) is a very small but
+powerful editor. It has features that even big editors lack:
+
+@itemize
+
+@item Full screen editor with an Emacs look and feel with all Emacs
+common features: multi-buffer, multi-window, command mode, universal
+argument, keyboard macros, config file with C-like syntax, minibuffer
+with completion and history.
+
+@item Can edit files of hundreds of Megabytes without being slow by
+using a highly optimized internal representation and by mmaping the
+file.
+
+@item Full Unicode support, including multi charset handling (8859-x,
+UTF8, SJIS, EUC-JP, ...) and bidirectional editing respecting the
+Unicode bidi algorithm. Arabic and Indic scripts handling (in
+progress).
+
+@item WYSIWYG HTML/XML/CSS2 mode graphical editing. Also supports
+Lynx like rendering on VT100 terminals.
+
+@item WYSIWYG DocBook mode based on XML/CSS2 renderer.
+
+@item C mode: coloring with immediate update. Emacs like auto-indent.
+
+@item Shell mode: colorized VT100 emulation so that your shell work
+exactly as you expect. Compile mode with next/prev error.
+
+@item Input methods for most languages, including Chinese (input
+methods come from the Yudit editor).
+
+@item Hexadecimal editing mode with insertion and block commands.
+Unicode hexa editing is also supported.
+
+@item Works on any VT100 terminals without termcap. UTF8 VT100
+support included with double width glyphs.
+
+@item X11 support. Support multiple proportional fonts at the same
+time (as XEmacs). X Input methods supported. Xft extension supported
+for anti aliased font display.
+
+@item Small! Full version (including HTML/XML/CSS2/DocBook rendering
+and all charsets): 200KB big. Basic version (without bidir/unicode
+scripts/input/X11/C/Shell/HTML/Dired): 49KB.
+@end itemize")
+ (license license:lgpl2.1+)))
--
2.24.1
^ permalink raw reply related [flat|nested] 2+ messages in thread
* bug#38776: [PATCH] Add qemacs
2019-12-28 15:37 [bug#38776] [PATCH] Add qemacs Nicolas Goaziou
@ 2020-01-26 18:28 ` Nicolas Goaziou
0 siblings, 0 replies; 2+ messages in thread
From: Nicolas Goaziou @ 2020-01-26 18:28 UTC (permalink / raw)
To: 38776-done
Nicolas Goaziou <mail@nicolasgoaziou.fr> writes:
>
> The following patch adds qemacs.
Applied as 3fad9a692311cc3165aac95b70e881bf8fb092ff.
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2020-01-26 18:30 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2019-12-28 15:37 [bug#38776] [PATCH] Add qemacs Nicolas Goaziou
2020-01-26 18:28 ` bug#38776: " Nicolas Goaziou
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).