emacs-xyz.scm (7231B)
1 ;;; Kakafarm's Guix Channel 2 ;;; Copyright © 2023-2024 Yuval Langer <yuval.langer@gmail.com> 3 ;;; 4 ;;; This file is part of Kakafarm's Guix Channel. 5 ;;; 6 ;;; Kakafarm's Guix Channel is free software; you can redistribute it 7 ;;; and/or modify it under the terms of the GNU General Public License 8 ;;; as published by the Free Software Foundation; either version 3 of 9 ;;; the License, or (at your option) any later version. 10 ;;; 11 ;;; Kakafarm's Guix Channel is distributed in the hope that it will be 12 ;;; useful, but WITHOUT ANY WARRANTY; without even the implied 13 ;;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 14 ;;; See the GNU General Public License for more details. 15 ;;; 16 ;;; You should have received a copy of the GNU General Public License 17 ;;; along with Kakafarm's Guix Channel. If not, see 18 ;;; <http://www.gnu.org/licenses/>. 19 20 (define-module (kakafarm packages emacs-xyz) 21 #:use-module (guix build-system emacs) 22 #:use-module (guix download) 23 #:use-module (guix git-download) 24 #:use-module (guix packages) 25 #:use-module (guix gexp) 26 #:use-module ((guix licenses) #:prefix license:) 27 28 #:use-module ((gnu packages emacs-xyz) #:prefix gnu:packages:emacs-xyz:) 29 #:use-module (gnu packages speech) 30 #:use-module (gnu packages) 31 ) 32 33 (define-public emacs-detubifier 34 (let ((commit "2146cd76df48c8a9212486060e81c4654958c976") 35 (revision "1") 36 (git-repository-url 37 "https://codeberg.org/kakafarm/emacs-detubifier")) 38 (package 39 (name "emacs-detubifier") 40 (version (git-version "0.1.0" revision commit)) 41 (source 42 (origin 43 (method git-fetch) 44 (uri (git-reference 45 (url git-repository-url) 46 (commit commit))) 47 (file-name (git-file-name name version)) 48 (sha256 49 (base32 "1fv4hmr8zqnng241xkpsmyr63ggi9681rng1rm8bc7w8rlkzrwca")))) 50 (build-system emacs-build-system) 51 (home-page git-repository-url) 52 (synopsis "Replace proprietary web frontends with free and privacy respecting web frontends") 53 (description "Replace proprietary web frontends with free and privacy respecting web frontends.") 54 (license license:agpl3+)))) 55 56 (define-public emacs-discourse-mode 57 (let ((commit "c5fde79990ab5d44786721f133b1c66764d6dc2b") 58 (revision "1") 59 (git-repository-url 60 "https://codeberg.org/glenneth/discourse-mode")) 61 (package 62 (name "emacs-discourse-mode") 63 (version (git-version "0.2.4" revision commit)) 64 (source 65 (origin 66 (method git-fetch) 67 (uri (git-reference 68 (url git-repository-url) 69 (commit commit))) 70 (file-name (git-file-name name version)) 71 (sha256 72 (base32 "0j2f0vclj6zrmk1hxyrrhkcpk74vqvq42g9wjqrjw827yjh2wm65")))) 73 (build-system emacs-build-system) 74 (propagated-inputs (list gnu:packages:emacs-xyz:emacs-request 75 gnu:packages:emacs-xyz:emacs-compat 76 gnu:packages:emacs-xyz:emacs-markdown-mode)) 77 (home-page git-repository-url) 78 (synopsis "Emacs package for interacting with Discourse forums") 79 (description "Browse categories, view topics, read posts, and 80 participate in discussions directly from Emacs.") 81 (license license:gpl3+)))) 82 83 (define-public emacs-nano-tts-minor-mode 84 (let ((commit "52a3ffa5833bdda79eb36e5048fe97c1b59eb9f2") 85 (base32-string "15lzcd95zadd8wbzl5zdn72rad41mga2qqz34dc0sp8xgfwg3krh") 86 (version "1.0.0") 87 (revision "1") 88 (git-repository-url 89 "https://codeberg.org/kakafarm/emacs-nano-tts-minor-mode")) 90 (package 91 (name "emacs-nano-tts-minor-mode") 92 (version (git-version version revision commit)) 93 (source 94 (origin 95 (method git-fetch) 96 (uri (git-reference 97 (url git-repository-url) 98 (commit commit))) 99 (file-name (git-file-name name version)) 100 (sha256 101 (base32 base32-string)))) 102 (build-system emacs-build-system) 103 (inputs (list espeak-ng)) 104 (home-page git-repository-url) 105 (synopsis 106 "Text-to-speech accessibility tool which reads aloud the active region") 107 (description 108 "A text-to-speech accessibility tool which reads aloud the active region. 109 110 Speaking is done using espeak-ng.") 111 (license license:gpl3+)))) 112 113 (define-public emacs-greader-mode 114 (let ((commit "e163aec6109ba24ec543f087d9be7bf6b6efa389") 115 (revision "1") 116 (git-repository-url 117 "https://gitlab.com/michelangelo-rodriguez/greader")) 118 (package 119 (name "emacs-greader-mode") 120 (version (git-version "0.11.18" revision commit)) 121 (home-page git-repository-url) 122 (source 123 (origin 124 (uri (git-reference 125 (url git-repository-url) 126 (commit commit))) 127 (method git-fetch) 128 (file-name (git-file-name name version)) 129 (sha256 130 (base32 "054jlv1vrb7wbhr0w97xirjwp42mx0k07j7f0383jxsjn08qik5g")))) 131 (build-system emacs-build-system) 132 (arguments 133 (list 134 #:phases #~(modify-phases %standard-phases 135 (add-after 'unpack 'add-requires 136 (lambda _ 137 (substitute* "greader-dict.el" 138 ((";;; Code:") 139 ";;; Code:\n(require 'greader)\n"))))))) 140 (inputs (list espeak-ng)) 141 (synopsis 142 "Gnamù Reader - greader-mode, send buffer contents to a speech engine") 143 (description 144 "Greader is a module that allows you to send any emacs buffer to a TTS. 145 A text-to-speech like engine @code{espeak-ng} or @code{speech-dispatcher} are 146 already supported, plus limited bakend support native to macOS. The 147 mode supports timer reading, automatic scrolling of buffers in modes 148 like @code{info-mode}, repeating reading of regions or the whole buffer, 149 includes a feature to facilitate the compilation of espeak-ng 150 pronunciations, and other features.") 151 (license license:gpl3+)))) 152 153 (define-public emacs-super-duper-yes-or-no 154 (let ((commit "26eeb8655d20c10847437e985f021ab0772e76dd") 155 (revision "1") 156 (git-repository-url 157 "https://codeberg.org/kakafarm/emacs-super-duper-yes-or-no")) 158 (package 159 (name "emacs-super-duper-yes-or-no") 160 (version (git-version "1.0.0" revision commit)) 161 (source 162 (origin 163 (method git-fetch) 164 (uri (git-reference 165 (url git-repository-url) 166 (commit commit))) 167 (file-name (git-file-name name version)) 168 (sha256 169 (base32 "1ksvdac41fq9j6wk9myw6i0z1jp18lp2al95g9nidf6jimazdyxc")))) 170 (build-system emacs-build-system) 171 (home-page git-repository-url) 172 (synopsis "Replace yes-or-no-p with something even more demanding") 173 (description 174 "Instead of replacing yes-or-no-p with y-or-n-p, replace it with 175 something even more mentally demanding. 176 177 Currently implemented: 178 179 - super-duper-yes-or-no-words-p. 180 - super-duper-yes-or-no-toggle-case-p. 181 - super-duper-yes-or-no-arithmetic-problem-p. 182 183 Consult the README.org file or the Emacs help of these functions for 184 more information.") 185 (license license:gpl3+))))