diff options
Diffstat (limited to 'gnu/packages/emacs-xyz.scm')
| -rw-r--r-- | gnu/packages/emacs-xyz.scm | 245 |
1 files changed, 170 insertions, 75 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 222d065db3..9ccacb7e56 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -8490,29 +8490,23 @@ column by drawing a thin line down the length of the editing window.") (license license:gpl3+))) (define-public emacs-greader - (let ((commit "d58c1ee051afe384e23455b7c8b72ee1eae4850f")) ;version bump + (let ((commit "07266f027f9e3d4b690142f525b5bbde2cb4b19e")) ;version bump (package (name "emacs-greader") - (version "0.12.5") + (version "0.12.7") (source (origin (uri (git-reference - (url "https://gitlab.com/michelangelo-rodriguez/greader") - (commit commit))) + (url "https://gitlab.com/michelangelo-rodriguez/greader") + (commit commit))) (method git-fetch) (file-name (git-file-name name version)) (sha256 - (base32 "1wh9xbz4az4b90m2r2ffmrvwlv2ig75bxycmkqghaz4hhx2gkvaz")))) + (base32 "1qg9a3msnh95rj4jmih2j48r8dsisiqd8nlrj1qf3mfl4xr1kb7c")))) (build-system emacs-build-system) (arguments - (list - #:phases #~(modify-phases %standard-phases - (add-after 'unpack 'add-requires - (lambda _ - (substitute* "greader-dict.el" - ((";;; Code:") - ";;; Code:\n(require 'greader)\n"))))))) - (inputs (list espeak-ng)) + (list #:tests? #f)) ;no tests + (inputs (list emacs-compat espeak-ng)) (home-page "https://gitlab.com/michelangelo-rodriguez/greader") (synopsis "Gnamù Reader, or Greader, sends buffer contents to a speech engine") @@ -8521,7 +8515,7 @@ column by drawing a thin line down the length of the editing window.") Text To Speech} engine, such as Espeak-NG or Speech Dispatcher. The mode supports timer reading, automatic scrolling of buffers in modes like -Info mode, and repeating reading of regions or the whole buffer. It also +Info mode, and repeating reading of regions or the whole buffer. It also includes a feature to facilitate the compilation of Espeak-NG pronunciations.") (license license:gpl3+)))) @@ -14171,7 +14165,7 @@ interface.") (define-public emacs-orderless (package (name "emacs-orderless") - (version "1.4") + (version "1.5") (source (origin (method git-fetch) @@ -14179,11 +14173,12 @@ interface.") (url "https://github.com/oantolin/orderless") (commit version))) (sha256 - (base32 "1la91fk322n600h4wnavx7a6rdc44mz4v4gg1fb3cpwjsw746sl8")) + (base32 "0cgklam29vsfrl70n3cqv1dxbsnpzjylfxabfs9v1yz02q27nggv")) (file-name (git-file-name name version)))) (build-system emacs-build-system) (arguments (list + #:tests? #f #:phases #~(modify-phases %standard-phases (add-after 'install 'makeinfo @@ -14194,7 +14189,8 @@ interface.") (native-inputs (list texinfo)) (propagated-inputs (list emacs-compat)) (home-page "https://github.com/oantolin/orderless") - (synopsis "Emacs completion style that matches multiple regexps in any order") + (synopsis + "Emacs completion style that matches multiple regexps in any order") (description "This package provides an orderless completion style that divides the pattern into space-separated components, and matches candidates that match all of the components in any order. Each component can match in @@ -14590,7 +14586,7 @@ expansion and overwriting the marked region with a new snippet completion.") (define-public emacs-marginalia (package (name "emacs-marginalia") - (version "2.0") + (version "2.2") (source (origin (method git-fetch) @@ -14599,21 +14595,20 @@ expansion and overwriting the marked region with a new snippet completion.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "00dzckksfzvwjdy3v1g71nvkxnnpw2bmh8bmhf56qn3nzfj2yr89")))) + (base32 "1grn94v5pidb9wk2vgxx5n3fmhcgx9i14lrwm5clvsvncysy7zhg")))) (build-system emacs-build-system) (arguments (list + #:tests? #f ;no tests #:phases #~(modify-phases %standard-phases - (add-after 'install 'makeinfo + (add-before 'install 'makeinfo (lambda _ (invoke "emacs" "--batch" "--eval=(require 'ox-texinfo)" "--eval=(find-file \"README.org\")" - "--eval=(org-texinfo-export-to-info)") - (install-file "marginalia.info" - (string-append #$output "/share/info"))))))) + "--eval=(org-texinfo-export-to-info)")))))) (native-inputs (list texinfo)) (propagated-inputs (list emacs-compat)) @@ -17693,6 +17688,34 @@ of its name.") names, e.g., @samp{#0000ff} is displayed in white with a blue background.") (license license:gpl3+))) +(define-public emacs-colorful-mode + (package + (name "emacs-colorful-mode") + (version "1.2.4") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/DevelopmentCool2449/colorful-mode") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1cm5bpw2x15h6pf5vxcp2f7jf1rkpnq7qq8idlv9n9p5nnxwik1d")))) + (build-system emacs-build-system) + ;; No automated tests. The test directory contains sample files for + ;; visual inspection. + (arguments (list #:tests? #f)) + (propagated-inputs (list emacs-compat)) + (home-page "https://github.com/DevelopmentCool2449/colorful-mode") + (synopsis "Highlight color strings in buffers") + (description + "@code{colorful-mode} is a minor mode to highlight any color +format, such as hex codes or HTML color names, in buffers in real time. It is +inspired by @code{rainbow-mode} but uses overlays instead of text properties +to support a different feature set. It also supports conversion of color +strings between formats.") + (license license:gpl3+))) + (define-public emacs-indent-bars (package (name "emacs-indent-bars") @@ -20659,7 +20682,7 @@ using a convenient notation.") (let ((commit "c3f4583b0767e7f8c38c83ed29af40af8ba3bdfa")) ;version bump (package (name "emacs-beframe") - (version "1.3.0") + (version "1.4.0") (source (origin (method git-fetch) (uri (git-reference @@ -20672,17 +20695,16 @@ using a convenient notation.") (build-system emacs-build-system) (arguments (list + #:tests? #f ;no tests #:phases #~(modify-phases %standard-phases - (add-after 'install 'makeinfo + (add-before 'install 'makeinfo (lambda _ (invoke "emacs" "--batch" "--eval=(require 'ox-texinfo)" "--eval=(find-file \"README.org\")" - "--eval=(org-texinfo-export-to-info)") - (install-file "beframe.info" - (string-append #$output "/share/info"))))))) + "--eval=(org-texinfo-export-to-info)")))))) (native-inputs (list texinfo)) (home-page "https://protesilaos.com/emacs/beframe") @@ -32489,17 +32511,32 @@ buffer displays recursive dir sizes.") (define-public emacs-dired-preview (package (name "emacs-dired-preview") - (version "0.4.0") - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/protesilaos/dired-preview") - (commit version))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "016g2scl3ifngy67s5dalnywxxj1xdf1mibpqda2zgynx0czvv7l")))) + (version "0.6.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/protesilaos/dired-preview") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0p6v1dx33f7ypi026pp4jjzh81n5vl4gy63cwhql0sbwsbxsz8y9")))) (build-system emacs-build-system) + (arguments + (list + #:test-command + #~(list "ert-runner" "-L" "tests" "tests/dired-preview-test.el") + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'makeinfo + (lambda _ + (invoke "emacs" + "--batch" + "--eval=(require 'ox-texinfo)" + "--eval=(find-file \"README.org\")" + "--eval=(org-texinfo-export-to-info)")))))) + (native-inputs (list emacs-ert-runner texinfo)) (home-page "https://protesilaos.com/emacs/dired-preview") (synopsis "Automatically preview file at point in Dired") (description @@ -32745,32 +32782,30 @@ statistics with the help of @code{tokei}.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 - "0zkl9jkjbx0lmp9ylv4rqg1zwqibk053s4rp7s1h0i18nzk7vn8j")))) + (base32 "0zkl9jkjbx0lmp9ylv4rqg1zwqibk053s4rp7s1h0i18nzk7vn8j")))) (build-system emacs-build-system) - (inputs - (list youtube-dl)) (arguments - `(#:tests? #f ; Error : standard input is not a tty - #:test-command (list "make" "simulate") - #:phases - (modify-phases %standard-phases - (add-after 'unpack 'configure - (lambda* (#:key inputs #:allow-other-keys) - (let ((youtube-dl (assoc-ref inputs "youtube-dl"))) - ;; .el is read-only in git. - (chmod "youtube-dl.el" #o644) - ;; Specify the absolute file names of the various - ;; programs so that everything works out-of-the-box. - (emacs-substitute-variables - "youtube-dl.el" - ("youtube-dl-program" - (string-append youtube-dl "/bin/youtube-dl"))))))))) + (list + #:tests? #f ; Error : standard input is not a tty + #:test-command #~(list "make" "simulate") + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'configure + (lambda* (#:key inputs #:allow-other-keys) + ;; .el is read-only in git. + (chmod "youtube-dl.el" #o644) + ;; Specify the absolute file names of the various + ;; programs so that everything works out-of-the-box. + (emacs-substitute-variables + "youtube-dl.el" + ("youtube-dl-program" + (search-input-file inputs "bin/yt-dlp")))))))) + (inputs (list yt-dlp)) (home-page "https://github.com/skeeto/youtube-dl-emacs/") (synopsis "Emacs youtube-dl download manager") (description "This package manages a video download queue for -@command{youtube-dl}, which serves as the back end. It manages a single -@command{youtube-dl} subprocess, downloading one video at a time. New videos +@command{yt-dlp}, which serves as the back end. It manages a single +@command{yt-dlp} subprocess, downloading one video at a time. New videos can be queued at any time.") (license license:unlicense)))) @@ -32791,27 +32826,28 @@ can be queued at any time.") (base32 "0y62lkgsg19j05dpd6sp6zify8vq8xvpc8caqiy4rwi7p4ahacsf")))) (build-system emacs-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'configure - (lambda* (#:key inputs #:allow-other-keys) - ;; .el is read-only in git. - (make-file-writable "ytdl.el") - ;; Specify the absolute file names of the various programs so - ;; that everything works out-of-the-box. - (emacs-substitute-variables "ytdl.el" - ("ytdl-command" - (search-input-file inputs "/bin/youtube-dl")))))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'configure + (lambda* (#:key inputs #:allow-other-keys) + ;; .el is read-only in git. + (make-file-writable "ytdl.el") + ;; Specify the absolute file names of the various programs so + ;; that everything works out-of-the-box. + (emacs-substitute-variables "ytdl.el" + ("ytdl-command" + (search-input-file inputs "/bin/yt-dlp")))))))) (inputs - (list youtube-dl)) + (list yt-dlp)) (propagated-inputs (list emacs-async emacs-dash)) (home-page "https://gitlab.com/tuedachu/ytdl") (synopsis "Emacs interface for youtube-dl") (description - "This package manages a video download queue for @command{youtube-dl}, + "This package manages a video download queue for @command{yt-dlp}, which serves as the back end. New videos can be queued at any time. All -youtube-dl backends are supported. It is possible to create download profiles +yt-dlp backends are supported. It is possible to create download profiles depending on the downloaded URL.") (license license:gpl3+)))) @@ -37584,6 +37620,65 @@ between \"frame-width\" and \"frame-height\", between \"public\", \"variableN\".") (license license:gpl2+))) +(define-public emacs-recomplete + (let ((commit "0e4a2bad35886e31742117eee3d610e13586ac5e") + (revision "0")) + (package + (name "emacs-recomplete") + (version (git-version "0.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://codeberg.org/ideasman42/emacs-recomplete") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1dasj12k9664s77cxnkbrszy2vkfwd6iz6mrj9xzsq7mjgg5gk58")))) + (build-system emacs-build-system) + (arguments (list #:test-command #~(list "make" "test"))) + (home-page "https://codeberg.org/ideasman42/emacs-recomplete") + (synopsis "Immediate completion, without prompting") + (description + "@code{recomplete} is a completion library for quickly completing or +correcting words in cases where the first candidate is the likely choice. +Unlike most completion, it immediately performs the completion action, calling +again to cycle over options. Completion candidates are displayed in the echo +area.") + (license license:gpl3+)))) + +(define-public emacs-cycle-at-point + (package + (name "emacs-cycle-at-point") + (version "0.2") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://codeberg.org/ideasman42/emacs-cycle-at-point") + (commit "83d94733fd8ed64f2ba40f4e1df7ecbfe8260e51"))) + (file-name (git-file-name name version)) + (sha256 + (base32 "17h93idzdg5y30q46y5njsvixwlq3isnynym6b6gp3sy50xqgjgs")))) + (build-system emacs-build-system) + (arguments + (list + ;; `make test' assumes recomplete repository is in a sibling directory. + #:test-command + #~(list "emacs" "-Q" "--batch" + "-l" "tests/cycle-at-point-tests" + "-f" "ert-run-tests-batch-and-exit"))) + (propagated-inputs (list emacs-recomplete)) + (home-page "https://codeberg.org/ideasman42/emacs-cycle-at-point") + (synopsis "Immediately cycle text at the cursor, without prompting") + (description + "@code{cycle-at-point} provides commands to cycle text at the cursor. +Repeatedly invoke the command to cycle over available options. Completion +candidates are displayed in the echo area. Users can define their own +completion lists. Common use cases include true and false literals, +arithmetic operators, and months of the year.") + (license license:gpl3+))) + (define-public emacs-ediprolog (package (name "emacs-ediprolog") @@ -38539,7 +38634,7 @@ Lisp's (relatively new) EIEIO object oriented libraries.") (define-public emacs-fj (package (name "emacs-fj") - (version "0.17") + (version "0.21") (source (origin (method git-fetch) @@ -38548,7 +38643,7 @@ Lisp's (relatively new) EIEIO object oriented libraries.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "0857h9pkzdmf2cgd3ss4q405n219gfdsfryp6w4mr0mp87dpgz84")))) + (base32 "0pvk69i6nz1gf36labj6cdskw8qsx44hx2z78s2fcvr8z4a345rl")))) (build-system emacs-build-system) (arguments (list #:tests? #f)) ; no tests (propagated-inputs (list emacs-fedi emacs-magit emacs-tp)) |