>From 172e42ae07cb5585d83403d3afc7c83c10d8c53f Mon Sep 17 00:00:00 2001
From: Maxim Cournoyer <address@hidden>
Date: Sun, 18 Mar 2018 16:37:30 -0400
Subject: [PATCH 15/27] gnu: Add emacs-scel.

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

diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
index cdd4904f7..420c0526b 100644
--- a/gnu/packages/emacs.scm
+++ b/gnu/packages/emacs.scm
@@ -2643,6 +2643,59 @@ implementation in Emacs.  To use it just load this file and bind that function
 to a key in your preferred mode.")
       (license license:public-domain))))
 
+(define-public emacs-scel
+  (let ((version "20170629")
+        (revision "1")
+        (commit "aeea3ad4be9306d14c3a734a4ff54fee10ac135b"))
+    (package
+      (name "emacs-scel")
+      (version (git-version version revision commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/supercollider/scel.git")
+                      (commit commit)))
+                (file-name (string-append name "-" version "-checkout"))
+                (sha256
+                 (base32
+                  "0jvmzs1lsjyndqshhii2y4mnr3wghai26i3p75453zrpxpg0zvvw"))))
+      (build-system emacs-build-system)
+      (arguments
+       `(#:phases
+         (modify-phases %standard-phases
+           (add-after 'unpack 'move-el-files
+             (lambda _
+               (for-each
+                (lambda (f)
+                  (rename-file f (basename f)))
+                (find-files "el" "^.*\\.el(\\.in)?$"))
+               #t))
+           (add-after 'move-el-files 'configure-sclang-vars
+             (lambda* (#:key inputs #:allow-other-keys)
+               (let ((supercollider (assoc-ref inputs "supercollider")))
+                 (substitute* "sclang-vars.el.in"
+                   (("@PKG_DATA_DIR@")
+                    (string-append supercollider "/share/SuperCollider"))
+                   ;; See: https://github.com/widp/el-supercollider/issues/1
+                   (("Help") "HelpSource")))
+               (rename-file "sclang-vars.el.in" "sclang-vars.el")
+               #t))
+           (add-after 'configure-sclang-vars 'install-extensions
+             (lambda* (#:key outputs #:allow-other-keys)
+               (let* ((out (assoc-ref outputs "out"))
+                      (ext-dir (string-append
+                                out "/share/SuperCollider/Extensions"
+                                "/scide_scel")))
+                 (delete-file "sc/CMakeLists.txt")
+                 (copy-recursively "sc" ext-dir))
+               #t)))))
+      (inputs
+       `(("supercollider" ,supercollider)))
+      (home-page "https://github.com/supercollider/scel")
+      (synopsis "SuperCollider Emacs interface")
+      (description "scel is an Emacs based interface to SuperCollider.")
+      (license license:gpl2+))))
+
 (define-public emacs-mit-scheme-doc
   (package
     (name "emacs-mit-scheme-doc")
-- 
2.16.1