[bug#54474] [PATCH 1/6] gnu: Add emacs-logos.

[Jai Vetrivelan <jaivetrivelan@gmail.com>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: 0001-gnu-Add-emacs-logos.patch --]
[-- Type: text/patch, Size: 2265 bytes --]

From 085ca19fc6bdbb26ad96e7f818b1237fed1c884a Mon Sep 17 00:00:00 2001
From: Jai Vetrivelan <jaivetrivelan@gmail.com>
Date: Sun, 20 Mar 2022 17:22:25 +0530
Subject: [PATCH 1/6] gnu: Add emacs-logos.

* gnu/packages/emacs-xyz.scm (emacs-logos): New variable.
---
 gnu/packages/emacs-xyz.scm | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index dcd36291fb..f9df88040a 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -13129,6 +13129,42 @@ (define-public emacs-log4e
 you to deal with multiple log levels.")
     (license license:gpl3+)))
 
+(define-public emacs-logos
+  (package
+   (name "emacs-logos")
+   (version "0.2.0")
+   (source (origin
+            (method git-fetch)
+            (uri (git-reference
+                  (url "https://gitlab.com/protesilaos/logos.git/")
+                  (commit version)))
+            (file-name (git-file-name name version))
+            (sha256
+             (base32
+              "0jsa2hyhg7z3ii43rijypy4ps22adk5ng6yv7nmrx286nrr1bggq"))))
+   (native-inputs (list texinfo))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'makeinfo
+           (lambda* (#:key outputs #:allow-other-keys)
+             (invoke "emacs"
+                     "--batch"
+                     "--eval=(require 'ox-texinfo)"
+                     "--eval=(find-file \"README.org\")"
+                     "--eval=(org-texinfo-export-to-info)")
+             (install-file "logos.info"
+                           (string-append (assoc-ref outputs "out")
+                                          "/share/info")))))))
+   (home-page "https://protesilaos.com/emacs/logos")
+   (synopsis "Simple focus mode for Emacs")
+   (description "This package provides a simple focus mode which can be applied
+to any buffer for reading, writing, or even doing a presentation.  The buffer
+can be divided in pages using the `page-delimiter', outline structure, or any
+other pattern.")
+   (license license:gpl3+))) ; GFDLv1.3+ for the manual
+
 (define-public emacs-gn-mode
   (package
     (name "emacs-gn-mode")
-- 
2.34.0