;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014 Taylan Ulrich Bayirli/Kammer ;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès ;;; Copyright © 2014, 2015, 2016 Mark H Weaver ;;; Copyright © 2014, 2015, 2016, 2017 Alex Kost ;;; Copyright © 2015 Federico Beffa ;;; Copyright © 2015, 2016, 2017 Ricardo Wurmus ;;; Copyright © 2016, 2017 Chris Marusich ;;; Copyright © 2015, 2016 Christopher Allan Webber ;;; Copyright © 2016 Adriano Peluso ;;; Copyright © 2016 Efraim Flashner ;;; Copyright © 2016 David Thompson ;;; Copyright © 2016 Matthew Jordan ;;; Copyright © 2016, 2017 Roel Janssen ;;; Copyright © 2016, 2017 ng0 ;;; Copyright © 2016 Alex Griffin ;;; Copyright © 2016, 2017 Nicolas Goaziou ;;; Copyright © 2016 Alex Vong ;;; Copyright © 2016, 2017 Arun Isaac ;;; Copyright © 2017 Christopher Baines ;;; Copyright © 2017 Mathieu Othacehe ;;; Copyright © 2017 Clément Lassieur ;;; Copyright © 2017 Vasile Dumitrascu ;;; Copyright © 2017 Kyle Meyer ;;; Copyright © 2017 Kei Kebreau ;;; Copyright © 2017 George Clemmer ;;; Copyright © 2017 Feng Shu ;;; Copyright © 2017 Jan Nieuwenhuizen ;;; Copyright © 2017 Oleg Pykhalov ;;; Copyright © 2017 Mekeor Melire ;;; ;;; This file is part of GNU Guix. ;;; ;;; GNU Guix is free software; you can redistribute it and/or modify it ;;; under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 3 of the License, or (at ;;; your option) any later version. ;;; ;;; GNU Guix is distributed in the hope that it will be useful, but ;;; WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with GNU Guix. If not, see . (define-module (gnu packages emacs) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix git-download) #:use-module (guix gexp) #:use-module (guix monads) #:use-module (guix store) #:use-module (guix build-system gnu) #:use-module (guix build-system emacs) #:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system trivial) #:use-module (gnu packages) #:use-module (gnu packages audio) #:use-module (gnu packages code) #:use-module (gnu packages guile) #:use-module (gnu packages gtk) #:use-module (gnu packages gnome) #:use-module (gnu packages ncurses) #:use-module (gnu packages python) #:use-module (gnu packages tex) #:use-module (gnu packages texinfo) #:use-module (gnu packages tcl) #:use-module (gnu packages tls) #:use-module (gnu packages pkg-config) #:use-module (gnu packages xorg) #:use-module (gnu packages lesstif) #:use-module (gnu packages image) #:use-module (gnu packages linux) #:use-module (gnu packages version-control) #:use-module (gnu packages imagemagick) #:use-module (gnu packages w3m) #:use-module (gnu packages wget) #:use-module (gnu packages autotools) #:use-module (gnu packages base) #:use-module (gnu packages compression) #:use-module (gnu packages xml) #:use-module (gnu packages glib) #:use-module (gnu packages acl) #:use-module (gnu packages package-management) #:use-module (gnu packages perl) #:use-module (gnu packages pdf) #:use-module (gnu packages scheme) #:use-module (gnu packages statistics) #:use-module (gnu packages xiph) #:use-module (gnu packages mp3) #:use-module (gnu packages gettext) #:use-module (gnu packages fribidi) #:use-module (gnu packages gd) #:use-module (gnu packages fontutils) #:use-module (guix utils) #:use-module (srfi srfi-1) #:use-module (ice-9 match)) (define-public emacs (package (name "emacs") (version "25.2") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/emacs/emacs-" version ".tar.xz")) (sha256 (base32 "1ykkq0xl28ljdg61bm6gzy04ww86ajms98gix72qg6cpr6a53dar")) (patches (search-patches "emacs-exec-path.patch" "emacs-fix-scheme-indent-function.patch" "emacs-source-date-epoch.patch")) (modules '((guix build utils))) (snippet ;; Delete the bundled byte-compiled elisp files and ;; generated autoloads. '(with-directory-excursion "lisp" (for-each delete-file (append (find-files "." "\\.elc$") (find-files "." "loaddefs\\.el$") ;; This is the only "autoloads" file that ;; does not have "*loaddefs.el" name. '("eshell/esh-groups.el"))) ;; Make sure Tramp looks for binaries in the right places on ;; remote GuixSD machines, where 'getconf PATH' returns ;; something bogus. (substitute* "net/tramp-sh.el" ;; Patch the line after "(defcustom tramp-remote-path". (("\\(tramp-default-remote-path") (format #f "(tramp-default-remote-path ~s ~s ~s ~s " "~/.guix-profile/bin" "~/.guix-profile/sbin" "/run/current-system/profile/bin" "/run/current-system/profile/sbin"))))))) (build-system glib-or-gtk-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'configure 'fix-/bin/pwd (lambda _ ;; Use `pwd', not `/bin/pwd'. (substitute* (find-files "." "^Makefile\\.in$") (("/bin/pwd") "pwd")))) (add-after 'install 'install-site-start ;; Use 'guix-emacs' in "site-start.el". This way, Emacs packages ;; provided by Guix and installed in ;; ~/.guix-profile/share/emacs/site-lisp/guix.d/PACKAGE-VERSION are ;; automatically found. (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (lisp-dir (string-append out "/share/emacs/site-lisp"))) (copy-file (assoc-ref inputs "guix-emacs.el") (string-append lisp-dir "/guix-emacs.el")) (with-output-to-file (string-append lisp-dir "/site-start.el") (lambda () (display (string-append "(when (require 'guix-emacs nil t)\n" " (guix-emacs-autoload-packages))\n")))) #t)))))) (inputs `(("gnutls" ,gnutls) ("ncurses" ,ncurses) ;; TODO: Add the optional dependencies. ("libx11" ,libx11) ("gtk+" ,gtk+) ("libxft" ,libxft) ("libtiff" ,libtiff) ("giflib" ,giflib) ("libjpeg" ,libjpeg-8) ("imagemagick" ,imagemagick) ("acl" ,acl) ;; When looking for libpng `configure' links with `-lpng -lz', so we ;; must also provide zlib as an input. ("libpng" ,libpng) ("zlib" ,zlib) ("librsvg" ,librsvg) ("libxpm" ,libxpm) ("libxml2" ,libxml2) ("libice" ,libice) ("libsm" ,libsm) ("alsa-lib" ,alsa-lib) ("dbus" ,dbus) ;; multilingualization support ("libotf" ,libotf) ("m17n-lib" ,m17n-lib))) (native-inputs `(("guix-emacs.el" ,(search-auxiliary-file "emacs/guix-emacs.el")) ("pkg-config" ,pkg-config) ("texinfo" ,texinfo))) (native-search-paths (list (search-path-specification (variable "INFOPATH") (files '("share/info"))))) (home-page "https://www.gnu.org/software/emacs/") (synopsis "The extensible, customizable, self-documenting text editor") (description "GNU Emacs is an extensible and highly customizable text editor. It is based on an Emacs Lisp interpreter with extensions for text editing. Emacs has been extended in essentially all areas of computing, giving rise to a vast array of packages supporting, e.g., email, IRC and XMPP messaging, spreadsheets, remote server editing, and much more. Emacs includes extensive documentation on all aspects of the system, from basic editing to writing large Lisp programs. It has full Unicode support for nearly all human languages.") (license license:gpl3+))) (define-public emacs-minimal ;; This is the version that you should use as an input to packages that just ;; need to byte-compile .el files. (package (inherit emacs) (name "emacs-minimal") (synopsis "The extensible text editor (used only for byte-compilation)") (build-system gnu-build-system) (arguments (substitute-keyword-arguments (package-arguments emacs) ((#:phases phases) `(modify-phases ,phases (delete 'install-site-start))))) (inputs `(("ncurses" ,ncurses))) (native-inputs `(("pkg-config" ,pkg-config))))) (define-public emacs-no-x (package (inherit emacs) (name "emacs-no-x") (synopsis "The extensible, customizable, self-documenting text editor (console only)") (build-system gnu-build-system) (inputs (fold alist-delete (package-inputs emacs) '("libx11" "gtk+" "libxft" "libtiff" "giflib" "libjpeg" "libpng" "librsvg" "libxpm" "libice" "libsm" ;; D-Bus depends on libx11, so remove it as well. "dbus"))))) (define-public emacs-no-x-toolkit (package (inherit emacs) (name "emacs-no-x-toolkit") (synopsis "The extensible, customizable, self-documenting text editor (without an X toolkit)" ) (build-system gnu-build-system) (inputs (append `(("inotify-tools" ,inotify-tools)) (alist-delete "gtk+" (package-inputs emacs)))) (arguments (append '(#:configure-flags '("--with-x-toolkit=no")) (package-arguments emacs))))) (define-public guile-emacs (package (inherit emacs) (name "guile-emacs") (version "20150512.41120e0") (source (origin (method git-fetch) (uri (git-reference (url "git://git.hcoop.net/git/bpt/emacs.git") (commit "41120e0f595b16387eebfbf731fff70481de1b4b"))) (sha256 (base32 "0lvcvsz0f4mawj04db35p1dvkffdqkz8pkhc0jzh9j9x2i63kcz6")))) (native-inputs `(("autoconf" ,autoconf) ("automake" ,automake) ("guile" ,guile-for-guile-emacs) ,@(package-native-inputs emacs))) (arguments (substitute-keyword-arguments `(;; Build fails if we allow parallel build. #:parallel-build? #f ;; Tests aren't passing for now. #:tests? #f ,@(package-arguments emacs)) ((#:phases phases) `(modify-phases ,phases (add-after 'unpack 'autogen (lambda _ (zero? (system* "sh" "autogen.sh")))))))))) ;;; ;;; Emacs hacking. ;;; (define-public geiser (package (name "geiser") (version "0.9") (source (origin (method url-fetch) (uri (string-append "mirror://savannah/geiser/" version "/geiser-" version ".tar.gz")) (sha256 (base32 "0phz9d8wjk4p13vqannv0003fwh8qqrp0gfzcs2hgq1mrmv1srss")))) (build-system gnu-build-system) (arguments '(#:phases (alist-cons-after 'install 'post-install (lambda* (#:key outputs #:allow-other-keys) (symlink "geiser-install.el" (string-append (assoc-ref outputs "out") "/share/emacs/site-lisp/" "geiser-autoloads.el"))) %standard-phases))) (inputs `(("guile" ,guile-2.0))) (native-inputs `(("emacs" ,emacs-minimal))) (home-page "http://nongnu.org/geiser/") (synopsis "Collection of Emacs modes for Guile and Racket hacking") (description "Geiser is a collection of Emacs major and minor modes that conspire with one or more Scheme implementations to keep the Lisp Machine Spirit alive. The continuously running Scheme interpreter takes the center of the stage in Geiser. A bundle of Elisp shims orchestrates the dialog between the Scheme implementation, Emacs and, ultimately, the schemer, giving them access to live metadata.") (license license:bsd-3))) (define-public geiser-next ;; This has become "geiser". (deprecated-package "geiser-next" geiser)) (define-public paredit (package (name "emacs-paredit") (version "24") (source (origin (method url-fetch) (uri (string-append "http://mumble.net/~campbell/emacs/paredit-" version ".el")) (sha256 (base32 "0pp3n8q6kc70blqsaw0zlzp6bc327dpgdrjr0cnh7hqg1lras7ka")))) (build-system emacs-build-system) (home-page "http://mumble.net/~campbell/emacs/paredit/") (synopsis "Emacs minor mode for editing parentheses") (description "ParEdit (paredit.el) is a minor mode for performing structured editing of S-expression data. The typical example of this would be Lisp or Scheme source code. ParEdit helps **keep parentheses balanced** and adds many keys for moving S-expressions and moving around in S-expressions. Its behavior can be jarring for those who may want transient periods of unbalanced parentheses, such as when typing parentheses directly or commenting out code line by line.") (license license:gpl3+))) (define-public paredit/old-name (deprecated-package "paredit" paredit)) (define-public git-modes (package (name "git-modes") (version "1.2.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/magit/git-modes/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0xxrmf0jnyljxvllc22qa0v8lgi4k1ldnayjm5hf68m25jsr378l")))) (build-system emacs-build-system) (home-page "https://github.com/magit/git-modes") (synopsis "Emacs major modes for Git configuration files") (description "This package provides Emacs major modes for editing various Git configuration files, such as .gitattributes, .gitignore, and .git/config.") (license license:gpl3+))) (define-public emacs-with-editor (package (name "emacs-with-editor") (version "2.5.10") (source (origin (method url-fetch) (uri (string-append "https://github.com/magit/with-editor/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0lsxa1hghybkzvqhqvvym3hxbyp9vjcnnpb9j800z0vyhbnlka67")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/magit/with-editor") (synopsis "Emacs library for using Emacsclient as EDITOR") (description "This package provides an Emacs library to use the Emacsclient as @code{$EDITOR} of child processes, making sure they know how to call home. For remote processes a substitute is provided, which communicates with Emacs on stdout instead of using a socket as the Emacsclient does.") (license license:gpl3+))) (define-public magit (package (name "magit") (version "2.10.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/magit/magit/releases/download/" version "/" name "-" version ".tar.gz")) (sha256 (base32 "03ln65ss420gc3h4pi56dayd1p163xfxrxrd9fkb9xnkl8mjglqk")))) (build-system gnu-build-system) (native-inputs `(("texinfo" ,texinfo) ("emacs" ,emacs-minimal))) (inputs `(("git" ,git) ("perl" ,perl))) (propagated-inputs `(("dash" ,emacs-dash) ("with-editor" ,emacs-with-editor))) (arguments `(#:modules ((guix build gnu-build-system) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-utils)) #:test-target "test" #:tests? #f ; tests are not included in the release #:make-flags (list (string-append "PREFIX=" %output) ;; Don't put .el files in a sub-directory. (string-append "lispdir=" %output "/share/emacs/site-lisp") (string-append "DASH_DIR=" (assoc-ref %build-inputs "dash") "/share/emacs/site-lisp/guix.d/dash-" ,(package-version emacs-dash)) (string-append "WITH_EDITOR_DIR=" (assoc-ref %build-inputs "with-editor") "/share/emacs/site-lisp/guix.d/with-editor-" ,(package-version emacs-with-editor))) #:phases (modify-phases %standard-phases (delete 'configure) (add-before 'build 'patch-exec-paths (lambda* (#:key inputs #:allow-other-keys) (let ((git (assoc-ref inputs "git")) (perl (assoc-ref inputs "perl"))) (emacs-substitute-variables "lisp/magit-git.el" ("magit-git-executable" (string-append git "/bin/git"))) (substitute* "lisp/magit-sequence.el" (("perl") (string-append perl "/bin/perl"))) #t)))))) (home-page "http://magit.github.io/") (synopsis "Emacs interface for the Git version control system") (description "With Magit, you can inspect and modify your Git repositories with Emacs. You can review and commit the changes you have made to the tracked files, for example, and you can browse the history of past changes. There is support for cherry picking, reverting, merging, rebasing, and other common Git operations.") (license license:gpl3+))) (define-public magit-svn (package (name "magit-svn") (version "2.1.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/magit/magit-svn/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "04y88j7q9h8xjbx5dbick6n5nr1522sn9i1znp0qwk3vjb4b5mzz")))) (build-system trivial-build-system) (native-inputs `(("emacs" ,emacs-minimal) ("tar" ,tar) ("gzip" ,gzip))) (propagated-inputs `(("dash" ,emacs-dash) ("magit" ,magit))) (arguments `(#:modules ((guix build utils) (guix build emacs-utils)) #:builder (begin (use-modules (guix build utils) (guix build emacs-utils)) (let* ((tar (string-append (assoc-ref %build-inputs "tar") "/bin/tar")) (PATH (string-append (assoc-ref %build-inputs "gzip") "/bin")) (emacs (string-append (assoc-ref %build-inputs "emacs") "/bin/emacs")) (magit (string-append (assoc-ref %build-inputs "magit") "/share/emacs/site-lisp")) (dash (string-append (assoc-ref %build-inputs "dash") "/share/emacs/site-lisp/guix.d/dash-" ,(package-version emacs-dash))) (source (assoc-ref %build-inputs "source")) (lisp-dir (string-append %output "/share/emacs/site-lisp"))) (setenv "PATH" PATH) (system* tar "xvf" source) (install-file (string-append ,name "-" ,version "/magit-svn.el") lisp-dir) (with-directory-excursion lisp-dir (parameterize ((%emacs emacs)) (emacs-generate-autoloads ,name lisp-dir) (setenv "EMACSLOADPATH" (string-append ":" magit ":" dash)) (emacs-batch-eval '(byte-compile-file "magit-svn.el")))))))) (home-page "https://github.com/magit/magit-svn") (synopsis "Git-SVN extension to Magit") (description "This package is an extension to Magit, the Git Emacs mode, providing support for Git-SVN.") (license license:gpl3+))) (define-public emacs-magit-popup (package (name "emacs-magit-popup") (version (package-version magit)) (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/magit/magit/" version "/lisp/magit-popup.el")) (file-name (string-append "magit-popup-" version ".el")) (sha256 (base32 "08b6ypfiq8zavjfq0wcdh26xziwq7rqvvv3lfpib9101146kzx6d")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/magit/magit") (synopsis "Define prefix-infix-suffix command combos") (description "This library implements a generic interface for toggling switches and setting options and then invoking an Emacs command which does something with these arguments. The prototypical use is for the command to call an external process, passing on the arguments as command line arguments.") (license license:gpl3+))) (define-public haskell-mode (package (name "haskell-mode") (version "16.1") (source (origin (method url-fetch) (file-name (string-append name "-" version ".tar.gz")) (uri (string-append "https://github.com/haskell/haskell-mode/archive/v" version ".tar.gz")) (sha256 (base32 "0g6lcjw7lcgavv3yrd8xjcyqgfyjl787y32r1z14amw2f009m78h")))) (inputs `(("emacs-el-search" ,emacs-el-search) ; for tests ("emacs-stream" ,emacs-stream))) ; for tests (propagated-inputs `(("emacs-dash" ,emacs-dash))) (native-inputs `(("emacs" ,emacs-minimal) ("texinfo" ,texinfo))) (build-system gnu-build-system) (arguments `(#:make-flags (list (string-append "EMACS=" (assoc-ref %build-inputs "emacs") "/bin/emacs")) #:modules ((ice-9 match) (srfi srfi-26) ,@%gnu-build-system-modules) #:phases (modify-phases %standard-phases (delete 'configure) (add-before 'build 'pre-build (lambda* (#:key inputs #:allow-other-keys) (define (el-dir store-dir) (match (find-files store-dir) ((f1 f2 ...) (dirname f1)) (_ ""))) (let ((sh (string-append (assoc-ref inputs "bash") "/bin/sh"))) (define emacs-prefix? (cut string-prefix? "emacs-" <>)) (setenv "SHELL" "sh") (setenv "EMACSLOADPATH" (string-concatenate (map (match-lambda (((? emacs-prefix? name) . dir) (string-append (el-dir dir) ":")) (_ "")) inputs))) (substitute* (find-files "." "\\.el") (("/bin/sh") sh)) (substitute* "tests/haskell-code-conventions.el" ;; Function name recently changed in "emacs-el-search". (("el-search--search-pattern") "el-search-forward") ;; Don't contact home. (("\\(when \\(>= emacs-major-version 25\\)") "(require 'el-search) (when nil")) #t))) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (el-dir (string-append out "/share/emacs/site-lisp")) (doc (string-append out "/share/doc/haskell-mode-" ,version)) (info (string-append out "/share/info"))) (define (copy-to-dir dir files) (for-each (lambda (f) (install-file f dir)) files)) (with-directory-excursion "doc" (unless (zero? (system* "makeinfo" "haskell-mode.texi")) (error "makeinfo failed")) (install-file "haskell-mode.info" info)) (copy-to-dir doc '("CONTRIBUTING.md" "NEWS" "README.md")) (copy-to-dir el-dir (find-files "." "\\.elc?")) ;; These are part of other packages. (with-directory-excursion el-dir (for-each delete-file '("dash.el" "ert.el"))) #t)))))) (home-page "https://github.com/haskell/haskell-mode") (synopsis "Haskell mode for Emacs") (description "This is an Emacs mode for editing, debugging and developing Haskell programs.") (license license:gpl3+))) (define-public flycheck (package (name "emacs-flycheck") (version "30") (source (origin (method url-fetch) (uri (string-append "https://github.com/flycheck/flycheck/releases/download/" version "/flycheck-" version ".tar")) (sha256 (base32 "1rxzkaqsj48z3nska5wsgwafvwkam014dzqd32baycmxjl0jxvy7")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://www.flycheck.org") (synopsis "On-the-fly syntax checking") (description "This package provides on-the-fly syntax checking for GNU Emacs. It is a replacement for the older Flymake extension which is part of GNU Emacs, with many improvements and additional features. Flycheck provides fully-automatic, fail-safe, on-the-fly background syntax checking for over 30 programming and markup languages with more than 70 different tools. It highlights errors and warnings inline in the buffer, and provides an optional IDE-like error list.") (license license:gpl3+))) ;+GFDLv1.3+ for the manual ;;; ;;; Web browsing. ;;; (define-public emacs-w3m (package (name "emacs-w3m") (version "1.4.538+0.20141022") (source (origin (method url-fetch) (uri (string-append "mirror://debian/pool/main/w/w3m-el/w3m-el_" version ".orig.tar.gz")) (sha256 (base32 "0zfxmq86pwk64yv0426gnjrvhjrgrjqn08sdcdhmmjmfpmqvm79y")))) (build-system gnu-build-system) (native-inputs `(("autoconf" ,autoconf) ("emacs" ,emacs-minimal))) (inputs `(("w3m" ,w3m) ("imagemagick" ,imagemagick))) (arguments `(#:modules ((guix build gnu-build-system) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-utils)) #:configure-flags (let ((out (assoc-ref %outputs "out"))) (list (string-append "--with-lispdir=" out "/share/emacs/site-lisp") (string-append "--with-icondir=" out "/share/images/emacs-w3m") ;; Leave .el files uncompressed, otherwise GC can't ;; identify run-time dependencies. See ;; "--without-compress-install")) #:tests? #f ; no check target #:phases (modify-phases %standard-phases (add-after 'unpack 'autoconf (lambda _ (zero? (system* "autoconf")))) (add-before 'build 'patch-exec-paths (lambda* (#:key inputs outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out")) (w3m (assoc-ref inputs "w3m")) (imagemagick (assoc-ref inputs "imagemagick")) (coreutils (assoc-ref inputs "coreutils"))) (emacs-substitute-variables "w3m.el" ("w3m-command" (string-append w3m "/bin/w3m")) ("w3m-touch-command" (string-append coreutils "/bin/touch")) ("w3m-image-viewer" (string-append imagemagick "/bin/display")) ("w3m-icon-directory" (string-append out "/share/images/emacs-w3m"))) (emacs-substitute-variables "w3m-image.el" ("w3m-imagick-convert-program" (string-append imagemagick "/bin/convert")) ("w3m-imagick-identify-program" (string-append imagemagick "/bin/identify"))) #t))) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (and (zero? (system* "make" "install" "install-icons")) (with-directory-excursion (string-append (assoc-ref outputs "out") "/share/emacs/site-lisp") (for-each delete-file '("ChangeLog" "ChangeLog.1")) (symlink "w3m-load.el" "w3m-autoloads.el") #t))))))) (home-page "http://emacs-w3m.namazu.org/") (synopsis "Simple Web browser for Emacs based on w3m") (description "Emacs-w3m is an emacs interface for the w3m web browser.") (license license:gpl2+))) (define-public emacs-wget (package (name "emacs-wget") (version "0.5.0") (source (origin (method url-fetch) (uri (string-append "mirror://debian/pool/main/w/wget-el/wget-el_" version ".orig.tar.gz")) (sha256 (base32 "10byvyv9dk0ib55gfqm7bcpxmx2qbih1jd03gmihrppr2mn52nff")))) (build-system gnu-build-system) (inputs `(("wget" ,wget))) (native-inputs `(("emacs" ,emacs-minimal))) (arguments `(#:modules ((guix build gnu-build-system) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-utils)) #:tests? #f ; no check target #:phases (alist-replace 'configure (lambda* (#:key outputs #:allow-other-keys) (substitute* "Makefile" (("/usr/local") (assoc-ref outputs "out")) (("/site-lisp/emacs-wget") "/site-lisp"))) (alist-cons-before 'build 'patch-exec-paths (lambda* (#:key inputs outputs #:allow-other-keys) (let ((wget (assoc-ref inputs "wget"))) (emacs-substitute-variables "wget.el" ("wget-command" (string-append wget "/bin/wget"))))) (alist-cons-after 'install 'post-install (lambda* (#:key outputs #:allow-other-keys) (emacs-generate-autoloads "wget" (string-append (assoc-ref outputs "out") "/share/emacs/site-lisp/"))) %standard-phases))))) (home-page "http://www.emacswiki.org/emacs/EmacsWget") (synopsis "Simple file downloader for Emacs based on wget") (description "Emacs-wget is an emacs interface for the wget file downloader.") (license license:gpl2+))) ;;; ;;; Multimedia. ;;; (define-public emms (package (name "emacs-emms") (version "4.3") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/emms/emms-" version ".tar.gz")) (sha256 (base32 "0dicgkl8l83n4cah5vk7c242abbwpyzlih451blgw37f3rijs480")) (modules '((guix build utils))) (snippet '(substitute* "Makefile" (("/usr/bin/install-info") ;; No need to use 'install-info' since it would create a ;; useless 'dir' file. "true") (("^INFODIR=.*") ;; Install Info files to $out/share/info, not $out/info. "INFODIR := $(PREFIX)/share/info\n") (("/site-lisp/emms") ;; Install directly in share/emacs/site-lisp, not in a ;; sub-directory. "/site-lisp") (("^all: (.*)\n" _ rest) ;; Build 'emms-print-metadata'. (string-append "all: " rest " emms-print-metadata\n")))))) (build-system gnu-build-system) (arguments `(#:modules ((guix build gnu-build-system) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-utils)) #:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key inputs outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out")) (vorbis (assoc-ref inputs "vorbis-tools")) (alsa (assoc-ref inputs "alsa-utils")) (mpg321 (assoc-ref inputs "mpg321")) (mp3info (assoc-ref inputs "mp3info"))) ;; Specify the installation directory. (substitute* "Makefile" (("PREFIX=.*$") (string-append "PREFIX := " out "\n"))) (setenv "SHELL" (which "sh")) (setenv "CC" "gcc") ;; Specify the absolute file names of the various ;; programs so that everything works out-of-the-box. (with-directory-excursion "lisp" (emacs-substitute-variables "emms-player-mpg321-remote.el" ("emms-player-mpg321-remote-command" (string-append mpg321 "/bin/mpg321"))) (substitute* "emms-player-simple.el" (("\"ogg123\"") (string-append "\"" vorbis "/bin/ogg123\""))) (emacs-substitute-variables "emms-info-ogginfo.el" ("emms-info-ogginfo-program-name" (string-append vorbis "/bin/ogginfo"))) (emacs-substitute-variables "emms-info-libtag.el" ("emms-info-libtag-program-name" (string-append out "/bin/emms-print-metadata"))) (emacs-substitute-variables "emms-info-mp3info.el" ("emms-info-mp3info-program-name" (string-append mp3info "/bin/mp3info"))) (substitute* "emms-volume-amixer.el" (("\"amixer\"") (string-append "\"" alsa "/bin/amixer\""))) (substitute* "emms-tag-editor.el" (("\"mp3info\"") (string-append "\"" mp3info "/bin/mp3info\""))))))) (add-before 'install 'pre-install (lambda* (#:key outputs #:allow-other-keys) ;; The 'install' rule expects the target directories to exist. (let* ((out (assoc-ref outputs "out")) (bin (string-append out "/bin")) (man1 (string-append out "/share/man/man1"))) (mkdir-p bin) (mkdir-p man1) #t))) (add-after 'install 'post-install (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (symlink "emms-auto.el" (string-append out "/share/emacs/site-lisp/" "emms-autoloads.el")))))) #:tests? #f)) (native-inputs `(("emacs" ,emacs-minimal) ;for (guix build emacs-utils) ("texinfo" ,texinfo))) (inputs `(("alsa-utils" ,alsa-utils) ("vorbis-tools" ,vorbis-tools) ("mpg321" ,mpg321) ("taglib" ,taglib) ("mp3info" ,mp3info))) (properties '((upstream-name . "emms"))) (synopsis "Emacs Multimedia System") (description "EMMS is the Emacs Multimedia System. It is a small front-end which can control one of the supported external players. Thus, it supports whatever formats are supported by your music player. It also supports tagging and playlist management, all behind a clean and light user interface.") (home-page "https://www.gnu.org/software/emms/") (license license:gpl3+))) (define-public emacs-emms-player-mpv (package (name "emacs-emms-player-mpv") (version "0.0.10") (source (origin (method url-fetch) (uri (string-append "https://github.com/dochang/emms-player-mpv/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1q81fpmwr8hpdgq71vbdai2nml4yyqbmk4ffdyl4irlwph8gfjyq")))) (build-system emacs-build-system) (propagated-inputs `(("emms" ,emms))) (home-page "https://github.com/dochang/emms-player-mpv/") (synopsis "Mpv support for EMMS") (description "This package provides an EMMS player that uses mpv. It supports pause and seeking.") (license license:gpl3+))) (define-public emacs-emms-mode-line-cycle (package (name "emacs-emms-mode-line-cycle") (version "0.2.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/momomo5717/emms-mode-line-cycle" "/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0ifszi930pnaxk1x8pcydmvnp06868gc7nfx14q17zbajbx735k6")))) (build-system emacs-build-system) (propagated-inputs `(("emms" ,emms))) (home-page "https://github.com/momomo5717/emms-mode-line-cycle") (synopsis "Display the EMMS mode line as a ticker") (description "This is a minor mode for updating the EMMS mode-line string cyclically within a specified width. It is useful for displaying long track titles.") (license license:gpl3+))) ;;; ;;; Miscellaneous. ;;; (define-public bbdb (package (name "bbdb") (version "3.1.2") (source (origin (method url-fetch) (uri (string-append "mirror://savannah/bbdb/bbdb-" version ".tar.gz")) (sha256 (base32 "1gs16bbpiiy01w9pyg12868r57kx1v3hnw04gmqsmpc40l1hyy05")) (modules '((guix build utils))) (snippet ;; We don't want to build and install the PDF. '(substitute* "doc/Makefile.in" (("^doc_DATA = .*$") "doc_DATA =\n"))))) (build-system gnu-build-system) (arguments '(#:phases (alist-cons-after 'install 'post-install (lambda* (#:key outputs #:allow-other-keys) ;; Add an autoloads file with the right name for guix.el. (let* ((out (assoc-ref outputs "out")) (site (string-append out "/share/emacs/site-lisp"))) (with-directory-excursion site (symlink "bbdb-loaddefs.el" "bbdb-autoloads.el")))) %standard-phases))) (native-inputs `(("emacs" ,emacs-minimal))) (home-page "http://savannah.nongnu.org/projects/bbdb/") (synopsis "Contact management utility for Emacs") (description "BBDB is the Insidious Big Brother Database for GNU Emacs. It provides an address book for email and snail mail addresses, phone numbers and the like. It can be linked with various Emacs mail clients (Message and Mail mode, Rmail, Gnus, MH-E, and VM). BBDB is fully customizable.") (license license:gpl3+))) (define-public emacs-aggressive-indent (package (name "emacs-aggressive-indent") (version "1.8.3") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "aggressive-indent-" version ".el")) (sha256 (base32 "0jnzccl50x0wapprgwxinp99pwwa6j43q6msn4gv437j7swy8wnj")))) (build-system emacs-build-system) (home-page "https://elpa.gnu.org/packages/aggressive-indent.html") (synopsis "Minor mode to aggressively keep your code always indented") (description "@code{aggressive-indent-mode} is a minor mode that keeps your code always indented. It reindents after every change, making it more reliable than @code{electric-indent-mode}.") (license license:gpl2+))) (define-public emacs-ag (package (name "emacs-ag") (version "0.47") (source (origin (method url-fetch) (uri (string-append "https://github.com/Wilfred/ag.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1rlmp6wnyhqfg86dbz17r914msp58favn4kd4yrdwyia265a4lar")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'make-info (lambda _ (with-directory-excursion "docs" (zero? (system* "make" "info"))))) (add-after 'install 'install-info (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (info (string-append out "/share/info"))) (install-file "docs/_build/texinfo/agel.info" info) #t)))))) (native-inputs `(("python-sphinx" ,python-sphinx) ("texinfo" ,texinfo))) (propagated-inputs `(("dash" ,emacs-dash) ("s" ,emacs-s) ;; We need to use 'ag' as the executable on remote systems. ("the-silver-searcher" ,the-silver-searcher))) (home-page "https://github.com/Wilfred/ag.el") (synopsis "Front-end for ag (the-silver-searcher) for Emacs") (description "This package provides the ability to use the silver searcher, a code searching tool, sometimes abbreviated to @code{ag}. Features include version control system awareness, use of Perl compatible regular expressions, editing the search results directly and searching file names rather than the contents of files.") (license license:gpl3+))) (define-public emacs-async (package (name "emacs-async") (version "1.9.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/async-" version ".tar")) (sha256 (base32 "17fnvrj7jww29sav6a6jpizclg4w2962m6h37akpii71gf0vrffw")))) (build-system emacs-build-system) (home-page "https://elpa.gnu.org/packages/async.html") (synopsis "Asynchronous processing in Emacs") (description "This package provides the ability to call asynchronous functions and processes. For example, it can be used to run dired commands (for copying, moving, etc.) asynchronously using @code{dired-async-mode}. Also it is used as a library for other Emacs packages.") (license license:gpl3+))) (define-public emacs-auctex (package (name "emacs-auctex") (version "11.91.0") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/auctex-" version ".tar")) (sha256 (base32 "1yh182mxgngjmwpkyv2n9km3vyq95bqfq8mnly3dbv78nwk7f2l3")))) (build-system emacs-build-system) ;; We use 'emacs' because AUCTeX requires dbus at compile time ;; ('emacs-minimal' does not provide dbus). (arguments `(#:emacs ,emacs #:include '("\\.el$" "^images/" "^latex/" "\\.info$") #:exclude '("^tests/" "^latex/README"))) (native-inputs `(("perl" ,perl))) (home-page "https://www.gnu.org/software/auctex/") (synopsis "Integrated environment for TeX") (description "AUCTeX is a comprehensive customizable integrated environment for writing input files for TeX, LaTeX, ConTeXt, Texinfo, and docTeX using Emacs or XEmacs.") (license license:gpl3+))) (define-public emacs-autothemer (package (name "emacs-autothemer") (version "0.2.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/sebastiansturm/autothemer/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0rd28r9wfrbll212am4ih9hrvypx785aff76va2cbfxdwm9kixsa")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/sebastiansturm/autothemer") (synopsis "Conveniently create Emacs themes") (description "Autothemer provides a thin layer on top of @code{deftheme} and @code{custom-theme-set-faces} that creates a new custom color theme, based on a set of simplified face specifications and a user-supplied color palette") (license license:gpl3+))) (define-public emacs-calfw (package (name "emacs-calfw") (version "1.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/kiwanami/emacs-calfw/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "17ssg8gx66yp63nhygjq2r6kgl4h45cacmrxsxs9f0lrfcx37k0l")))) (build-system emacs-build-system) (home-page "https://github.com/kiwanami/emacs-calfw/") (synopsis "Calendar framework for Emacs") (description "This package displays a calendar view with various schedule data in the Emacs buffer.") (license license:gpl3+))) (define-public emacs-direnv (package (name "emacs-direnv") (version "1.2.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/wbolster/emacs-direnv/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0m9nxawklhiiysyibzzhh2zkxgq1fskqvaqb06f7r8dnhabfy9fr")))) (build-system emacs-build-system) (propagated-inputs `(("dash" ,emacs-dash) ("with-editor" ,emacs-with-editor))) (home-page "https://github.com/wbolster/emacs-direnv") (synopsis "Direnv integration for Emacs") (description "This package provides support for invoking direnv to get the environment for the current file and updating the environment within Emacs to match. Direnv can be invoked manually, and a global minor mode is included that will update the environment when the active buffer changes. Using emacs-direnv means that programs started from Emacs will use the environment set through Direnv.") (license license:gpl3+))) (define-public emacs-google-maps (package (name "emacs-google-maps") (version "1.0.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/jd/google-maps.el/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "014bxapm4d8vjxbzrfjdpsavxyfx981mlcb10aq5rmigr6il8ybs")))) (build-system emacs-build-system) (home-page "https://github.com/jd/google-maps.el") (synopsis "Access Google Maps from Emacs") (description "The @code{google-maps} package allows to display Google Maps directly inside Emacs.") (license license:gpl3+))) (define-public emacs-mmm-mode (package (name "emacs-mmm-mode") (version "0.5.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/purcell/mmm-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "10kwslnflbjqm62wkrq420crqzdqalzfflp9pqk1i12zm6dm4mfv")))) (build-system gnu-build-system) (arguments '(#:phases (modify-phases %standard-phases (add-after 'unpack 'autogen (lambda _ (zero? (system* "sh" "autogen.sh"))))))) (native-inputs `(("autoconf" ,autoconf) ("automake" ,automake) ("emacs" ,emacs-minimal) ("texinfo" ,texinfo))) (home-page "https://github.com/purcell/mmm-mode") (synopsis "Allow multiple major modes in an Emacs buffer") (description "MMM Mode is a minor mode that allows multiple major modes to coexist in a single buffer.") (license license:gpl3+))) (define-public emacs-pdf-tools (package (name "emacs-pdf-tools") (version "0.70") (source (origin (method url-fetch) (uri (string-append "https://github.com/politza/pdf-tools/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1m0api6wiawswyk46bdsyk6r5rg3b86a4paar6nassm6x6c6vr77")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; there are no tests #:modules ((guix build gnu-build-system) ((guix build emacs-build-system) #:prefix emacs:) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-build-system) (guix build emacs-utils)) #:phases (modify-phases %standard-phases ;; Build server side using 'gnu-build-system'. (add-after 'unpack 'enter-server-dir (lambda _ (chdir "server") #t)) (add-before 'configure 'autogen (lambda _ (zero? (system* "bash" "autogen.sh")))) ;; Build emacs side using 'emacs-build-system'. (add-after 'compress-documentation 'enter-lisp-dir (lambda _ (chdir "../lisp") #t)) (add-after 'enter-lisp-dir 'emacs-patch-variables (lambda* (#:key outputs #:allow-other-keys) ;; Set path to epdfinfo program. (emacs-substitute-variables "pdf-info.el" ("pdf-info-epdfinfo-program" (string-append (assoc-ref outputs "out") "/bin/epdfinfo"))) ;; Set 'pdf-tools-handle-upgrades' to nil to avoid "auto ;; upgrading" that pdf-tools tries to perform. (emacs-substitute-variables "pdf-tools.el" ("pdf-tools-handle-upgrades" '())))) (add-after 'emacs-patch-variables 'emacs-install (assoc-ref emacs:%standard-phases 'install)) (add-after 'emacs-install 'emacs-build (assoc-ref emacs:%standard-phases 'build)) (add-after 'emacs-install 'emacs-make-autoloads (assoc-ref emacs:%standard-phases 'make-autoloads))))) (native-inputs `(("autoconf" ,autoconf) ("automake" ,automake) ("pkg-config" ,pkg-config) ("emacs" ,emacs-minimal))) (inputs `(("poppler" ,poppler) ("cairo" ,cairo) ("glib" ,glib) ("libpng" ,libpng) ("zlib" ,zlib))) (synopsis "Emacs support library for PDF files") (description "PDF Tools is, among other things, a replacement of DocView for PDF files. The key difference is that pages are not pre-rendered by e.g. ghostscript and stored in the file-system, but rather created on-demand and stored in memory.") (home-page "https://github.com/politza/pdf-tools") (license license:gpl3+))) (define-public emacs-dash (package (name "emacs-dash") (version "2.13.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/magnars/dash.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1pjlkrzr8n45bnp3xs3dybvy0nz3gwamrfc7vsi1nhpkkw99ihhb")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "./run-tests.sh"))))))) (home-page "https://github.com/magnars/dash.el") (synopsis "Modern list library for Emacs") (description "This package provides a modern list API library for Emacs.") (license license:gpl3+))) (define-public emacs-bui (package (name "emacs-bui") (version "1.1.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/alezost/bui.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "112k0mq6xpy0r47vk66miw7rxbkv3d06pv3pd0vcmrhcnhnnk486")))) (build-system emacs-build-system) (propagated-inputs `(("dash" ,emacs-dash))) (home-page "https://github.com/alezost/bui.el") (synopsis "Buffer interface library for Emacs") (description "BUI (Buffer User Interface) is a library for making @code{list} and @code{info} interfaces to display an arbitrary data of the same type, for example: packages, buffers, files, etc.") (license license:gpl3+))) (define-public emacs-guix (package (name "emacs-guix") (version "0.3.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/alezost/guix.el" "/releases/download/v" version "/emacs-guix-" version ".tar.gz")) (sha256 (base32 "0bffxlaq4w9yijl9prnfm26fisr2rd1whjg1yzvri1zl6zh9s0lk")))) (build-system gnu-build-system) (arguments `(#:configure-flags (let ((guix (assoc-ref %build-inputs "guix")) (geiser (assoc-ref %build-inputs "geiser")) (dash (assoc-ref %build-inputs "dash")) (bui (assoc-ref %build-inputs "bui")) (magit-popup (assoc-ref %build-inputs "magit-popup")) (site-lisp "/share/emacs/site-lisp")) (list (string-append "--with-guix-site-dir=" (car (find-files (string-append guix "/share/guile/site") (lambda (file stat) (string-prefix? "2." (basename file))) #:directories? #t))) (string-append "--with-guix-site-ccache-dir=" (car (find-files (string-append guix "/lib/guile") (lambda (file stat) (string-prefix? "2." (basename file))) #:directories? #t)) "/site-ccache") (string-append "--with-geiser-lispdir=" geiser site-lisp) (string-append "--with-dash-lispdir=" dash site-lisp "/guix.d/dash-" ,(package-version emacs-dash)) (string-append "--with-bui-lispdir=" bui site-lisp "/guix.d/bui-" ,(package-version emacs-bui)) (string-append "--with-popup-lispdir=" magit-popup site-lisp "/guix.d/magit-popup-" ,(package-version emacs-magit-popup)))))) (native-inputs `(("pkg-config" ,pkg-config) ("emacs" ,emacs-minimal))) (inputs `(("guile" ,guile-2.2) ("guix" ,guix))) (propagated-inputs `(("geiser" ,geiser) ("dash" ,emacs-dash) ("bui" ,emacs-bui) ("magit-popup" ,emacs-magit-popup))) (home-page "https://alezost.github.io/guix.el/") (synopsis "Emacs interface for GNU Guix") (description "Emacs-Guix provides a visual interface, tools and features for the GNU Guix package manager. Particularly, it allows you to do various package management tasks from Emacs. To begin with, run @code{M-x guix-about} or @code{M-x guix-help} command.") (license license:gpl3+))) (define-public emacs-d-mode (package (name "emacs-d-mode") (version "2.0.8") (source (origin (method url-fetch) (uri (string-append "https://github.com/Emacs-D-Mode-Maintainers/Emacs-D-Mode/" "archive/" version ".tar.gz")) (sha256 (base32 "0knpgi55jm09282aqf8pv55zillpnpzf9f4sgm6gwsmvxf17xaw0")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-undercover" ,emacs-undercover))) (home-page "https://github.com/Emacs-D-Mode-Maintainers/Emacs-D-Mode") (synopsis "Emacs major mode for editing D code") (description "This package provides an Emacs major mode for highlighting code written in the D programming language. This mode is currently known to work with Emacs 24 and 25.") (license license:gpl2+))) (define-public emacs-keyfreq (package (name "emacs-keyfreq") (version "20160516.716") (source (origin (method url-fetch) (uri (string-append "http://melpa.org/packages/keyfreq-" version ".el")) (sha256 (base32 "008hd7d06qskc3mx0bbdgpgy2pwxr8185fzlyqf9qjg49y74p6g8")))) (build-system emacs-build-system) (home-page "https://github.com/dacap/keyfreq") (synopsis "Track Emacs command frequencies") (description "@code{emacs-keyfeq} tracks and shows how many times you used a command.") (license license:gpl3+))) (define-public emacs-undo-tree (package (name "emacs-undo-tree") (version "0.6.4") (source (origin (method git-fetch) (uri (git-reference (url "http://dr-qubit.org/git/undo-tree.git") (commit "release/0.6.4"))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "0b6hnv6bq1g5np5q2yw9r9aj1cxpp14akm21br7vpb7wp01fv4b3")))) (build-system emacs-build-system) (home-page "http://www.dr-qubit.org/emacs.php") (synopsis "Treat undo history as a tree") (description "Tree-like interface to Emacs undo system, providing graphical tree presentation of all previous states of buffer that allows easily move between them.") (license license:gpl3+))) (define-public emacs-s (package (name "emacs-s") (version "1.11.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/magnars/s.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0krq5nz3llfx0vwdqn18pmq777ja0fac185w0h9qymppb1j1hvc2")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "./run-tests.sh"))))))) (home-page "https://github.com/magnars/s.el") (synopsis "Emacs string manipulation library") (description "This package provides an Emacs library for manipulating strings.") (license license:gpl3+))) (define-public emacs-symon (package (name "emacs-symon") (version "20160630") (source (origin (method url-fetch) (uri (string-append "https://github.com/zk-phi/symon/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0h4jcgdnq98wc9rj72nwyazq8498yg55jfljiij5qwbn1xf1g5zz")))) (build-system emacs-build-system) (home-page "https://github.com/zk-phi/symon") (synopsis "Tiny graphical system monitor") (description "Tiny graphical system monitor for the Emacs minibuffer when idle.") (license license:gpl2+))) (define-public emacs-sx (package (name "emacs-sx") (version "0.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/vermiculus/sx.el/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1w0xghfljqg31axcnv8gzlrd8pw25nji6idnrhflq0af9qh1dw03")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-markdown-mode" ,emacs-markdown-mode))) (home-page "https://github.com/vermiculus/sx.el/") (synopsis "Emacs StackExchange client") (description "Emacs StackExchange client. Ask and answer questions on Stack Overflow, Super User, and other StackExchange sites.") (license license:gpl3+))) (define-public emacs-f (package (name "emacs-f") (version "0.18.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/rejeep/f.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1926shh2ymdsgz05c6q181mzzz1rci99ch568j151xi865jinyg5")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-s" ,emacs-s) ("emacs-dash" ,emacs-dash))) (home-page "https://github.com/rejeep/f.el") (synopsis "Emacs API for working with files and directories") (description "This package provides an Emacs library for working with files and directories.") (license license:gpl3+))) (define-public emacs-git-gutter (package (name "emacs-git-gutter") (version "0.90") (source (origin (method url-fetch) (uri (string-append "https://github.com/syohex/" name "/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1nmhvhpq1l56mj2yq3ag23rw3x4xgnsy8szp30s26l0yjnkhc4qg")))) (build-system emacs-build-system) (home-page "https://github.com/syohex/emacs-git-gutter") (synopsis "See and manage hunks of text in a version control system") (description "This package is an Emacs minor mode for displaying and interacting with hunks of text managed in a version control system. Added modified and deleted areas can be indicated with symbols on the edge of the buffer, and commands can be used to move between and perform actions on these hunks. Git, Mercurial, Subversion and Bazaar are supported, and many parts of the display and behaviour is easily customisable.") (license license:gpl3+))) (define-public emacs-git-timemachine (package (name "emacs-git-timemachine") (version "3.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/pidu/git-timemachine/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1l4g0r69wfrnjsywv03v4bpdd53byg6zdx6mzabfxyymss3kvisa")))) (build-system emacs-build-system) (home-page "https://github.com/pidu/git-timemachine") (synopsis "Step through historic versions of Git-controlled files") (description "This package enables you to step through historic versions of files under Git version control from within Emacs.") (license license:gpl3+))) (define-public emacs-el-mock (package (name "emacs-el-mock") (version "1.25.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/rejeep/el-mock.el/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "16xw94n58xxn3zvgyj72bmzs0k5lkvswjmzs79ws9n7rzdivb38b")))) (build-system emacs-build-system) (home-page "https://github.com/rejeep/el-mock.el") (synopsis "Tiny mock and stub framework in Emacs Lisp") (description "Emacs Lisp Mock is a library for mocking and stubbing using readable syntax. Most commonly Emacs Lisp Mock is used in conjunction with Emacs Lisp Expectations, but it can be used in other contexts.") (license license:gpl3+))) (define-public emacs-espuds (package (name "emacs-espuds") (version "0.3.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/ecukes/espuds/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0xv551376pbmh735a3zjwc9z4qdx6ngj1vpq3xqjpn0a1rwjyn4k")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-s" ,emacs-s) ("emacs-dash" ,emacs-dash) ("emacs-f" ,emacs-f))) (home-page "https://github.com/ecukes/espuds") (synopsis "Common step definitions for Ecukes") (description "Espuds is a collection of the most commonly used step definitions for testing with the Ecukes framework.") (license license:gpl3+))) (define-public emacs-es-mode (package (name "emacs-es-mode") (version "4.2.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/dakrone/es-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "02as82clm553yss7jfjac888308zr1h2229cch4z1yij70j25c8y")))) (build-system emacs-build-system) (propagated-inputs ;; The version of org in Emacs 24.5 is not sufficient, and causes tables ;; to be rendered incorrectly `(("emacs-org" ,emacs-org))) (home-page "https://github.com/dakrone/es-mode") (synopsis "Major mode for editing Elasticsearch queries") (description "@code{es-mode} includes highlighting, completion and indentation support for Elasticsearch queries. Also supported are @code{es-mode} blocks in @code{org-mode}, for which the results of queries can be processed through @code{jq}, or in the case of aggregations, can be rendered in to a table. In addition, there is an @code{es-command-center} mode, which displays information about Elasticsearch clusters.") (license license:gpl3+))) (define-public emacs-expand-region (package (name "emacs-expand-region") (version "0.11.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/magnars/expand-region.el" "/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "08dy1f411sh9wwww53rjw80idcf3vpki6ba2arl4hl5jcw9651g0")))) (build-system emacs-build-system) (home-page "https://github.com/magnars/expand-region.el") (synopsis "Increase selected region by semantic units") (description "Expand region increases the selected region by semantic units. Just keep pressing the key until it selects what you want. There's also @code{er/contract-region} if you expand too far.") (license license:gpl3+))) (define-public emacs-fill-column-indicator (package (name "emacs-fill-column-indicator") (version "1.81") (source (origin (method url-fetch) (uri (string-append "https://github.com/alpaker/Fill-Column-Indicator" "/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1xwyqbjbbicmvhlb85vg4j5snwy1vd7rfk89ws4viws5ljkhhyg8")))) (build-system emacs-build-system) (home-page "https://www.emacswiki.org/emacs/FillColumnIndicator") (synopsis "Graphically indicate the fill column") (description "Fill-column-indicator graphically indicates the location of the fill column by drawing a thin line down the length of the editing window.") (license license:gpl3+))) (define-public emacs-inf-ruby (package (name "emacs-inf-ruby") (version "2.5.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/nonsequitur/inf-ruby/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0m7323k649ckxql1grsdnf71bjhys7l4qb8wbpphb1mr1q8i4066")))) (build-system emacs-build-system) (home-page "https://github.com/nonsequitur/inf-ruby") (synopsis "Provides a REPL buffer connected to a Ruby subprocess in Emacs") (description "@code{inf-ruby} provides a Read Eval Print Loop (REPL) buffer, allowing for easy interaction with a ruby subprocess. Features include support for detecting specific uses of Ruby, e.g. when using rails, and using a appropriate console.") (license license:gpl3+))) (define-public emacs-znc (package (name "emacs-znc") (version "0.0.2") (source (origin (method url-fetch) (uri (string-append "https://marmalade-repo.org/packages/znc-" version ".el")) (sha256 (base32 "1d8lqvybgyazin5z0g1c4l3rg1vzrrvf0saqs53jr1zcdg0lianh")))) (build-system emacs-build-system) (home-page "https://github.com/sshirokov/ZNC.el") (synopsis "Make ERC and ZNC get along better") (description "This is a thin wrapper around @code{erc} that enables one to use the ZNC IRC bouncer with ERC.") (license license:expat))) (define-public emacs-shut-up (package (name "emacs-shut-up") (version "0.3.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/cask/shut-up/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "09kzrjdkb569iviyg7ydwq44yh84m3f9hkl7jizfrlk0w4gz67d1")))) (build-system emacs-build-system) (home-page "https://github.com/cask/shut-up") (synopsis "Silence Emacs") (description "This package silences most output of Emacs when running an Emacs shell script.") (license license:expat))) (define-public emacs-undercover (package (name "emacs-undercover") (version "0.6.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/sviridov/undercover.el/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0f48fi0xnbsqs382rgh85m9mq1wdnr0yib7as9xhwzvq0hsr5m0a")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-shut-up" ,emacs-shut-up))) (home-page "https://github.com/sviridov/undercover.el") (synopsis "Test coverage library for Emacs Lisp") (description "Undercover is a test coverage library for software written in Emacs Lisp.") (license license:expat))) (define-public emacs-paren-face (package (name "emacs-paren-face") (version "1.0.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/tarsius/paren-face/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0y4qrhxa9332vsvr999jg7qj1ymnfgwpf591yi4a4jgg90pm7qnn")))) (build-system emacs-build-system) (home-page "https://github.com/tarsius/paren-face") (synopsis "Face for parentheses in lisp modes") (description "This library defines a face named @code{parenthesis} used just for parentheses. The intended purpose of this face is to make parentheses less visible in Lisp code by dimming them. Lispers probably don't need to be constantly made aware of the existence of the parentheses. Dimming them might be even more useful for people new to lisp who have not yet learned to subconsciously blend out the parentheses.") (license license:gpl3+))) (define-public emacs-page-break-lines (package (name "emacs-page-break-lines") (version "0.11") (source (origin (method url-fetch) (uri (string-append "https://github.com/purcell/page-break-lines/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1zzhziq5kbrm9rxk30kx2glz455fp1blqxg8cpcf6l8xl3w8z4pg")))) (build-system emacs-build-system) (home-page "https://github.com/purcell/page-break-lines") (synopsis "Display page breaks as tidy horizontal lines") (description "This library provides a global mode which displays form feed characters as horizontal rules.") (license license:gpl3+))) (define-public emacs-simple-httpd (package (name "emacs-simple-httpd") (version "1.4.6") (source (origin (method url-fetch) (uri (string-append "https://github.com/skeeto/emacs-web-server/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "01r7h3imnj4qx1m53a2wjafvbylcyz5f9r2rg2cs7ky3chlg220r")))) (build-system emacs-build-system) (home-page "https://github.com/skeeto/emacs-http-server") (synopsis "HTTP server in pure Emacs Lisp") (description "This package provides a simple HTTP server written in Emacs Lisp to serve files and directory listings.") (license license:unlicense))) (define-public emacs-skewer-mode (package (name "emacs-skewer-mode") (version "1.6.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/skeeto/skewer-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "07jpz374j0j964szy3zznrkyja2kpdl3xa87wh7349mzxivqxdx0")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-simple-httpd" ,emacs-simple-httpd) ("emacs-js2-mode" ,emacs-js2-mode))) (home-page "https://github.com/skeeto/skewer-mode") (synopsis "Live web development in Emacs") (description "Skewer-mode provides live interaction with JavaScript, CSS, and HTML in a web browser. Expressions are sent on-the-fly from an editing buffer to be evaluated in the browser, just like Emacs does with an inferior Lisp process in Lisp modes.") (license license:unlicense))) (define-public emacs-stripe-buffer (package (name "emacs-stripe-buffer") (version "0.2.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/sabof/stripe-buffer/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1p515dq7raly5hw94kiwm3vzsfih0d8af622q4ipvvljsm98aiik")))) (build-system emacs-build-system) (home-page "https://github.com/sabof/stripe-buffer/") (synopsis "Add stripes to list buffers") (description "This Emacs package adds faces to add stripes to list buffers and org tables.") (license license:gpl2+))) (define-public emacs-rich-minority (package (name "emacs-rich-minority") (version "1.0.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/Malabarba/rich-minority/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1l0cb0q7kyi88nwfqd542psnkgwnjklpzc5rx32gzd3lkwkrbr8v")))) (build-system emacs-build-system) (home-page "https://github.com/Malabarba/rich-minority") (synopsis "Clean-up and beautify the list of minor modes") (description "This Emacs package hides and/or highlights minor modes in the mode-line.") (license license:gpl2+))) (define-public emacs-smart-mode-line (package (name "emacs-smart-mode-line") (version "2.10.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/Malabarba/smart-mode-line/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0i9wajabrrsjzwd842q0m2611kf0q31p9hg1pdj81177gynkw8l8")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-rich-minority" ,emacs-rich-minority))) (home-page "https://github.com/Malabarba/smart-mode-line") (synopsis "Color-coded smart mode-line") (description "Smart Mode Line is a mode-line theme for Emacs. It aims to be easy to read from small to large monitors by using colors, a prefix feature, and smart truncation.") (license license:gpl2+))) (define-public emacs-shell-switcher (package (name "emacs-shell-switcher") (version "1.0.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/DamienCassou/shell-switcher" "/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1c23mfkdqz2g9rixd9smm323vzlvhzz3ng34ambcqjfq309qb2nz")))) (build-system emacs-build-system) (home-page "https://github.com/DamienCassou/shell-switcher") (synopsis "Provide fast switching between shell buffers") (description "This package provides commands to quickly switch between shell buffers.") (license license:gpl3+))) (define-public emacs-ob-ipython (package (name "emacs-ob-ipython") (version "20150704.8807064693") (source (origin (method git-fetch) (uri (git-reference (commit "880706469338ab59b5bb7dbe8460016f89755364") (url "https://github.com/gregsexton/ob-ipython.git"))) (sha256 (base32 "1scf25snbds9ymagpny30ijbsg479r3nm0ih01dy4m9d0g7qryb7")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-f" ,emacs-f))) (home-page "http://www.gregsexton.org") (synopsis "Org-Babel functions for IPython evaluation") (description "This package adds support to Org-Babel for evaluating Python source code using IPython.") (license license:gpl3+))) (define-public emacs-debbugs (package (name "emacs-debbugs") (version "0.14") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/debbugs-" version ".tar")) (sha256 (base32 "07wgcvg038l88gxvjr0gjpjhyk743w22x1rqghz3gkmif0g70say")))) (build-system emacs-build-system) (arguments '(#:include '("\\.el$" "\\.wsdl$" "\\.info$"))) (propagated-inputs `(("emacs-async" ,emacs-async))) (home-page "https://elpa.gnu.org/packages/debbugs.html") (synopsis "Access the Debbugs bug tracker in Emacs") (description "This package lets you access the @uref{http://bugs.gnu.org,GNU Bug Tracker} from within Emacs. For instance, it defines the command @code{M-x debbugs-gnu} for listing bugs, and the command @code{M-x debbugs-gnu-search} for bug searching. If you prefer the listing of bugs as TODO items of @code{org-mode}, you could use @code{M-x debbugs-org} and related commands. A minor mode @code{debbugs-browse-mode} let you browse URLs to the GNU Bug Tracker as well as bug identifiers prepared for @code{bug-reference-mode}.") (license license:gpl3+))) (define-public emacs-deferred (package (name "emacs-deferred") (version "0.3.2") (home-page "https://github.com/kiwanami/emacs-deferred") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit (string-append "v" version)))) (sha256 (base32 "0059jy01ni5irpgrj9fa81ayd9j25nvmjjm79ms3210ysx4pgqdr")) (file-name (string-append name "-" version)))) (build-system emacs-build-system) ;; FIXME: Would need 'el-expectations' to actually run tests. (synopsis "Simple asynchronous functions for Emacs Lisp") (description "The @code{deferred.el} library provides support for asynchronous tasks. The API is almost the same as that of @uref{https://github.com/cho45/jsdeferred, JSDeferred}, a JavaScript library for asynchronous tasks.") (license license:gpl3+))) (define-public butler (package (name "emacs-butler") (version "0.2.4") (home-page "https://github.com/AshtonKem/Butler") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit version))) (sha256 (base32 "1pii9dw4skq7nr4na6qxqasl36av8cwjp71bf1fgppqpcd9z8skj")) (file-name (string-append name "-" version)))) (build-system emacs-build-system) (propagated-inputs `(("emacs-deferred" ,emacs-deferred))) (synopsis "Emacs client for Jenkins") (description "Butler provides an interface to connect to Jenkins continuous integration servers. Users can specify a list of server in the @code{butler-server-list} variable and then use @code{M-x butler-status} to view the build status of those servers' build jobs, and possibly to trigger build jobs.") (license license:gpl3+))) (define-public emacs-company (package (name "emacs-company") (version "0.9.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/company-mode/company-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1fyrpchpdmvszssy1qmsw41aqpv6q5rybvs1bw00nv9xdhiaq4vh")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ ;; The company-files-candidates-normal-root test looks ;; for the /bin directory, but the build environment has ;; no /bin directory. Modify the test to look for the ;; /tmp directory. (substitute* "test/files-tests.el" (("/bin/") "/tmp/")) (zero? (system* "make" "test-batch"))))))) (home-page "http://company-mode.github.io/") (synopsis "Modular text completion framework") (description "Company is a modular completion mechanism. Modules for retrieving completion candidates are called back-ends, modules for displaying them are front-ends. Company comes with many back-ends, e.g. @code{company-elisp}. These are distributed in separate files and can be used individually.") (license license:gpl3+))) (define-public emacs-multiple-cursors (package (name "emacs-multiple-cursors") (version "1.4.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/magnars/multiple-cursors.el/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0hihihlvcvzayg5fnqzcg45fhvlmq6xlq58syy00rjwbry9w389k")))) (build-system emacs-build-system) (home-page "https://github.com/magnars/multiple-cursors.el") (synopsis "Multiple cursors for Emacs") (description "This package adds support to Emacs for editing text with multiple simultaneous cursors.") (license license:gpl3+))) (define-public typo (package (name "emacs-typo") (version "1.1") (home-page "https://github.com/jorgenschaefer/typoel") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit (string-append "v" version)))) (sha256 (base32 "1jhd4grch5iz12gyxwfbsgh4dmz5hj4bg4gnvphccg8dsnni05k2")) (file-name (string-append name "-" version)))) (build-system emacs-build-system) (synopsis "Minor mode for typographic editing") (description "This package provides two Emacs modes, @code{typo-mode} and @code{typo-global-mode}. These modes automatically insert Unicode characters for quotation marks, dashes, and ellipses. For example, typing @kbd{\"} automatically inserts a Unicode opening or closing quotation mark, depending on context.") (license license:gpl3+))) (define-public emacs-scheme-complete (let ((commit "9b5cf224bf2a5994bc6d5b152ff487517f1a9bb5")) (package (name "emacs-scheme-complete") (version (string-append "20151223." (string-take commit 8))) (source (origin (file-name (string-append name "-" version)) (method git-fetch) (uri (git-reference (url "https://github.com/ashinn/scheme-complete.git") (commit commit))) (sha256 (base32 "141wn9l0m33w0g3dqmx8nxbfdny1r5xbr6ak61rsz21bk0qafs7x")) (patches (search-patches "emacs-scheme-complete-scheme-r5rs-info.patch")))) (build-system emacs-build-system) (home-page "https://github.com/ashinn/scheme-complete") (synopsis "Smart tab completion for Scheme in Emacs") (description "This file provides a single function, @code{scheme-smart-complete}, which you can use for intelligent, context-sensitive completion for any Scheme 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-mit-scheme-doc (package (name "emacs-mit-scheme-doc") (version "20140203") (source (origin (modules '((guix build utils))) (snippet ;; keep only file of interest '(begin (for-each delete-file '("dot-emacs.el" "Makefile")) (install-file "6.945-config/mit-scheme-doc.el" ".") (delete-file-recursively "6.945-config"))) (file-name (string-append name "-" version ".tar.bz2")) (method url-fetch) (uri (string-append "http://groups.csail.mit.edu/mac/users/gjs/" "6.945/dont-panic/emacs-basic-config.tar.bz2")) (sha256 (base32 "0dqidg2bd66pawqfarvwca93w5gqf9mikn1k2a2rmd9ymfjpziq1")))) (build-system emacs-build-system) (inputs `(("mit-scheme" ,mit-scheme))) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'configure-doc (lambda* (#:key inputs #:allow-other-keys) (let* ((mit-scheme-dir (assoc-ref inputs "mit-scheme")) (doc-dir (string-append mit-scheme-dir "/share/doc/" "mit-scheme-" ,(package-version mit-scheme)))) (substitute* "mit-scheme-doc.el" (("http://www\\.gnu\\.org/software/mit-scheme/documentation/mit-scheme-ref/") (string-append "file:" doc-dir "/mit-scheme-ref/"))))))))) (home-page "http://groups.csail.mit.edu/mac/users/gjs/6.945/dont-panic/") (synopsis "MIT-Scheme documentation lookup for Emacs") (description "This package provides a set of Emacs functions to search definitions of identifiers in the MIT-Scheme documentation.") (license license:gpl2+))) (define-public emacs-constants (package (name "emacs-constants") (version "2.6") (home-page "https://staff.fnwi.uva.nl/c.dominik/Tools/constants") (source (origin (file-name (string-append name "-" version ".tar.gz")) (method url-fetch) (uri (string-append "https://github.com/fedeinthemix/emacs-constants" "/archive/v" version ".tar.gz")) (sha256 (base32 "0pnrpmmxq8mh5h2hbrp5vcym0j0fh6dv3s7c5ccn18wllhzg9g7n")))) (build-system emacs-build-system) (synopsis "Enter definition of constants into an Emacs buffer") (description "This package provides functions for inserting the definition of natural constants and units into an Emacs buffer.") (license license:gpl2+))) (define-public emacs-tagedit (package (name "emacs-tagedit") (version "1.4.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/magnars/tagedit/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1apfnann4qklfdsmdi7icjsj18x7gwx8d83iqr4z25clszz95xfq")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-s" ,emacs-s) ("emacs-dash" ,emacs-dash))) (home-page "https://github.com/magnars/tagedit") (synopsis "Some paredit-like features for html-mode") (description "This package provides a collection of paredit-like functions for editing in @code{html-mode}.") (license license:gpl3+))) (define-public emacs-slime (package (name "emacs-slime") (version "2.19") (source (origin (file-name (string-append name "-" version ".tar.gz")) (method url-fetch) (uri (string-append "https://github.com/slime/slime/archive/v" version ".tar.gz")) (sha256 (base32 "1jhaq5cn89k45nzyl0jd12gmjxnh1bq9jlfwrxba342agxsscb0p")))) (build-system emacs-build-system) (native-inputs `(("texinfo" ,texinfo))) (arguments `(#:include '("\\.el$" "\\.lisp$" "\\.asd$" "contrib") #:exclude '("^slime-tests.el" "^contrib/test/" "^contrib/Makefile$" "^contrib/README.md$") #:phases (modify-phases %standard-phases (add-before 'install 'configure (lambda* _ (emacs-substitute-variables "slime.el" ("inferior-lisp-program" "sbcl")) #t)) (add-before 'install 'install-doc (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (info-dir (string-append out "/share/info")) (doc-dir (string-append out "/share/doc/" ,name "-" ,version)) (doc-files '("doc/slime-refcard.pdf" "README.md" "NEWS" "PROBLEMS" "CONTRIBUTING.md"))) (with-directory-excursion "doc" (substitute* "Makefile" (("infodir=/usr/local/info") (string-append "infodir=" info-dir))) (system* "make" "html/index.html") (system* "make" "slime.info") (install-file "slime.info" info-dir) (copy-recursively "html" (string-append doc-dir "/html"))) (for-each (lambda (f) (install-file f doc-dir) (delete-file f)) doc-files) (delete-file-recursively "doc") #t)))))) (home-page "https://github.com/slime/slime") (synopsis "Superior Lisp Interaction Mode for Emacs") (description "SLIME extends Emacs with support for interactive programming in Common Lisp. The features are centered around @{slime-mode}, an Emacs minor mode that complements the standard @{lisp-mode}. While lisp-mode supports editing Lisp source files, @{slime-mode} adds support for interacting with a running Common Lisp process for compilation, debugging, documentation lookup, and so on.") (license license:gpl2+))) (define-public emacs-popup (package (name "emacs-popup") (version "0.5.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/auto-complete/popup-el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1yrgfj8y69xmcb6kwgplhq68ndm9410qwh7sd2knnd1gchpphdc0")))) (build-system emacs-build-system) (home-page "https://github.com/auto-complete/popup-el") (synopsis "Visual Popup User Interface for Emacs") (description "Popup.el is a visual popup user interface library for Emacs. This provides a basic API and common UI widgets such as popup tooltips and popup menus.") (license license:gpl3+))) (define-public emacs-god-mode (let ((commit "6cf0807b6555eb6fcf8387a4e3b667071ef38964") (revision "1")) (package (name "emacs-god-mode") (version (string-append "20151005.925." revision "-" (string-take commit 9))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/chrisdone/god-mode.git") (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "1am415k4xxcva6y3vbvyvknzc6bma49pq3p85zmpjsdmsp18qdix")))) (build-system emacs-build-system) (home-page "https://github.com/chrisdone/god-mode") (synopsis "Minor mode for entering commands without modifier keys") (description "This package provides a global minor mode for entering Emacs commands without modifier keys. It's similar to Vim's separation of commands and insertion mode. When enabled all keys are implicitly prefixed with @samp{C-} (among other helpful shortcuts).") (license license:gpl3+)))) (define-public emacs-rfcview (package (name "emacs-rfcview") (version "0.13") (home-page "http://www.loveshack.ukfsn.org/emacs") (source (origin (method url-fetch) (uri "http://www.loveshack.ukfsn.org/emacs/rfcview.el") (sha256 (base32 "0ympj5rxig383zl2jf0pzdsa80nnq0dpvjiriq0ivfi98fj7kxbz")))) (build-system emacs-build-system) (synopsis "Prettify Request for Comments (RFC) documents") (description "The Internet Engineering Task Force (IETF) and the Internet Society (ISOC) publish various Internet-related protocols and specifications as \"Request for Comments\" (RFC) documents and Internet Standard (STD) documents. RFCs and STDs are published in a simple text form. This package provides an Emacs major mode, rfcview-mode, which makes it more pleasant to read these documents in Emacs. It prettifies the text and adds hyperlinks/menus for easier navigation. It also provides functions for browsing the index of RFC documents and fetching them from remote servers or local directories.") (license license:gpl3+))) (define-public emacs-ffap-rfc-space (package (name "emacs-ffap-rfc-space") (version "12") (home-page "http://user42.tuxfamily.org/ffap-rfc-space/index.html") (source (origin (method url-fetch) (uri "http://download.tuxfamily.org/user42/ffap-rfc-space.el") (sha256 (base32 "1iv61dv57a73mdps7rn6zmgz7nqh14v0ninidyrasy45b1nv6gck")))) (build-system emacs-build-system) (synopsis "Make ffap recognize an RFC with a space before its number") (description "The Internet Engineering Task Force (IETF) and the Internet Society (ISOC) publish various Internet-related protocols and specifications as \"Request for Comments\" (RFC) documents. The built-in Emacs module \"ffap\" (Find File at Point) has the ability to recognize names at point which look like \"RFC1234\" and \"RFC-1234\" and load the appropriate RFC from a remote server. However, it fails to recognize a name like \"RFC 1234\". This package enhances ffap so that it correctly finds RFCs even when a space appears before the number.") (license license:gpl3+))) (define-public emacs-org-bullets (package (name "emacs-org-bullets") (version "0.2.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/sabof/org-bullets/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1dyxvpb73vj80v8br2q9rf255hfphrgaw91fbvwdcd735np9pcnh")))) (build-system emacs-build-system) (home-page "https://github.com/sabof/org-bullets") (synopsis "Show bullets in org-mode as UTF-8 characters") (description "This package provides an Emacs minor mode causing bullets in @code{org-mode} to be rendered as UTF-8 characters.") (license license:gpl3+))) (define-public emacs-org-pomodoro (package (name "emacs-org-pomodoro") (version "2.1.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/lolownia/org-pomodoro/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1jalsggw3q5kvj353f84x4nl04a5vmq07h75ggppy1627lb31zm4")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-alert" ,emacs-alert))) (home-page "https://github.com/lolownia/org-pomodoro") (synopsis "Pomodoro technique for org-mode") (description "@code{emacs-org-pomodoro} adds very basic support for Pomodoro technique in Emacs org-mode. Run @code{M-x org-pomodoro} for the task at point or select one of the last tasks that you clocked time for. Each clocked-in pomodoro starts a timer of 25 minutes and after each pomodoro a break timer of 5 minutes is started automatically. Every 4 breaks a long break is started with 20 minutes. All values are customizable.") (license license:gpl3+))) (define-public emacs-org-trello (package (name "emacs-org-trello") (version "0.7.9") (source (origin (method url-fetch) (uri (string-append "https://github.com/org-trello/org-trello/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "074dka8g673bj1ck5vavbjaij5jyniygdlw51mdds005wd2br9wf")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-deferred" ,emacs-deferred) ("emacs-request" ,emacs-request) ("emacs-dash" ,emacs-dash) ("emacs-s" ,emacs-s))) (home-page "https://org-trello.github.io") (synopsis "Emacs minor mode for interacting with Trello") (description "This package provides an Emacs minor mode to extend @code{org-mode} with Trello abilities. Trello is an online project organizer.") (license license:gpl3+))) (define-public emacs-zenburn-theme (package (name "emacs-zenburn-theme") (version "2.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/bbatsov/zenburn-emacs/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "03kfhzgbbbl8ivpzzky6qxw4j9mmp452m1sk7wikxmcalfnix0gn")))) (build-system emacs-build-system) (home-page "https://github.com/bbatsov/zenburn-emacs") (synopsis "Low contrast color theme for Emacs") (description "Zenburn theme is a port of the popular Vim Zenburn theme for Emacs. It is built on top of the custom theme support in Emacs 24 or later.") (license license:gpl3+))) (define-public emacs-solarized-theme (package (name "emacs-solarized-theme") (version "1.2.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/bbatsov/solarized-emacs/" "archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1ha3slc6d9wi9ilkhmwrzkvf308n6ph7b0k69pk369s9304awxzx")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/bbatsov/solarized-emacs") (synopsis "Port of the Solarized theme for Emacs") (description "Solarized for Emacs is a port of the Solarized theme for Vim. This package provides a light and a dark variant.") (license license:gpl3+))) (define-public emacs-ahungry-theme (package (name "emacs-ahungry-theme") (version "1.4.0") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/ahungry-theme-" version ".tar")) (sha256 (base32 "1n8k12mfn01f20j0pyd7ycj77x0y3a008xc94frklaaqjc0v26s4")))) (build-system emacs-build-system) (home-page "https://github.com/ahungry/color-theme-ahungry") (synopsis "Ahungry color theme for Emacs") (description "Ahungry theme for Emacs provides bright and bold colors. If you load it from a terminal, you will be able to make use of the transparent background. If you load it from a GUI, it will default to a dark background.") (license license:gpl3+))) (define-public emacs-smartparens (package (name "emacs-smartparens") (version "1.10.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/Fuco1/smartparens/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1nwsi6fbbxjq3r22r6knmx71la3g0lmwfb95i9q4k138gn0m2l3i")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/Fuco1/smartparens") (synopsis "Paredit-like insertion, wrapping and navigation with user defined pairs") (description "Smartparens is a minor mode for Emacs that deals with parens pairs and tries to be smart about it. It started as a unification effort to combine functionality of several existing packages in a single, compatible and extensible way to deal with parentheses, delimiters, tags and the like. Some of these packages include autopair, textmate, wrap-region, electric-pair-mode, paredit and others. With the basic features found in other packages it also brings many improvements as well as completely new features.") (license license:gpl3+))) (define-public emacs-highlight-symbol (package (name "emacs-highlight-symbol") (version "1.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/nschum/highlight-symbol.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1n7k1qns0fn0jsyc0hrjac5nzk21xw48yc30vyrhwvc51h0b9g90")))) (build-system emacs-build-system) (home-page "https://nschum.de/src/emacs/highlight-symbol") (synopsis "Automatic and manual symbol highlighting for Emacs") (description "Use @code{highlight-symbol} to toggle highlighting of the symbol at point throughout the current buffer. Use @code{highlight-symbol-mode} to keep the symbol at point highlighted. The functions @code{highlight-symbol-next}, @code{highlight-symbol-prev}, @code{highlight-symbol-next-in-defun} and @code{highlight-symbol-prev-in-defun} allow for cycling through the locations of any symbol at point. Use @code{highlight-symbol-nav-mode} to enable key bindings @code{M-p} and @code{M-p} for navigation. When @code{highlight-symbol-on-navigation-p} is set, highlighting is triggered regardless of @code{highlight-symbol-idle-delay}. @code{highlight-symbol-query-replace} can be used to replace the symbol. ") (license license:gpl2+))) (define-public emacs-hl-todo (package (name "emacs-hl-todo") (version "1.7.4") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/tarsius/hl-todo/" version "/hl-todo.el")) (file-name (string-append "hl-todo-" version ".el")) (sha256 (base32 "016ivl4s0ysrm1xbfi86j5xcs759fcb0mkspxw81x8mpi3yb46ya")))) (build-system emacs-build-system) (home-page "https://github.com/tarsius/hl-todo") (synopsis "Emacs mode to highlight TODO and similar keywords") (description "This package provides an Emacs mode to highlight TODO and similar keywords in comments and strings. This package also provides commands for moving to the next or previous keyword and to invoke @code{occur} with a regexp that matches all known keywords.") (license license:gpl3+))) (define-public emacs-perspective (package (name "emacs-perspective") (version "1.12") (source (origin (method url-fetch) (uri (string-append "https://github.com/nex3/perspective-el/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "078ahh0kmhdylq5ib9c81c76kz1n02xwc83pm729d00i84ibviic")))) (build-system emacs-build-system) (home-page "https://github.com/nex3/perspective-el") (synopsis "Switch between named \"perspectives\"") (description "This package provides tagged workspaces in Emacs, similar to workspaces in windows managers such as Awesome and XMonad. @code{perspective.el} provides multiple workspaces (or \"perspectives\") for each Emacs frame. Each perspective is composed of a window configuration and a set of buffers. Switching to a perspective activates its window configuration, and when in a perspective only its buffers are available by default.") ;; This package is released under the same license as Emacs (GPLv3+) or ;; the Expat license. (license license:gpl3+))) (define-public emacs-request (package (name "emacs-request") (version "0.2.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/tkf/emacs-request/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0sll9g9x15jxrdr58pdxx4iz74rnjd43q521iqm890i6hmkrgwap")))) (build-system emacs-build-system) (home-page "https://github.com/tkf/emacs-request") (synopsis "Package for speaking HTTP in Emacs Lisp") (description "This package provides a HTTP request library with multiple backends. It supports url.el which is shipped with Emacs and the curl command line program.") (license license:gpl3+))) (define-public emacs-rudel (package (name "emacs-rudel") (version "0.3.1") (source (origin (method url-fetch) (uri (string-append "http://elpa.gnu.org/packages/rudel-" version ".tar")) (sha256 (base32 "0glqa68g509p0s2vcc0i8kzlddnc9brd9jqhnm5rzxz4i050cvnz")))) (build-system emacs-build-system) (home-page "http://rudel.sourceforge.net/") (synopsis "Collaborative editing framework") (description "Rudel is a collaborative editing environment for GNU Emacs. Its purpose is to share buffers with other users in order to edit the contents of those buffers collaboratively. Rudel supports multiple backends to enable communication with other collaborative editors using different protocols, though currently Obby (for use with the Gobby editor) is the only fully-functional one.") (license license:gpl3+))) (define-public emacs-hydra (package (name "emacs-hydra") (version "0.13.6") (source (origin (method url-fetch) (uri (string-append "https://github.com/abo-abo/hydra/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0575vh858gm35p57s49dy6pc2ij46dmj9zaa4z0cp98sqra3j3l0")))) (build-system emacs-build-system) (home-page "https://github.com/abo-abo/hydra") (synopsis "Make Emacs bindings that stick around") (description "This package can be used to tie related commands into a family of short bindings with a common prefix---a Hydra. Once you summon the Hydra (through the prefixed binding), all the heads can be called in succession with only a short extension. Any binding that isn't the Hydra's head vanquishes the Hydra. Note that the final binding, besides vanquishing the Hydra, will still serve its original purpose, calling the command assigned to it. This makes the Hydra very seamless; it's like a minor mode that disables itself automatically.") (license license:gpl3+))) (define-public emacs-ivy (package (name "emacs-ivy") (version "0.9.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/abo-abo/swiper/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1abi1rvjarwfxxylpx8qlhck0kbavnj0nmlaaizk9q5zr02xfx1j")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-hydra" ,emacs-hydra))) (home-page "http://oremacs.com/swiper/") (synopsis "Incremental vertical completion for Emacs") (description "This package provides @code{ivy-read} as an alternative to @code{completing-read} and similar functions. No attempt is made to determine the best candidate. Instead, the user can navigate candidates with @code{ivy-next-line} and @code{ivy-previous-line}. The matching is done by splitting the input text by spaces and re-building it into a regular expression.") (license license:gpl3+))) (define-public emacs-avy (package (name "emacs-avy") (version "0.4.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/abo-abo/avy/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1wdrq512h25ymzjbf2kbsdymvd2ryfwzb6bh5bc3yv7q203im796")))) (build-system emacs-build-system) (home-page "https://github.com/abo-abo/avy") (synopsis "Tree-based completion for Emacs") (description "This package provides a generic completion method based on building a balanced decision tree with each candidate being a leaf. To traverse the tree from the root to a desired leaf, typically a sequence of @code{read-key} can be used. In order for @code{read-key} to make sense, the tree needs to be visualized appropriately, with a character at each branch node. So this completion method works only for things that you can see on your screen, all at once, such as the positions of characters, words, line beginnings, links, or windows.") (license license:gpl3+))) (define-public emacs-ace-window (package (name "emacs-ace-window") (version "0.9.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/abo-abo/ace-window/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1p2sgfl5dml4zbd6ldql6lm2m9vmd236ah996ni32x254s48j5pn")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-avy" ,emacs-avy))) (home-page "https://github.com/abo-abo/ace-window") (synopsis "Quickly switch windows in Emacs") (description "@code{ace-window} is meant to replace @code{other-window}. In fact, when there are only two windows present, @code{other-window} is called. If there are more, each window will have its first character highlighted. Pressing that character will switch to that window.") (license license:gpl3+))) (define-public emacs-iedit (package (name "emacs-iedit") (version "0.9.9.9") (source (origin (method url-fetch) (uri (string-append "https://github.com/victorhge/iedit/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1hv8q6pr85ss9g3158l1fqv3m62vsq8rslsi86jicr2dcxyascr0")))) (build-system emacs-build-system) (home-page "http://www.emacswiki.org/emacs/Iedit") (synopsis "Edit multiple regions in the same way simultaneously") (description "This package is an Emacs minor mode and allows you to edit one occurrence of some text in a buffer (possibly narrowed) or region, and simultaneously have other occurrences edited in the same way. You can also use Iedit mode as a quick way to temporarily show only the buffer lines that match the current text being edited. This gives you the effect of a temporary @code{keep-lines} or @code{occur}.") (license license:gpl3+))) (define-public emacs-lispy (package (name "emacs-lispy") (version "0.26.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/abo-abo/lispy/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "15gig95cvamw5zlw99cxggd27c18b9scznjj97gvjn2zbljcaqzl")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-ace-window" ,emacs-ace-window) ("emacs-iedit" ,emacs-iedit) ("emacs-ivy" ,emacs-ivy) ("emacs-hydra" ,emacs-hydra))) (home-page "https://github.com/abo-abo/lispy") (synopsis "Modal S-expression editing") (description "Due to the structure of Lisp syntax it's very rare for the programmer to want to insert characters right before \"(\" or right after \")\". Thus unprefixed printable characters can be used to call commands when the point is at one of these special locations. Lispy provides unprefixed keybindings for S-expression editing when point is at the beginning or end of an S-expression.") (license license:gpl3+))) (define-public emacs-clojure-mode (package (name "emacs-clojure-mode") (version "5.4.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/clojure-emacs/clojure-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "117mvjqh4nm8mvmwmmvy4qmkdg23ldlzk08y91g8b8ac8kxwqg81")))) (build-system emacs-build-system) (native-inputs `(("emacs-dash" ,emacs-dash) ("emacs-s" ,emacs-s) ("ert-runner" ,ert-runner))) (arguments `(#:phases (modify-phases %standard-phases (add-after 'install 'check (lambda _ (zero? (system* "ert-runner"))))))) (home-page "https://github.com/clojure-emacs/clojure-mode") (synopsis "Major mode for Clojure code") (description "This Emacs package provides font-lock, indentation, navigation and basic refactoring for the @uref{http://clojure.org, Clojure programming language}. It is recommended to use @code{clojure-mode} with paredit or smartparens.") (license license:gpl3+))) (define-public emacs-epl (package (name "emacs-epl") (version "0.8") (source (origin (method url-fetch) (uri (string-append "https://github.com/cask/epl/archive/" version ".tar.gz")) (sha256 (base32 "1511n3a3f5gvaf2b4nh018by61ciyzi3y3603fzqma7p9hrckarc")))) (build-system emacs-build-system) (home-page "https://github.com/cask/epl") (synopsis "Emacs Package Library") (description "A package management library for Emacs, based on @code{package.el}. The purpose of this library is to wrap all the quirks and hassle of @code{package.el} into a sane API.") (license license:gpl3+))) (define-public emacs-queue (package (name "emacs-queue") (version "0.1.1") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/queue-" version ".el")) (sha256 (base32 "0jw24fxqnf9qcaf2nh09cnds1kqfk7hal35dw83x1ari95say391")))) (build-system emacs-build-system) (home-page "http://www.dr-qubit.org/tags/computing-code-emacs.html") (synopsis "Queue data structure for Emacs") (description "This Emacs library provides queue data structure. These queues can be used both as a first-in last-out (FILO) and as a first-in first-out (FIFO) stack, i.e. elements can be added to the front or back of the queue, and can be removed from the front. This type of data structure is sometimes called an \"output-restricted deque\".") (license license:gpl3+))) (define-public emacs-pkg-info (package (name "emacs-pkg-info") (version "0.6") (source (origin (method url-fetch) (uri (string-append "https://github.com/lunaryorn/pkg-info.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1gy1jks5mmm02gg1c8gcyr4f8a9s5ggzhk56gv33b9mzjqzi5rd5")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-epl" ,emacs-epl))) (home-page "https://github.com/lunaryorn/pkg-info.el") (synopsis "Information about Emacs packages") (description "This library extracts information from the installed Emacs packages.") (license license:gpl3+))) (define-public emacs-spinner (package (name "emacs-spinner") (version "1.7.3") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/spinner-" version ".el")) (sha256 (base32 "19kp1mmndbmw11sgvv2ggfjl4pyf5zrsbh3871f0965pw9z8vahd")))) (build-system emacs-build-system) (home-page "https://github.com/Malabarba/spinner.el") (synopsis "Emacs mode-line spinner for operations in progress") (description "This Emacs package adds spinners and progress-bars to the mode-line for ongoing operations.") (license license:gpl3+))) (define-public emacs-sparql-mode (package (name "emacs-sparql-mode") (version "2.0.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/ljos/sparql-mode/archive/" "v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1s93mkllxnhy7fw616cnnc2danacdlarys0g3cn89drh0llh53cv")))) (build-system emacs-build-system) (home-page "https://github.com/ljos/sparql-mode") (synopsis "SPARQL mode for Emacs") (description "This package provides a major mode for Emacs that provides syntax highlighting for SPARQL. It also provides a way to execute queries against a SPARQL HTTP endpoint, such as is provided by Fuseki. It is also possible to query other endpoints like DBPedia.") (license license:gpl3+))) (define-public emacs-better-defaults (package (name "emacs-better-defaults") (version "0.1.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/technomancy/better-defaults" "/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "08fg4zslzlxbvyil5g4gwvwd22fh4zsgqprs5wh9hv1rgc6757m2")))) (build-system emacs-build-system) (home-page "https://github.com/technomancy/better-defaults") (synopsis "Better defaults for Emacs") (description "Better defaults attempts to address the most obvious deficiencies of the Emacs default configuration in uncontroversial ways that nearly everyone can agree upon.") (license license:gpl3+))) (define-public emacs-eprime (let ((commit "17a481af26496be91c07139a9bfc05cfe722506f")) (package (name "emacs-eprime") (version (string-append "20140513-" (string-take commit 7))) (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com" "/AndrewHynes/eprime-mode/" commit "/eprime-mode.el")) (file-name (string-append "eprime-" version ".el")) (sha256 (base32 "0v68lggkyq7kbcr9zyi573m2g2x251xy3jadlaw8kx02l8krwq8d")))) (build-system emacs-build-system) (home-page "https://github.com/AndrewHynes/eprime-mode") (synopsis "E-prime checking mode for Emacs") (description "This package provides an E-prime checking mode for Emacs that highlights non-conforming text. The subset of the English language called E-Prime forbids the use of the \"to be\" form to strengthen your writing.") (license license:gpl3+)))) (define-public emacs-ess (package (name "emacs-ess") (version "16.04") (source (origin (method url-fetch) (uri (string-append "http://ess.r-project.org/downloads/ess/ess-" version ".tgz")) (sha256 (base32 "0w7mbbajn377gdmvnd21mpyr368b2ia46gq6cb99y4y5rspf9pcg")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; There is no test suite. #:make-flags (list (string-append "PREFIX=" %output) (string-append "LISPDIR=" %output "/share/emacs/site-lisp/guix.d/ess")) #:phases (modify-phases %standard-phases (delete 'configure) (add-before 'build 'more-shebang-patching (lambda* (#:key inputs #:allow-other-keys) (substitute* "Makeconf" (("SHELL = /bin/sh") (string-append "SHELL = " (which "sh")))))) ;; FIXME: the texlive-union insists on regenerating fonts. It stores ;; them in HOME, so it needs to be writeable. (add-before 'build 'set-HOME (lambda _ (setenv "HOME" "/tmp") #t))))) (inputs `(("emacs" ,emacs-minimal) ("r-minimal" ,r-minimal))) (native-inputs `(("perl" ,perl) ("texinfo" ,texinfo) ("texlive" ,(texlive-union (list texlive-latex-natbib texlive-latex-seminar texlive-latex-hyperref texlive-tex-texinfo))))) (home-page "http://ess.r-project.org/") (synopsis "Emacs mode for statistical analysis programs") (description "Emacs Speaks Statistics (ESS) is an add-on package for GNU Emacs. It is designed to support editing of scripts and interaction with various statistical analysis programs such as R and OpenBUGS.") (license license:gpl2+))) (define-public emacs-smex (package (name "emacs-smex") (version "3.0") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com" "/nonsequitur/smex/" version "/smex.el")) (file-name (string-append "smex-" version ".el")) (sha256 (base32 "0ar310zx9k5y4i1vl2rawvi712xj9gx77160860jbs691p77cxqp")))) (build-system emacs-build-system) (home-page "https://github.com/nonsequitur/smex/") (synopsis "M-x interface with Ido-style fuzzy matching") (description "Smex is a M-x enhancement for Emacs. Built on top of Ido, it provides a convenient interface to your recently and most frequently used commands. And to all the other commands, too.") (license license:gpl3+))) (define-public emacs-js2-mode (package (name "emacs-js2-mode") (version "20150909") (source (origin (method url-fetch) (uri (string-append "https://github.com/mooz/js2-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1nsm36c4kwb473p13i58fgrnlk8fbn3rdhj47d9xz70az4ra44q0")))) (build-system emacs-build-system) (home-page "https://github.com/mooz/js2-mode/") (synopsis "Improved JavaScript editing mode for Emacs") (description "Js2-mode provides a JavaScript major mode for Emacs that is more advanced than the built-in javascript-mode. Features include accurate syntax highlighting using a recursive-descent parser, on-the-fly reporting of syntax errors and strict-mode warnings, smart line-wrapping within comments and strings, and code folding.") (license license:gpl3+))) (define-public emacs-markdown-mode (package (name "emacs-markdown-mode") (version "2.2") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/jrblevin" "/markdown-mode/v" version "/markdown-mode.el")) (file-name (string-append "markdown-mode-" version ".el")) (sha256 (base32 "04isd2sdnms9acpmkd6n7b7y7j0x2kank2kry0zwbxs3bwdavgav")))) (build-system emacs-build-system) (home-page "http://jblevins.org/projects/markdown-mode/") (synopsis "Emacs Major mode for Markdown files") (description "Markdown-mode is a major mode for editing Markdown-formatted text files in Emacs.") (license license:gpl3+))) (define-public emacs-projectile (package (name "emacs-projectile") (version "0.14.0") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/bbatsov" "/projectile/v" version "/projectile.el")) (file-name (string-append "projectile-" version ".el")) (sha256 (base32 "1ql1wnzhblbwnv66hf2y0wq45g71hh6s9inc090lmhm1vgylbd1f")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-pkg-info" ,emacs-pkg-info))) (home-page "https://github.com/bbatsov/projectile") (synopsis "Manage and navigate projects in Emacs easily") (description "This library provides easy project management and navigation. The concept of a project is pretty basic - just a folder containing special file. Currently git, mercurial and bazaar repos are considered projects by default. If you want to mark a folder manually as a project just create an empty .projectile file in it.") (license license:gpl3+))) (define-public emacs-elfeed (package (name "emacs-elfeed") (version "2.1.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/skeeto/elfeed/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1wlwc8fbkg6w1c8p856ikc20xm72f51clnzz419p0g8cavy27npw")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "make" "test"))))))) (home-page "https://github.com/skeeto/elfeed") (synopsis "Atom/RSS feed reader for Emacs") (description "Elfeed is an extensible web feed reader for Emacs, supporting both Atom and RSS, with a user interface inspired by notmuch.") (license license:gpl3+))) (define-public emacs-rainbow-delimiters (package (name "emacs-rainbow-delimiters") (version "2.1.3") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/Fanael" "/rainbow-delimiters/" version "/rainbow-delimiters.el")) (file-name (string-append "rainbow-delimiters-" version ".el")) (sha256 (base32 "1b3kampwsjabhcqdp0khgff13wc5jqhy3rbvaa12vnv7qy22l9ck")))) (build-system emacs-build-system) (home-page "https://github.com/Fanael/rainbow-delimiters") (synopsis "Highlight brackets according to their depth") (description "Rainbow-delimiters is a \"rainbow parentheses\"-like mode for Emacs which highlights parentheses, brackets, and braces according to their depth. Each successive level is highlighted in a different color, making it easy to spot matching delimiters, orient yourself in the code, and tell which statements are at a given level.") (license license:gpl3+))) (define-public emacs-rainbow-identifiers (package (name "emacs-rainbow-identifiers") (version "0.2.2") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/Fanael" "/rainbow-identifiers/" version "/rainbow-identifiers.el")) (file-name (string-append "rainbow-identifiers-" version ".el")) (sha256 (base32 "0325abxj47k0g1i8nqrq70w2wr6060ckhhf92krv1s072b3jzm31")))) (build-system emacs-build-system) (home-page "https://github.com/Fanael/rainbow-identifiers") (synopsis "Highlight identifiers in source code") (description "Rainbow identifiers mode is an Emacs minor mode providing highlighting of identifiers based on their names. Each identifier gets a color based on a hash of its name.") (license license:bsd-2))) (define-public emacs-rainbow-mode (package (name "emacs-rainbow-mode") (version "0.12") (source (origin (method url-fetch) (uri (string-append "http://elpa.gnu.org/packages/rainbow-mode-" version ".el")) (sha256 (base32 "10a7qs7fvw4qi4vxj9n56j26gjk61bl79dgz4md1d26slb2j1c04")))) (build-system emacs-build-system) (home-page "http://elpa.gnu.org/packages/rainbow-mode.html") (synopsis "Colorize color names in buffers") (description "This minor mode sets background color to strings that match color names, e.g. #0000ff is displayed in white with a blue background.") (license license:gpl3+))) (define-public emacs-visual-fill-column (package (name "emacs-visual-fill-column") (version "1.7") (source (origin (method url-fetch) (uri (string-append "https://codeload.github.com/joostkremers/" "visual-fill-column/tar.gz/" version)) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "12vn7kdq2mpz9hgibbn1vhpf23lcm7c26k3fkz8nidhygwl5x5lq")))) (build-system emacs-build-system) (home-page "https://github.com/joostkremers/visual-fill-column") (synopsis "Fill-column for visual-line-mode") (description "@code{visual-fill-column-mode} is a small Emacs minor mode that mimics the effect of @code{fill-column} in @code{visual-line-mode}. Instead of wrapping lines at the window edge, which is the standard behaviour of @code{visual-line-mode}, it wraps lines at @code{fill-column}. If @code{fill-column} is too large for the window, the text is wrapped at the window edge.") (license license:gpl3+))) (define-public emacs-ido-completing-read+ (package (name "emacs-ido-completing-read+") (version "3.12") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com" "/DarwinAwardWinner/ido-ubiquitous/v" version "/ido-completing-read+.el")) (file-name (string-append "ido-completing-read+-" version ".el")) (sha256 (base32 "1cyalb0p7nfsm4n6n9q6rjmvn6adqc0fq8ybnlj3n41n289dkfjf")))) (build-system emacs-build-system) (home-page "https://github.com/DarwinAwardWinner/ido-ubiquitous") (synopsis "Replacement for completing-read using ido") (description "The ido-completing-read+ function is a wrapper for ido-completing-read. Importantly, it detects edge cases that ordinary ido cannot handle and either adjusts them so ido can handle them, or else simply falls back to the standard Emacs completion function instead.") (license license:gpl3+))) (define-public emacs-ido-ubiquitous (package (name "emacs-ido-ubiquitous") (version "3.12") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com" "/DarwinAwardWinner/ido-ubiquitous/v" version "/ido-ubiquitous.el")) (file-name (string-append "ido-ubiquitous-" version ".el")) (sha256 (base32 "197ypji0fb6jsdcq40rpnknwlh3imas6s6jbsvkfm0pz9988c3q2")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-ido-completing-read+" ,emacs-ido-completing-read+))) (home-page "https://github.com/DarwinAwardWinner/ido-ubiquitous") (synopsis "Use ido (nearly) everywhere") (description "Ido-ubiquitous enables ido-style completion for almost every function that uses the standard completion function completing-read.") (license license:gpl3+))) (define-public emacs-yaml-mode (package (name "emacs-yaml-mode") (version "0.0.13") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/yoshiki" "/yaml-mode/v" version "/yaml-mode.el")) (file-name (string-append "yaml-mode-" version ".el")) (sha256 (base32 "0im88sk9dqw03x6d6zaspgvg9i0pfpgb8f2zygrmbifh2w4pwmvj")))) (build-system emacs-build-system) (home-page "https://github.com/yoshiki/yaml-mode") (synopsis "Major mode for editing YAML files") (description "Yaml-mode is an Emacs major mode for editing files in the YAML data serialization format. It was initially developed by Yoshiki Kurihara and many features were added by Marshall Vandegrift. As YAML and Python share the fact that indentation determines structure, this mode provides indentation and indentation command behavior very similar to that of python-mode.") (license license:gpl3+))) (define-public emacs-web-mode (package (name "emacs-web-mode") (version "14") (source (origin (method url-fetch) (uri (string-append "https://raw.githubusercontent.com/fxbois" "/web-mode/v" version "/web-mode.el")) (file-name (string-append "web-mode-" version ".el")) (sha256 (base32 "086hik5fmxg3kx74qmransx9cz961qd22d4m6ah2dw6cwaj1s3s5")))) (build-system emacs-build-system) (synopsis "Major mode for editing web templates") (description "Web-mode is an Emacs major mode for editing web templates aka HTML files embedding parts (CSS/JavaScript) and blocks (pre rendered by client/server side engines). Web-mode is compatible with many template engines: PHP, JSP, ASP, Django, Twig, Jinja, Mustache, ERB, FreeMarker, Velocity, Cheetah, Smarty, CTemplate, Mustache, Blade, ErlyDTL, Go Template, Dust.js, React/JSX, Angularjs, ejs, etc.") (home-page "http://web-mode.org/") (license license:gpl3+))) (define-public emacs-helm (package (name "emacs-helm") (version "2.7.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/" name "/helm/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0pay8pi3fszykgskfbxsp4byad497cgfz4m886mxnkba1naxf6h7")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-async" ,emacs-async) ("emacs-popup" ,emacs-popup))) (home-page "https://emacs-helm.github.io/helm/") (synopsis "Incremental completion and selection narrowing framework for Emacs") (description "Helm is incremental completion and selection narrowing framework for Emacs. It will help steer you in the right direction when you're looking for stuff in Emacs (like buffers, files, etc). Helm is a fork of @code{anything.el} originally written by Tamas Patrovic and can be considered to be its successor. Helm sets out to clean up the legacy code in @code{anything.el} and provide a cleaner, leaner and more modular tool, that's not tied in the trap of backward compatibility.") (license license:gpl3+))) (define-public emacs-helm-swoop (package (name "emacs-helm-swoop") (version "1.7.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/ShingoFukuyama/helm-swoop/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1z34pfi0gsk054pxr906ilaalaw0xz3s536163gf9ykkwmc2356d")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-helm" ,emacs-helm))) (home-page "https://github.com/ShingoFukuyama/helm-swoop") (synopsis "Filter and jump to lines in an Emacs buffer using Helm") (description "This package builds on the Helm interface to provide several commands for search-based navigation of buffers.") (license license:gpl2+))) (define-public emacs-helm-projectile (package (name "emacs-helm-projectile") (version "0.14.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/bbatsov/helm-projectile/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "19cfmilqh8kbab3b2hmx6lyrj73q6vfmn3p730x95g23iz16mnd5")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-helm" ,emacs-helm) ("emacs-projectile" ,emacs-projectile))) (home-page "https://github.com/bbatsov/helm-projectile") (synopsis "Helm integration for Projectile") (description "This Emacs library provides a Helm interface for Projectile.") (license license:gpl3+))) (define-public emacs-cider (package (name "emacs-cider") (version "0.12.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/clojure-emacs/cider/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "00qzbfjy3w6bcnki7gw0clmi0cc5yqjdrcyhgv4ymijjs79h9p5s")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-clojure-mode" ,emacs-clojure-mode) ("emacs-spinner" ,emacs-spinner) ("emacs-pkg-info" ,emacs-pkg-info) ("emacs-queue" ,emacs-queue))) (home-page "https://cider.readthedocs.org/") (synopsis "Clojure development environment for Emacs") (description "CIDER (Clojure Interactive Development Environment that Rocks) aims to provide an interactive development experience similar to the one you'd get when programming in Emacs Lisp, Common Lisp (with SLIME or Sly), Scheme (with Geiser) and Smalltalk. CIDER is the successor to the now deprecated combination of using SLIME + swank-clojure for Clojure development. There are plenty of differences between CIDER and SLIME, but the core ideas are pretty much the same (and SLIME served as the principle inspiration for CIDER).") (license license:gpl3+))) (define-public emacs-lua-mode (package (name "emacs-lua-mode") (version "20151025") (source (origin (method url-fetch) (uri (string-append "https://github.com/immerrr/lua-mode/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0sbhfny5ib65cnx6xcy6h9bbw27mw034s8m9cca00bhxqaqi6p4v")))) (build-system emacs-build-system) (home-page "https://github.com/immerrr/lua-mode/") (synopsis "Major mode for lua") (description "This Emacs package provides a mode for @uref{https://www.lua.org/, Lua programing language}.") (license license:gpl2+))) (define-public emacs-ebuild-mode (package (name "emacs-ebuild-mode") (version "1.30") (source (origin (method url-fetch) (uri (string-append "https://dev.gentoo.org/~ulm/emacs/ebuild-mode" "-" version ".tar.xz")) (file-name (string-append name "-" version ".tar.xz")) (sha256 (base32 "0vp7lq1kvmh1b2bms2x1kf2k76dy9m02d7cirkxpiglwaxa0h9vz")))) (build-system emacs-build-system) (home-page "https://devmanual.gentoo.org") (synopsis "Major modes for Gentoo package files") (description "This Emacs package provides modes for ebuild, eclass, eblit, GLEP42 news items, openrc and runscripts.") (license license:gpl2+))) (define-public emacs-evil (package (name "emacs-evil") (version "1.2.12") (source (origin (method url-fetch) (uri (string-append "https://bitbucket.org/lyro/evil/get/" version ".tar.bz2")) (file-name (string-append name "-" version ".tar.bz2")) (sha256 (base32 "17cda9fnbq3gmjcxs3lyq64gxswrf37y864bm53rldwsk3khq2yi")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-undo-tree" ,emacs-undo-tree) ("emacs-goto-chg" ,emacs-goto-chg))) (home-page "https://bitbucket.com/lyro/evil") (synopsis "Extensible Vi layer for Emacs") (description "Evil is an extensible vi layer for Emacs. It emulates the main features of Vim, and provides facilities for writing custom extensions.") (license license:gpl3+))) (define-public emacs-goto-chg (package (name "emacs-goto-chg") (version "1.6") (source (origin (method url-fetch) ;; There is no versioned source. (uri "https://www.emacswiki.org/emacs/download/goto-chg.el") (file-name (string-append "goto-chg-" version ".el")) (sha256 (base32 "078d6p4br5vips7b9x4v6cy0wxf6m5ij9gpqd4g33bryn22gnpij")))) (build-system emacs-build-system) ;; There is no other home page. (home-page "https://www.emacswiki.org/emacs/goto-chg.el") (synopsis "Go to the last change in the Emacs buffer") (description "This package provides @code{M-x goto-last-change} command that goes to the point of the most recent edit in the current Emacs buffer. When repeated, go to the second most recent edit, etc. Negative argument, @kbd{C-u -}, is used for reverse direction.") (license license:gpl2+))) (define-public emacs-monroe (package (name "emacs-monroe") (version "0.3.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/sanel/monroe/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0icdx8shkd951phlnmcq1vqaxp1l667q5rjscskc5r22aylakh4w")))) (build-system emacs-build-system) (home-page "https://github.com/sanel/monroe") (synopsis "Clojure nREPL client for Emacs") (description "Monroe is a nREPL client for Emacs, focused on simplicity and easy distribution, primarily targeting Clojure users") (license license:gpl3+))) (define-public emacs-writegood-mode (package (name "emacs-writegood-mode") (version "2.0.2") (home-page "https://github.com/bnbeckwith/writegood-mode") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit (string-append "v" version)))) (sha256 (base32 "1nnjn1r669hvvzfycllwap4w04m8rfsk4nzcg8057m1f263kj31b")) (file-name (string-append name "-checkout")))) (build-system emacs-build-system) (synopsis "Polish up poor writing on the fly") (description "This minor mode tries to find and highlight problems with your writing in English as you type. It primarily detects \"weasel words\" and abuse of passive voice.") (license license:gpl3+))) (define-public emacs-neotree (package (name "emacs-neotree") (version "0.2.1") (home-page "https://github.com/jaypei/emacs-neotree") (source (origin (method url-fetch) (uri (string-append "https://github.com/jaypei/" name "/archive/v" version ".tar.gz")) (sha256 (base32 "0cr37pdkwjgfijfws5bjskfh1rq9rfngxblcj6v5383vpmn83q7s")) (file-name (string-append name "-" version ".tar.gz")))) (build-system emacs-build-system) (synopsis "Folder tree view for Emacs") (description "This Emacs package provides a folder tree view.") (license license:gpl3+))) (define-public emacs-org (package (name "emacs-org") (version "20170622") (source (origin (method url-fetch) (uri (string-append "http://elpa.gnu.org/packages/org-" version ".tar")) (sha256 (base32 "0922lcbr2r7bkswljqzbm5y3ny1n67qfrmf7h7z9hsw2wy0505dp")))) (build-system emacs-build-system) (home-page "http://orgmode.org/") (synopsis "Outline-based notes management and organizer") (description "Org is an Emacs mode for keeping notes, maintaining TODO lists, and project planning with a fast and effective plain-text system. It also is an authoring system with unique support for literate programming and reproducible research.") (license license:gpl3+))) (define-public emacs-flx (package (name "emacs-flx") (version "0.6.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/lewang/" "flx/archive/v" version ".tar.gz")) (sha256 (base32 "0bkcpnf1j4i2fcc2rllwbz62l00sw2mcia6rm5amgwvlkqavmkv6")) (file-name (string-append name "-" version ".tar.gz")))) (build-system emacs-build-system) (home-page "https://github.com/lewang/flx") (synopsis "Fuzzy matching for Emacs") (description "Flx provides fuzzy matching for emacs a la sublime text. The sorting algorithm is a balance between word beginnings (abbreviation) and contiguous matches (substring). The longer the substring match, the higher it scores. This maps well to how we think about matching. Flx has support for ido (interactively do things) through flx-ido.") (license license:gpl3+))) (define-public emacs-cyberpunk-theme (package (name "emacs-cyberpunk-theme") (version "1.18") (source (origin (method url-fetch) (uri (string-append "https://github.com/n3mo/cyberpunk-theme.el/" "archive/" version ".tar.gz")) (sha256 (base32 "0pxzbw0qjxgkhhs3gn3k9qy41kl1a4pfzbw83dk24l4b3nxd24wg")) (file-name (string-append name "-" version ".tar.gz")))) (build-system emacs-build-system) (home-page "https://github.com/n3mo/cyberpunk-theme.el") (synopsis "Cyberpunk theme for emacs built-in color theme support") (description "Cyberpunk color theme for the emacs 24+ built-in color theme support known loosely as deftheme. Many mode-specific customizations are included.") (license license:gpl3+))) (define-public emacs-danneskjold-theme (let* ((commit "8733d2fe8743e8a01826ea6d4430ef376c727e57") (revision "1")) (package (name "emacs-danneskjold-theme") (version (string-append "0.0.0-" revision "." (string-take commit 7))) (home-page "https://github.com/rails-to-cosmos/danneskjold-theme") (source (origin (method git-fetch) (uri (git-reference (url home-page) (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "0s6rbsb0y8i8m5b9xm4gw1p1cxsxdqnqxqqb638pygz9f76mbir1")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'delete-screenshots (lambda _ (delete-file-recursively "screenshots") #t))))) (synopsis "High-contrast Emacs theme") (description "@code{danneskjold-theme} is a high-contrast theme for Emacs.") (license license:gpl3+)))) (define-public emacs-dream-theme (let* ((commit "107a11d74365046f28a1802a2bdb5e69e4a7488b") (revision "1")) (package (name "emacs-dream-theme") (version (string-append "0.0.0-" revision "." (string-take commit 7))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/djcb/dream-theme") (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "0za18nfkq4xqm35k6006vsixcbmvmxqgma4iw5sw37h8vmcsdylk")))) (build-system emacs-build-system) (home-page "https://github.com/djcb/dream-theme") (synopsis "High-contrast Emacs theme") (description "@code{dream-theme} is a dark, clean theme for Emacs. It is inspired by zenburn, sinburn and similar themes, but slowly diverging from them.") (license license:gpl3+)))) (define-public emacs-auto-complete (package (name "emacs-auto-complete") (version "1.5.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/auto-complete/" "auto-complete/archive/v" version ".tar.gz")) (sha256 (base32 "1jvq4lj00hwml75lpmlciazy8f3bbg13gffsfnl835p4qd8l7yqv")) (file-name (string-append name "-" version ".tar.gz")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-popup" ,emacs-popup))) (home-page "https://github.com/auto-complete/auto-complete") (synopsis "Intelligent auto-completion extension for Emacs") (description "Auto-Complete is an intelligent auto-completion extension for Emacs. It extends the standard Emacs completion interface and provides an environment that allows users to concentrate more on their own work. Its features are: a visual interface, reduce overhead of completion by using statistic method, extensibility.") (license license:gpl3+))) (define-public m17n-db (package (name "m17n-db") (version "1.7.0") (source (origin (method url-fetch) (uri (string-append "mirror://savannah/m17n/m17n-db-" version ".tar.gz")) (sha256 (base32 "1w08hnsbknrcjlzp42c99bgwc9hzsnf5m4apdv0dacql2s09zfm2")))) (build-system gnu-build-system) (inputs `(("gettext" ,gettext-minimal))) (arguments `(#:configure-flags (list (string-append "--with-charmaps=" (assoc-ref %build-inputs "libc") "/share/i18n/charmaps")))) ;; With `guix lint' the home-page URI returns a small page saying ;; that your browser does not handle frames. This triggers the "URI ;; returns suspiciously small file" warning. (home-page "http://www.nongnu.org/m17n/") (synopsis "Multilingual text processing library (database)") (description "The m17n library realizes multilingualization of many aspects of applications. The m17n library represents multilingual text as an object named M-text. M-text is a string with attributes called text properties, and designed to substitute for string in C. Text properties carry any information required to input, display and edit the text. This package contains the library database.") (license license:lgpl2.1+))) (define-public m17n-lib (package (name "m17n-lib") (version "1.7.0") (source (origin (method url-fetch) (uri (string-append "mirror://savannah/m17n/m17n-lib-" version ".tar.gz")) (sha256 (base32 "10yv730i25g1rpzv6q49m6xn4p8fjm7jdwvik2h70sn8w3hm7f4f")))) (build-system gnu-build-system) (inputs `(("fribidi" ,fribidi) ("gd" ,gd) ("libotf" ,libotf) ("libxft" ,libxft) ("libxml2" ,libxml2) ("m17n-db" ,m17n-db))) (arguments `(#:parallel-build? #f)) ;; With `guix lint' the home-page URI returns a small page saying ;; that your browser does not handle frames. This triggers the "URI ;; returns suspiciously small file" warning. (home-page "http://www.nongnu.org/m17n/") (synopsis "Multilingual text processing library (runtime)") (description "The m17n library realizes multilingualization of many aspects of applications. The m17n library represents multilingual text as an object named M-text. M-text is a string with attributes called text properties, and designed to substitute for string in C. Text properties carry any information required to input, display and edit the text. This package contains the library runtime.") (license license:lgpl2.1+))) (define-public emacs-nginx-mode (package (name "emacs-nginx-mode") (version "1.1.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/ajc/nginx-mode/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1lvkj07kq0jkskr2f61vqb5rlrbnaz9a76ikq40w6925i2r970rr")))) (build-system emacs-build-system) (home-page "https://github.com/ajc/nginx-mode") (synopsis "Emacs major mode for editing nginx config files") (description "This package provides an Emacs major mode for editing nginx config files.") (license license:gpl2+))) (define-public emacs-stream (package (name "emacs-stream") (version "2.2.0") (home-page "https://github.com/NicolasPetton/stream") (source (origin (method url-fetch) (file-name (string-append name "-" version ".tar.gz")) (uri (string-append home-page "/archive/"version ".tar.gz")) (sha256 (base32 "03ql4nqfz5pn55mjly6clhvc3g7x2d28kj7mrlqmigvjbql39xxc")))) (build-system emacs-build-system) (synopsis "Implementation of streams for Emacs") (description "This library provides an implementation of streams for Emacs. Streams are implemented as delayed evaluation of cons cells.") (license license:gpl3+))) (define-public emacs-el-search (let ((commit "f26277bfbb3fc3fc74beea6592f294c439796bd4") (revision "1")) (package (name "emacs-el-search") ;; No ufficial release. (version (string-append "0.0-" revision "." (string-take commit 7))) (home-page "https://github.com/emacsmirror/el-search") (source (origin (method git-fetch) (file-name (string-append name "-" version ".tar.gz")) (uri (git-reference (commit commit) (url (string-append home-page ".git")))) (sha256 (base32 "12xf40h9sb7xxg2r97gsia94q02543mgiiiw46fzh1ac7b7993g6")))) (build-system emacs-build-system) (inputs `(("emacs-stream" ,emacs-stream))) (synopsis "Expression based interactive search for emacs-lisp-mode") (description "This package provides expression based interactive search procedures for emacs-lisp-mode.") (license license:gpl3+)))) (define-public emacs-ht (package (name "emacs-ht") (version "2.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/Wilfred/ht.el/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1lpba36kzxcc966fvsbrfpy8ah9gnvay0yk26gbyjil0rggrbqzj")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash))) (home-page "https://github.com/Wilfred/ht.el") (synopsis "Hash table library for Emacs") (description "This package simplifies the use of hash tables in elisp. It also provides functions to convert hash tables from and to alists and plists.") (license license:gpl3+))) (define-public emacs-log4e (package (name "emacs-log4e") (version "0.3.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/aki2o/log4e/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0nbdpbw353snda3v19l9hsm6gimppwnpxj18amm350bm81lyim2g")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'remove-tests ;; Guile builder complains about null characters in some ;; strings of test files. Remove "test" directory (it is not ;; needed anyway). (lambda _ (delete-file-recursively "test")))))) (home-page "https://github.com/aki2o/log4e") (synopsis "Logging framework for elisp") (description "This package provides a logging framework for elisp. It allows you to deal with multiple log levels.") (license license:gpl3+))) (define-public emacs-gntp (package (name "emacs-gntp") (version "0.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/tekai/gntp.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "16c1dfkia9yhl206bdhjr3b8kfvqcqr38jl5lq8qsyrrzsnmghny")))) (build-system emacs-build-system) (home-page "https://github.com/tekai/gntp.el") (synopsis "Growl Notification Protocol for Emacs") (description "This package implements the Growl Notification Protocol GNTP described at @uref{http://www.growlforwindows.com/gfw/help/gntp.aspx}. It is incomplete as it only lets you send but not receive notifications.") (license license:bsd-3))) (define-public emacs-alert (package (name "emacs-alert") (version "1.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/jwiegley/alert/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1693kck3k2iz5zhpmxwqyafxm68hr6gzs60lkxd3j1wlp2c9fwyr")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-gntp" ,emacs-gntp) ("emacs-log4e" ,emacs-log4e))) (home-page "https://github.com/jwiegley/alert") (synopsis "Growl-style notification system for Emacs") (description "Alert is a Growl-workalike for Emacs which uses a common notification interface and multiple, selectable \"styles\", whose use is fully customizable by the user.") (license license:gpl2+))) (define-public emacs-mu4e-alert (package (name "emacs-mu4e-alert") (version "1.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/iqbalansari/mu4e-alert/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "07qc834qnxn8xi4bw5nawj8g91bmkzw0r0vahkgysp7r9xrf57gj")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-alert" ,emacs-alert) ("emacs-s" ,emacs-s) ("emacs-ht" ,emacs-ht))) (home-page "https://github.com/iqbalansari/mu4e-alert") (synopsis "Desktop notification for mu4e") (description "This package provides desktop notifications for mu4e. Additionally it can display the number of unread emails in the mode-line.") (license license:gpl3+))) (define-public emacs-pretty-mode (package (name "emacs-pretty-mode") (version "2.0.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/akatov/pretty-mode/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1fan7m4vnqs8kpg7r54kx3g7faadkpkf9kzarfv8n57kq8w157pl")))) (build-system emacs-build-system) (home-page "https://github.com/akatov/pretty-mode") (synopsis "Redisplay parts of the buffer as Unicode symbols") (description "Emacs minor mode for redisplaying parts of the buffer as pretty symbols.") (license license:gpl3+))) (define-public emacs-yasnippet (package (name "emacs-yasnippet") (version "0.12.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/joaotavora/yasnippet/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1yqiprighgqz1hsslph50cy09xxqabc06jffrnjcsdf6nj70xlkc")) (modules '((guix build utils))) (snippet '(begin ;; YASnippet expects a "snippets" subdirectory in the same ;; directory as yasnippet.el, but we don't install it ;; because it's a git submodule pointing to an external ;; repository. Adjust `yas-snippet-dirs' to prevent ;; warnings about a missing directory. (substitute* "yasnippet.el" (("^ +'yas-installed-snippets-dir\\)\\)\n") "))\n")))))) (build-system emacs-build-system) (home-page "https://github.com/joaotavora/yasnippet") (synopsis "Yet another snippet extension for Emacs") (description "YASnippet is a template system for Emacs. It allows you to type an abbreviation and automatically expand it into function templates.") (license license:gpl3+))) (define-public emacs-yasnippet-snippets (let ((commit "885050d34737e2fb36a3e7759d60c09347bd4ce0") (revision "1")) (package (name "emacs-yasnippet-snippets") (version (string-append "1-" revision "." (string-take commit 8))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/AndreaCrotti/yasnippet-snippets") (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "1m935zgglw0iakzrixld5rcjz3wnj84f8wy2mvc3pggjri9l0qr9")))) (build-system trivial-build-system) (arguments `(#:modules ((ice-9 ftw) (ice-9 regex) (guix build utils)) #:builder (begin (use-modules (ice-9 ftw) (ice-9 regex) (guix build utils)) (with-directory-excursion (assoc-ref %build-inputs "source") (for-each (lambda (dir) (copy-recursively dir (string-append %output "/share/emacs/yasnippet-snippets/" dir))) (scandir "." (lambda (fname) (and (string-match "-mode$" fname) (directory-exists? fname))))))))) (home-page "https://github.com/AndreaCrotti/yasnippet-snippets") (synopsis "Collection of YASnippet snippets for many languages") (description "Provides Andrea Crotti's collection of YASnippet snippets. After installation, the snippets will be in \"~/.guix-profile/share/emacs/yasnippet-snippets/\". To make YASnippet aware of these snippets, add the above directory to @code{yas-snippet-dirs}.") (license license:expat)))) (define-public emacs-memoize (package (name "emacs-memoize") (version "20130421.b55eab0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/skeeto/emacs-memoize") (commit "b55eab0cb6ab05d941e07b8c01f1655c0cf1dd75"))) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0fjwlrdm270qcrqffvarw5yhijk656q4lam79ybhaznzj0dq3xpw")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "emacs" "-batch" "-l" "memoize.el" "-l" "memoize-test.el" "-f" "ert-run-tests-batch-and-exit"))))))) (home-page "https://github.com/skeeto/emacs-memoize") (synopsis "Emacs lisp memoization library") (description "@code{emacs-memoize} is an Emacs library for memoizing functions.") (license license:unlicense))) (define-public emacs-linum-relative (package (name "emacs-linum-relative") (version "0.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/coldnew/linum-relative/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0s4frvr27866lw1rn3jal9wj5rkz9fx4yiszqv7w06azsdgsqksv")))) (build-system emacs-build-system) (home-page "https://github.com/coldnew/linum-relative") (synopsis "Relative line numbering for Emacs") (description "@code{emacs-linum-relative} displays the relative line number on the left margin in Emacs.") (license license:gpl2+))) (define-public emacs-idle-highlight (package (name "emacs-idle-highlight") (version "1.1.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/nonsequitur/idle-highlight-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0kdv10hrgqpskjh0zvpnzwlkn5bccnqxas62gkws6njln57bf8nl")))) (build-system emacs-build-system) (home-page "https://www.emacswiki.org/emacs/IdleHighlight") (synopsis "Highlights all occurrences of the word the point is on") (description "This Emacs package provides @code{idle-highlight-mode} that sets an idle timer to highlight all occurrences in the buffer of the word under the point.") (license license:gpl3+))) (define-public emacs-ox-twbs (package (name "emacs-ox-twbs") (version "1.1.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/marsmining/ox-twbs/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1zaq8dczq5wijjk36114k2x3hfrqig3lyx6djril6wyk67vczyqs")))) (build-system emacs-build-system) (home-page "https://github.com/marsmining/ox-twbs") (synopsis "Export org-mode docs as HTML compatible with Twitter Bootstrap") (description "This Emacs package outputs your org-mode docs with a simple, clean and modern look. It implements a new HTML back-end for exporting org-mode docs as HTML compatible with Twitter Bootstrap. By default, HTML is exported with jQuery and Bootstrap resources included via osscdn.") (license license:gpl3+))) (define-public emacs-highlight-sexp (package (name "emacs-highlight-sexp") (version "1.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/daimrod/highlight-sexp/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0jwx87qkln1rg9wmv4qkgkml935fh2pkgrg5x4ca6n5dgb4q6rj1")))) (build-system emacs-build-system) (home-page "https://github.com/daimrod/highlight-sexp") (synopsis "Minor mode that highlights the s-exp at the current position") (description "This Emacs package highlights the s-exp at the current position.") (license license:gpl3+))) (define-public emacspeak (package (name "emacspeak") (version "46.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/tvraman/emacspeak/releases/download/" version "/emacspeak-" version ".tar.bz2")) (sha256 (base32 "15x4yfp3wl2fxm1nkx6pz3clw6zyw3argcsqxgcx6pa28sivlg2n")) (modules '((guix build utils))) (snippet ;; Delete the bundled byte-compiled elisp files. '(for-each delete-file (find-files "lisp" "\\.elc$"))))) (build-system gnu-build-system) (arguments '(#:make-flags (list (string-append "prefix=" (assoc-ref %outputs "out"))) #:phases (modify-phases %standard-phases (replace 'configure (lambda _ ;; Configure Emacspeak according to etc/install.org. (zero? (system* "make" "config")))) (add-after 'build 'build-espeak (lambda _ (zero? (system* "make" "espeak")))) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (bin (string-append out "/bin")) (lisp (string-append out "/share/emacs/site-lisp/emacspeak")) (info (string-append out "/share/info"))) ;; According to etc/install.org, the Emacspeak directory should ;; be copied to its installation destination. (for-each (lambda (file) (copy-recursively file (string-append lisp "/" file))) '("etc" "info" "lisp" "media" "servers" "sounds" "stumpwm" "xsl")) ;; Make sure emacspeak is loaded from the correct directory. (substitute* "etc/emacspeak.sh" (("exec emacs.*$") (string-append "exec emacs -l " lisp "/lisp/emacspeak-setup.el $CL_ALL"))) ;; Install the convenient startup script. (mkdir-p bin) (copy-file "etc/emacspeak.sh" (string-append bin "/emacspeak"))) #t)) (add-after 'install 'wrap-program (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (emacspeak (string-append out "/bin/emacspeak")) (espeak (string-append (assoc-ref inputs "espeak") "/bin/espeak"))) ;; The environment variable DTK_PROGRAM tells emacspeak what ;; program to use for speech. (wrap-program emacspeak `("DTK_PROGRAM" ":" prefix (,espeak))) #t)))) #:tests? #f)) ; no check target (inputs `(("espeak" ,espeak) ("tcl" ,tcl) ("tclx" ,tclx))) (native-inputs `(("emacs" ,emacs-minimal))) (home-page "http://emacspeak.sourceforge.net") (synopsis "Audio desktop interface for Emacs") (description "Emacspeak is a speech interface that allows visually impaired users to interact independently and efficiently with the computer. Audio formatting --a technique pioneered by AsTeR-- and full support for W3C's Aural CSS (ACSS) allows Emacspeak to produce rich aural presentations of electronic information. By seamlessly blending all aspects of the Internet such as Web-surfing and messaging, Emacspeak speech-enables local and remote information via a consistent and well-integrated user interface.") (license license:gpl2+))) (define-public emacs-adaptive-wrap (package (name "emacs-adaptive-wrap") (version "0.5") (source (origin (method url-fetch) (uri (string-append "http://elpa.gnu.org/packages/adaptive-wrap-" version ".el")) (sha256 (base32 "0frgmp8vrrml4iykm60j4d6cl9rbcivy9yh24q6kd10bcyx59ypy")))) (build-system emacs-build-system) (home-page "http://elpa.gnu.org/packages/adaptive-wrap.html") (synopsis "Smart line-wrapping with wrap-prefix") (description "This Emacs package provides the @code{adaptive-wrap-prefix-mode} minor mode which sets the wrap-prefix property on the fly so that single-long-line paragraphs get word-wrapped in a way similar to what you'd get with @kbd{M-q} using @code{adaptive-fill-mode}, but without actually changing the buffer's text.") (license license:gpl3+))) (define-public emacs-diminish (package (name "emacs-diminish") (version "0.45") (source (origin (method url-fetch) (uri (string-append "https://github.com/myrjola/diminish.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0i3629sv5cfrrb00hcnmaqzgs8mk36yasc1ax3ry1ga09nr6rkj9")))) (build-system emacs-build-system) (home-page "https://github.com/myrjola/diminish.el") (synopsis "Diminish minor modes with no modeline display") (description "@code{emacs-diminish} implements hiding or abbreviation of the mode line displays (lighters) of minor modes.") (license license:gpl2+))) (define-public emacs-use-package (package (name "emacs-use-package") (version "2.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/jwiegley/use-package/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0x4h136jb3imyli6zsh7dyzjrra6pv0v6b0yk94jdng3rdfcmsf5")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-diminish" ,emacs-diminish))) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "emacs" "--batch" "-L" "." "-l" "use-package-tests.el" "-f" "ert-run-tests-batch-and-exit")) ;; Tests fail in this release, but have been fixed in ;; upstream commit 7956d40eed57d6c06bef36ebc174cf57d934e30d #t))))) (home-page "https://github.com/jwiegley/use-package") (synopsis "Declaration for simplifying your .emacs") (description "The use-package macro allows you to isolate package configuration in your @file{.emacs} file in a way that is both performance-oriented and tidy.") (license license:gpl2+))) (define-public emacs-strace-mode (let* ((commit "6a69b4b06db6797af56f33eda5cb28af94e59f11") (revision "1")) (package (name "emacs-strace-mode") (version (string-append "0.0.2-" revision "." (string-take commit 7))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/pkmoore/strace-mode") (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "1lbk2kzdznf2bkfazizfbimaxxzfzv00lrz1ran9dc2zqbc0bj9f")))) (build-system emacs-build-system) (home-page "https://github.com/pkmoore/strace-mode") (synopsis "Emacs major mode to highlight strace outputs") (description "@code{emacs-strace-mode} provides an Emacs major mode highlighting strace outputs.") (license license:gpl3+)))) (define-public emacs-default-encrypt (package (name "emacs-default-encrypt") (version "4.3") (source (origin (method url-fetch) (uri (string-append "https://www.informationelle-selbstbestimmung-im-internet.de" "/emacs/jl-encrypt" version "/jl-encrypt.el")) (file-name (string-append "jl-encrypt-" version ".el")) (sha256 (base32 "16i3rlfp3jxlqvndn8idylhmczync3gwmy8a019v29vyr48rnnr0")))) (build-system emacs-build-system) (home-page "https://www.informationelle-selbstbestimmung-im-internet.de/Emacs.html") (synopsis "Automatically encrypt or sign Gnus messages in Emacs") (description "DefaultEncrypt is designed to be used with Gnus in Emacs. It automatically encrypts messages that you send (e.g., email) when public keys for all recipients are available, and it protects you from accidentally sending un-encrypted messages. It can also be configured to automatically sign messages that you send. For details and instructions on how to use DefaultEncrypt, please refer to the home page or read the comments in the source file, @file{jl-encrypt.el}.") (license license:gpl3+))) (define-public emacs-htmlize (package (name "emacs-htmlize") (version "1.51") (source (origin (method url-fetch) (uri (string-append "https://github.com/hniksic/emacs-htmlize/archive/release/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1fy1lybzrxl8a8r88f6p19nz8ygmvcxhxbnymkxh7jqaz25viwld")))) (build-system emacs-build-system) (home-page "https://github.com/hniksic/emacs-htmlize") (synopsis "Convert buffer text and decorations to HTML") (description "@code{emacs-htmlize} converts the buffer text and the associated decorations to HTML. Output to CSS, inline CSS and fonts is supported.") (license license:gpl2+))) (define-public emacs-xmlgen (package (name "emacs-xmlgen") (version "0.5") (source (origin (method url-fetch) (uri (string-append "https://github.com/philjackson/xmlgen/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0zay490vjby3f7455r0vydmjg7q1gwc78hilpfb0rg4gwz224z8r")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "emacs" "--batch" "-L" "." "-l" "xmlgen-test.el" "-f" "ert-run-tests-batch-and-exit"))))))) (home-page "https://github.com/philjackson/xmlgen") (synopsis "S-expression to XML domain specific language (DSL) in Emacs Lisp") (description "@code{emacs-xmlgen} provides S-expression to XML conversion for Emacs Lisp.") (license license:gpl2+))) (define-public emacs-cdlatex (package (name "emacs-cdlatex") (version "4.7") (source (origin (method url-fetch) (uri (string-append "https://github.com/cdominik/cdlatex/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0pivapphmykc6vhvpx7hdyl55ls37vc4jcrxpvs4yk7jzcmwa9xp")))) (build-system emacs-build-system) (home-page "https://github.com/cdominik/cdlatex") (synopsis "Fast Emacs input methods for LaTeX environments and math") (description "CDLaTeX is an Emacs minor mode supporting fast insertion of environment templates and math in LaTeX. Similar commands are also offered as part of the AUCTeX package, but it is not the same - CDLaTeX focuses on speediness for inserting LaTeX constructs.") (license license:gpl3+))) (define-public emacs-xelb (package (name "emacs-xelb") (version "0.12") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/xelb-" version ".tar")) (sha256 (base32 "0i9n0f3ibj4a5pwcsvwrah9m0fz32m0x6a9wsmjn3li20v8pcb81")))) (build-system emacs-build-system) ;; The following functions and variables needed by emacs-xelb are ;; not included in emacs-minimal: ;; x-display-screens, x-keysym-table, x-alt-keysym, x-meta-keysym ;; x-hyper-keysym, x-super-keysym, libxml-parse-xml-region ;; x-display-pixel-width, x-display-pixel-height (arguments `(#:emacs ,emacs #:phases (modify-phases %standard-phases (add-after 'unpack 'regenerate-el-files (lambda* (#:key inputs #:allow-other-keys) (zero? (system* "make" (string-append "PROTO_PATH=" (assoc-ref inputs "xcb-proto") "/share/xcb") (string-append "EMACS_BIN=" (assoc-ref inputs "emacs") "/bin/emacs -Q")))))))) (native-inputs `(("xcb-proto" ,xcb-proto))) (home-page "https://github.com/ch11ng/xelb") (synopsis "X protocol Emacs Lisp binding") (description "@code{emacs-xelb} is a pure Emacs Lisp implementation of the X11 protocol based on the XML description files from the XCB project. It features an object-oriented API and permits a certain degree of concurrency. It should enable you to implement low-level X11 applications.") (license license:gpl3+))) (define-public emacs-exwm (package (name "emacs-exwm") (version "0.15") (synopsis "Emacs X window manager") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/exwm-" version ".tar")) (sha256 (base32 "1y7nqry9y0a99bsdqkk9f554vczfw4sz6raadw3138835qy697jg")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-xelb" ,emacs-xelb))) (inputs `(("xhost" ,xhost) ("dbus" ,dbus))) ;; The following functions and variables needed by emacs-exwm are ;; not included in emacs-minimal: ;; scroll-bar-mode, fringe-mode ;; x-display-pixel-width, x-display-pixel-height (arguments `(#:emacs ,emacs #:phases (modify-phases %standard-phases (add-after 'build 'install-xsession (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (xsessions (string-append out "/share/xsessions")) (bin (string-append out "/bin")) (exwm-executable (string-append bin "/exwm"))) ;; Add a .desktop file to xsessions (mkdir-p xsessions) (mkdir-p bin) (with-output-to-file (string-append xsessions "/exwm.desktop") (lambda _ (format #t "[Desktop Entry]~@ Name=~a~@ Comment=~a~@ Exec=~a~@ TryExec=~@*~a~@ Type=Application~%" ,name ,synopsis exwm-executable))) ;; Add a shell wrapper to bin (with-output-to-file exwm-executable (lambda _ (format #t "#!~a ~@ ~a +SI:localuser:$USER ~@ exec ~a --exit-with-session ~a \"$@\" --eval '~s' ~%" (string-append (assoc-ref inputs "bash") "/bin/sh") (string-append (assoc-ref inputs "xhost") "/bin/xhost") (string-append (assoc-ref inputs "dbus") "/bin/dbus-launch") (string-append (assoc-ref inputs "emacs") "/bin/emacs") '(cond ((file-exists-p "~/.exwm") (load-file "~/.exwm")) ((not (featurep 'exwm)) (require 'exwm) (require 'exwm-config) (exwm-config-default) (message (concat "exwm configuration not found. " "Falling back to default configuration..."))))))) (chmod exwm-executable #o555) #t)))))) (home-page "https://github.com/ch11ng/exwm") (description "EXWM is a full-featured tiling X window manager for Emacs built on top of XELB.") (license license:gpl3+))) (define-public emacs-switch-window (package (name "emacs-switch-window") (version "1.5.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/dimitri/switch-window/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "07f99apxscwvsp2bjxsbi462c433kcglrjh6xl0gyafs1nvvvnd8")))) (build-system emacs-build-system) (home-page "https://github.com/dimitri/switch-window") (synopsis "Emacs window switch tool") (description "Switch-window is an emacs window switch tool, which offer a visual way to choose a window to switch to, delete, split or other operations.") (license license:wtfpl2))) (define-public emacs-exwm-x (package (name "emacs-exwm-x") (version "1.7.2") (synopsis "Derivative window manager based on EXWM") (source (origin (method url-fetch) (uri (string-append "https://github.com/tumashu/exwm-x/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1ny13i82fb72917jgl0ndwjg1x6l9f8gfhcx7cwlwhh5saq23mvy")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-exwm" ,emacs-exwm) ("emacs-switch-window" ,emacs-switch-window) ("emacs-ivy" ,emacs-ivy) ("emacs-use-package" ,emacs-use-package))) (inputs `(("xhost" ,xhost) ("dbus" ,dbus))) ;; Need emacs instead of emacs-minimal, ;; for emacs's bin path will be inserted into bin/exwm-x file. (arguments `(#:emacs ,emacs #:phases (modify-phases %standard-phases (add-after 'build 'install-xsession (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (xsessions (string-append out "/share/xsessions")) (bin (string-append out "/bin")) (exwm-executable (string-append bin "/exwm-x"))) ;; Add a .desktop file to xsessions (mkdir-p xsessions) (mkdir-p bin) (with-output-to-file (string-append xsessions "/exwm-x.desktop") (lambda _ (format #t "[Desktop Entry]~@ Name=~a~@ Comment=~a~@ Exec=~a~@ TryExec=~@*~a~@ Type=Application~%" ,name ,synopsis exwm-executable))) ;; Add a shell wrapper to bin (with-output-to-file exwm-executable (lambda _ (format #t "#!~a ~@ ~a +SI:localuser:$USER ~@ exec ~a --exit-with-session ~a \"$@\" --eval '~s' ~%" (string-append (assoc-ref inputs "bash") "/bin/sh") (string-append (assoc-ref inputs "xhost") "/bin/xhost") (string-append (assoc-ref inputs "dbus") "/bin/dbus-launch") (string-append (assoc-ref inputs "emacs") "/bin/emacs") '(require 'exwmx-loader)))) (chmod exwm-executable #o555) #t)))))) (home-page "https://github.com/tumashu/exwm-x") (description "EXWM-X is a derivative window manager based on EXWM, with focus on mouse-control.") (license license:gpl3+))) (define-public emacs-gnuplot (package (name "emacs-gnuplot") (version "0.7.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/bruceravel/gnuplot-mode/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0glzymrn138lwig7p4cj17x4if5jisr6l4g6wcbxisqkqgc1h01i")))) (build-system gnu-build-system) (native-inputs `(("emacs" ,emacs-minimal))) (arguments (let ((elisp-dir (string-append "/share/emacs/site-lisp/guix.d" "/gnuplot-" version))) `(#:modules ((guix build gnu-build-system) (guix build utils) (guix build emacs-utils)) #:imported-modules (,@%gnu-build-system-modules (guix build emacs-utils)) #:configure-flags (list (string-append "EMACS=" (assoc-ref %build-inputs "emacs") "/bin/emacs") (string-append "--with-lispdir=" %output ,elisp-dir)) #:phases (modify-phases %standard-phases (add-after 'install 'generate-autoloads (lambda* (#:key outputs #:allow-other-keys) (emacs-generate-autoloads "gnuplot" (string-append (assoc-ref outputs "out") ,elisp-dir)) #t)))))) (home-page "https://github.com/bruceravel/gnuplot-mode") (synopsis "Emacs major mode for interacting with gnuplot") (description "@code{emacs-gnuplot} is an emacs major mode for interacting with gnuplot.") (license license:gpl2+))) (define-public emacs-transpose-frame (package (name "emacs-transpose-frame") (version "0.1.0") (source (origin (method url-fetch) (uri "http://www.emacswiki.org/emacs/download/transpose-frame.el") (file-name (string-append "transpose-frame-" version ".el")) (sha256 (base32 "1f67yksgw9s6j0033hmqzaxx2a93jm11sd5ys7cc3li5gfh680m4")))) (build-system emacs-build-system) (home-page "https://www.emacswiki.org/emacs/TransposeFrame") (synopsis "Transpose window arrangement in current frame") (description "@code{emacs-transpose-frame} provides some interactive functions which allows users to transpose windows arrangement in currently selected frame.") (license license:bsd-2))) (define-public emacs-key-chord (package (name "emacs-key-chord") (version "0.6") (source (origin (method url-fetch) (uri "https://www.emacswiki.org/emacs/download/key-chord.el") (file-name (string-append "key-chord-" version ".el")) (sha256 (base32 "03m44pqggfrd53nh9dvpdjgm0rvca34qxmd30hr33hzprzjambxg")))) (build-system emacs-build-system) (home-page "https://www.emacswiki.org/emacs/key-chord.el") (synopsis "Map pairs of simultaneously pressed keys to Emacs commands") (description "@code{emacs-key-chord} provides @code{key-chord-mode}, a mode for binding key chords to commands. A key chord is defined as two keys pressed simultaneously or a single key quickly pressed twice.") (license license:gpl2+))) (define-public emacs-evil-surround (package (name "emacs-evil-surround") (version "1.0.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/timcharper/evil-surround/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0p572jgic3q1ia1nz37kclir729ay6i2f4sa7wnaapyxly2lwb3r")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-evil" ,emacs-evil))) (home-page "https://github.com/timcharper/evil-surround") (synopsis "Easily modify surrounding parantheses and quotes") (description "@code{emacs-evil-surround} allows easy deletion, change and addition of surrounding pairs, such as parantheses and quotes, in evil mode.") (license license:gpl3+))) (define-public emacs-evil-commentary (package (name "emacs-evil-commentary") (version "2.1.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/linktohack/evil-commentary/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1jdya0i921nwskwrzdsj0vrr3m7gm49dy6f6pk9p5nxaarfxk230")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-evil" ,emacs-evil))) (home-page "https://github.com/linktohack/evil-commentary") (synopsis "Comment out code in evil mode") (description "@code{emacs-evil-commentary} adds keybindings to easily comment out lines of code in evil mode. It provides @code{gcc} to comment out lines, and @code{gc} to comment out the target of a motion.") (license license:gpl3+))) ;; Tests for emacs-ansi have a circular dependency with ert-runner, and ;; therefore cannot be run (define-public emacs-ansi (package (name "emacs-ansi") (version "0.4.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/rejeep/ansi.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "13jj4vbi98j3p17hs99bmy7g21jd5h4v3wpxk4pkvhylm3bfwjw8")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-s" ,emacs-s))) (home-page "https://github.com/rejeep/ansi.el") (synopsis "Convert strings to ANSI") (description "@code{emacs-ansi} defines functions that turns simple strings to ANSI strings. Turning a string into an ANSI string can be to add color to a text, add color in the background of a text or adding a style, such as bold, underscore or italic.") (license license:gpl3+))) ;; Tests for emacs-commander have a circular dependency with ert-runner, and ;; therefore cannot be run (define-public emacs-commander (package (name "emacs-commander") (version "0.7.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/rejeep/commander.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "196s2i15z7gwxa97l1wkxvjnfmj5n38wwm6d3g4zz15l2vqggc2y")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-f" ,emacs-f) ("emacs-s" ,emacs-s))) (home-page "https://github.com/rejeep/commander.el") (synopsis "Emacs command line parser") (description "@code{emacs-commander} provides command line parsing for Emacs.") (license license:gpl3+))) ;; Tests for ert-runner have a circular dependency with ecukes, and therefore ;; cannot be run (define-public ert-runner (let ((dependencies `(("emacs-ansi" ,emacs-ansi) ("emacs-commander" ,emacs-commander) ("emacs-dash" ,emacs-dash) ("emacs-f" ,emacs-f) ("emacs-s" ,emacs-s) ("emacs-shut-up" ,emacs-shut-up)))) (package (name "ert-runner") (version "0.7.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/rejeep/ert-runner.el/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1657nck9i96a4xgl8crfqq0s8gflzp21pkkzwg6m3z5npjxklgwp")))) (build-system emacs-build-system) (inputs dependencies) (arguments `(#:phases (modify-phases %standard-phases (add-after 'install 'install-executable (lambda* (#:key inputs outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (substitute* "bin/ert-runner" (("ERT_RUNNER=\"\\$\\(dirname \\$\\(dirname \\$0\\)\\)") (string-append "ERT_RUNNER=\"" out "/share/emacs/site-lisp/guix.d/" ,name "-" ,version))) (install-file "bin/ert-runner" (string-append out "/bin")) (wrap-program (string-append out "/bin/ert-runner") (list "EMACSLOADPATH" ":" '= (append ,(match dependencies (((labels packages) ...) `(map (lambda (label package version) (string-append (assoc-ref inputs label) "/share/emacs/site-lisp/guix.d/" (string-drop package 6) "-" version)) ',labels ',(map package-name packages) ',(map package-version packages)))) ;; empty element to include the default load path as ;; determined by emacs' standard initialization ;; procedure (list "")))) #t)))) #:include (cons* "^reporters/.*\\.el$" %default-include))) (home-page "https://github.com/rejeep/ert-runner.el") (synopsis "Opinionated Ert testing workflow") (description "@code{ert-runner} is a tool for Emacs projects tested using ERT. It assumes a certain test structure setup and can therefore make running tests easier.") (license license:gpl3+)))) (define-public emacs-disable-mouse (package (name "emacs-disable-mouse") (version "0.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/purcell/disable-mouse/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0haqpq23r1wx04lsqrrg3p5visg9hx5i36dg55ab003wfsrlrzbc")))) (build-system emacs-build-system) (home-page "https://github.com/purcell/disable-mouse") (synopsis "Disable mouse commands globally") (description "Provides @code{disable-mouse-mode} and @code{global-disable-mouse-mode}, pair of minor modes which suppress all mouse events by intercepting them and running a customisable handler command (@code{ignore} by default). ") (license license:gpl3+))) (define-public emacs-restclient (let ((commit "07a3888bb36d0e29608142ebe743b4362b800f40") (revision "1")) ;Guix package revision, ;upstream doesn't have official releases (package (name "emacs-restclient") (version (string-append revision "." (string-take commit 7))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/pashky/restclient.el.git") (commit commit))) (sha256 (base32 "00lmjhb5im1kgrp54yipf1h9pshxzgjlg71yf2rq5n973gvb0w0q")) (file-name (git-file-name name version)))) (build-system emacs-build-system) (propagated-inputs `(("emacs-helm" ,emacs-helm))) (home-page "https://github.com/pashky/restclient.el") (synopsis "Explore and test HTTP REST webservices") (description "This tool allows for testing and exploration of HTTP REST Web services from within Emacs. Restclient runs queries from a plan-text query sheet, displays results pretty-printed in XML or JSON with @code{restclient-mode}") (license license:public-domain)))) (define-public emacs-dired-hacks (let ((commit "eda68006ce73bbf6b9b995bfd70d08bec8cade36") (revision "1")) (package (name "emacs-dired-hacks") (version (string-append "0.0.1-" revision "." (string-take commit 7))) (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/Fuco1/dired-hacks.git") (commit commit))) (file-name (string-append name "-" version "-checkout")) (sha256 (base32 "1w7ssl9zssn5rcha6apf4h8drkd02k4xgvs203bdbqyqp9wz9brx")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-dash" ,emacs-dash) ("emacs-f" ,emacs-f) ("emacs-s" ,emacs-s))) (home-page "https://github.com/Fuco1/dired-hacks") (synopsis "Collection of useful dired additions") (description "Collection of Emacs dired mode additions: @itemize @item dired-avfs @item dired-columns @item dired-filter @item dired-hacks-utils @item dired-images @item dired-list @item dired-narrow @item dired-open @item dired-rainbow @item dired-ranger @item dired-subtree @item dired-tagsistant @end itemize\n") (license license:gpl3+)))) (define-public emacs-which-key (package (name "emacs-which-key") (version "3.0.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/justbur/emacs-which-key/archive/v" version ".tar.gz")) (sha256 (base32 "0zc9yivdkbxmcllhlbbcvsbj8g8nzzgs0xib488s08p4s0l7xs8m")) (file-name (string-append name "-" version ".tar.gz")))) (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda _ (zero? (system* "emacs" "--batch" "-L" "." "-l" "which-key-tests.el" "-f" "ert-run-tests-batch-and-exit"))))))) (home-page "https://github.com/justbur/emacs-which-key") (synopsis "Display available key bindings in popup") (description "@code{emacs-which-key} is a minor mode for Emacs that displays the key bindings following your currently entered incomplete command (a prefix) in a popup. For example, after enabling the minor mode if you enter C-x and wait for the default of 1 second, the minibuffer will expand with all of the available key bindings that follow C-x (or as many as space allows given your settings).") (license license:gpl3+))) (define-public emacs-org-edit-latex (package (name "emacs-org-edit-latex") (version "0.8.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/et2010/org-edit-latex/archive/v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1y4h6wrs8286h9pbsv4d8fr67a885vz8b2k80qgv5qddipi2i78p")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-auctex" ,emacs-auctex) ;; The version of org in Emacs 25.2 is not sufficient, because the ;; `org-latex-make-preamble' function is required. ("emacs-org" ,emacs-org))) (home-page "https://github.com/et2010/org-edit-latex") (synopsis "Edit a latex fragment just like editing a src block") (description "@code{emacs-org-edit-latex} is an extension for org-mode. It lets you edit a latex fragment in a dedicated buffer just like editing a src block.") (license license:gpl3+))) (define-public emacs-emamux (package (name "emacs-emamux") (version "0.14") (source (origin (method url-fetch) (uri (string-append "https://github.com/syohex/emacs-emamux/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0wlqg4icy037bj70b0qmhvwvmiwhagpnx6pnxhq6gzy1hvwlilkx")))) (build-system emacs-build-system) (home-page "https://github.com/syohex/emacs-emamux") (synopsis "Manipulate Tmux from Emacs") (description "@code{emacs-emamux} lets Emacs interact with the @code{tmux} terminal multiplexer.") (license license:gpl3+))) (define-public emacs-rpm-spec-mode (package (name "emacs-rpm-spec-mode") (version "0.16") (source (origin (method url-fetch) ;; URI has the Fedora release number instead of the version ;; number. This will have to updated manually every new release. (uri (string-append "https://src.fedoraproject.org/cgit/rpms" "/emacs-rpm-spec-mode.git/snapshot" "/emacs-rpm-spec-mode-f26.tar.gz")) (sha256 (base32 "17dz80lhjrc89fj17pysl8slahzrqdkxgcjdk55zls6jizkr6kz3")))) (build-system emacs-build-system) (home-page "http://pkgs.fedoraproject.org/cgit/rpms/emacs-rpm-spec-mode.git") (synopsis "Emacs major mode for editing RPM spec files") (description "@code{emacs-rpm-spec-mode} provides an Emacs major mode for editing RPM spec files.") (license license:gpl2+))) (define-public emacs-nix-mode (package (inherit nix) (name "emacs-nix-mode") (build-system emacs-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'chdir-elisp ;; Elisp directory is not in root of the source. (lambda _ (chdir "misc/emacs")))))) (synopsis "Emacs major mode for editing Nix expressions") (description "@code{nixos-mode} provides an Emacs major mode for editing Nix expressions. It supports syntax highlighting, indenting and refilling of comments."))) (define-public emacs-git-messenger (package (name "emacs-git-messenger") (version "0.18") (source (origin (method url-fetch) (uri (string-append "https://github.com/syohex/emacs-git-messenger/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "17mqki6g0wx46fn7dcbcc2pjxik7vvrcb1j9jzxim8b9psbsbnp9")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-popup" ,emacs-popup))) (arguments `(#:phases (modify-phases %standard-phases (add-before 'install 'check (lambda* (#:key inputs #:allow-other-keys) (zero? (system* "emacs" "--batch" "-L" "." "-L" (string-append (assoc-ref inputs "emacs-popup") "/share/emacs/site-lisp/guix.d/popup-" ,(package-version emacs-popup)) "-l" "test/test.el" "-f" "ert-run-tests-batch-and-exit"))))))) (home-page "https://github.com/syohex/emacs-git-messenger") (synopsis "Popup commit message at current line") (description "@code{emacs-git-messenger} provides @code{git-messenger:popup-message}, a function that when called, will popup the last git commit message for the current line. This uses git-blame internally.") (license license:gpl3+))) (define-public emacs-gitpatch (package (name "emacs-gitpatch") (version "0.5.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/tumashu/gitpatch/archive/" "v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1yj6pmic541lcnscjin300k380qp9xdfprs55xg1q57jrkq6f6k7")))) (build-system emacs-build-system) (home-page "https://github.com/tumashu/gitpatch") (synopsis "Mail git patch from Emacs") (description "@code{emacs-gitpatch} lets users easily send git patches, created by @code{git format-patch}, from @code{magit}, @code{dired} and @code{ibuffer} buffers.") (license license:gpl3+))) (define-public emacs-erc-hl-nicks (package (name "emacs-erc-hl-nicks") (version "1.3.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/leathekd/erc-hl-nicks" "/archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "01svpl9bps5kx4y1wnymakxya2cznqmlynvqv2r500wpnbxczrbs")))) (build-system emacs-build-system) (synopsis "Nickname highlighting for Emacs ERC") (description "@code{erc-hl-nicks} highlights nicknames in ERC, an IRC client for Emacs. The main features are: @itemize @item Auto-colorizes nicknames without having to specify colors @item Ignores certain characters that IRC clients add to nicknames to avoid duplicates (nickname, nickname’, nickname\", etc.) @item Attempts to produce colors with a sufficient amount of contrast between the nick color and the background color @end itemize\n") (home-page "https://github.com/leathekd/erc-hl-nicks") (license license:gpl3+))) (define-public emacs-engine-mode (package (name "emacs-engine-mode") (version "2.0.0") (source (origin (method url-fetch) (uri (string-append "https://github.com/hrs/engine-mode/archive/" "v" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1vm4p7pcp1vnwwxvps1bhm7i7hkabqqxl898knxf2hqvxys76684")))) (build-system emacs-build-system) (synopsis "Minor mode for defining and querying search engines") (description "@code{engine-mode} is a global minor mode for Emacs. It enables you to easily define search engines, bind them to keybindings, and query them from the comfort of your editor.") (home-page "https://github.com/hrs/engine-mode") (license license:gpl3+)))