01/03: gnu: Add emacsy-minimal.

[guix-commits]

janneke pushed a commit to branch master
in repository guix.

commit c99f32b94e744be3c38c1940b1bf82855a13af50
Author: Amar Singh <address@hidden>
Date:   Mon Jul 8 12:04:56 2019 +0530

    gnu: Add emacsy-minimal.
    
    * (guile-emacsy): New variable.
    
    Emacsy is a library for Guile. Emacsy package is too heavy for use as a
    dependency for other packages:
    
    $ guix size emacsy ... total: 1136.3 MiB
    
    versus:
    $ guix size guile-emacsy ... total: 132.3 MiB
---
 gnu/packages/guile-xyz.scm | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 16e30b9..3b2d880 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -21,6 +21,7 @@
 ;;; Copyright © 2018 Pierre-Antoine Rouby <address@hidden>
 ;;; Copyright © 2018 Eric Bavier <address@hidden>
 ;;; Copyright © 2019 swedebugia <address@hidden>
+;;; Copyright © 2019 Amar Singh <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -2377,6 +2378,36 @@ comes with a simple counter example using FreeGLUT and 
browser examples
 in C using Gtk+-3 and WebKitGtk.")
     (license license:gpl3+)))
 
+(define-public emacsy-minimal
+  (let ((commit "f3bf0dbd803d7805b6ae8303253507ad13922293"))
+    (package
+      (inherit emacsy)
+      (name "emacsy-minimal")
+      (version (git-version "v0.4.1" "19" commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://git.savannah.gnu.org/git/emacsy.git";)
+                      (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "0ivy28km1p7nlrf63xx3hvrpxf5ld5amk1wcan3k7sqv1kq9mqdb"))))
+      (build-system gnu-build-system)
+      (inputs
+       `(("guile" ,guile-2.2)
+         ("guile-lib" ,guile-lib)
+         ("guile-readline" ,guile-readline)))
+      (propagated-inputs '())
+      (arguments
+       `(#:configure-flags '("--without-examples")
+         #:phases
+         (modify-phases %standard-phases
+         (add-before 'configure 'setenv
+           (lambda _
+             (setenv "GUILE_AUTO_COMPILE" "0")
+             #t))))))))
+
 (define-public guile-jpeg
   (let ((commit "6a1673578b297c2c1b28e44a76bd5c49e76a5046")
         (revision "0"))