From c622bbce2d758757eac573d822c8f913b8a81123 Mon Sep 17 00:00:00 2001
From: Joseph LaFreniere <joseph@lafreniere.xyz>
Date: Mon, 19 Oct 2020 22:21:04 -0500
Subject: [PATCH] gnu: Add emacs-wucuo.
* gnu/packages/emacs-xyz.scm (emacs-wucuo): New variable.
---
gnu/packages/emacs-xyz.scm | 36 ++++++++++++++++++++++++++++++++++++
1 file changed, 36 insertions(+)
@@ -130,6 +130,7 @@
#:use-module (guix build-system trivial)
#:use-module (gnu packages)
#:use-module (gnu packages admin)
+ #:use-module (gnu packages aspell)
#:use-module (gnu packages audio)
#:use-module (gnu packages bash)
#:use-module (gnu packages cmake)
@@ -9827,6 +9828,41 @@ current frame, disabling the mode line, and adding margins to the buffer that
restrict the text width to 80 characters.")
(license license:bsd-3)))
+(define-public emacs-wucuo
+ (package
+ (name "emacs-wucuo")
+ (version "0.2.9")
+ (home-page "https://github.com/redguardtoo/wucuo")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url home-page)
+ (commit "89b99166768afb811c48a7db7c93c02d51a32b09")))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32 "03a6jlbv9axrd9yr0xscq3ni7fipm20ppc51kxy0sn241rplv0pg"))))
+ (build-system emacs-build-system)
+ (arguments
+ `(#:tests? #t
+ #:test-command '("make" "test")
+ #:phases (modify-phases %standard-phases
+ ;; Set HOME, otherwise tests fail on loading aspell dict.
+ (add-before 'check 'set-home
+ (lambda _
+ (setenv "HOME" (getcwd))
+ #t)))))
+ (native-inputs
+ ;; For tests.
+ `(("aspell" ,aspell)
+ ("aspell-dict-en" ,aspell-dict-en)))
+ (synopsis "Fast spell checker for camel case code or plain text")
+ (description
+ "This package provides a spell checker on top of either Aspell or
+Hunspell, and relies on Flyspell internally. It operates on the current
+region or buffer, a file, or a complete directory.")
+ (license license:gpl3+)))
+
(define-public emacs-ido-completing-read+
(package
(name "emacs-ido-completing-read+")
--
2.31.1