diff options
author | John Kehayias <john.kehayias@protonmail.com> | 2023-11-11 17:21:39 -0500 |
---|---|---|
committer | John Kehayias <john.kehayias@protonmail.com> | 2023-11-11 17:21:39 -0500 |
commit | 8d0a3bfcdae4bc9dd15e7fb0488dce8f16e8f867 (patch) | |
tree | 77f19aa2370df0e0d9bfc7effd5fd5f982642cef /gnu | |
parent | aee3c5a894fddf88810f18fa8880b423b078b3fa (diff) | |
parent | af6105afc67a15a491a0a4fd18a28c9f801a0b94 (diff) | |
download | guix-8d0a3bfcdae4bc9dd15e7fb0488dce8f16e8f867.tar guix-8d0a3bfcdae4bc9dd15e7fb0488dce8f16e8f867.tar.gz |
Merge branch 'master' into mesa-updates
Change-Id: I6848392e8c1ffca1473bd25511d8d90ae0f98ce7
Diffstat (limited to 'gnu')
31 files changed, 861 insertions, 732 deletions
diff --git a/gnu/local.mk b/gnu/local.mk index a381d28b83..e37336d428 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -1097,7 +1097,6 @@ dist_patch_DATA = \ %D%/packages/patches/elm-reactor-static-files.patch \ %D%/packages/patches/elogind-fix-rpath.patch \ %D%/packages/patches/emacs-all-the-icons-remove-duplicate-rs.patch \ - %D%/packages/patches/emacs-debbugs-keep-patch-subject.patch \ %D%/packages/patches/emacs-deferred-fix-number-of-arguments.patch \ %D%/packages/patches/emacs-elpy-dup-test-name.patch \ %D%/packages/patches/emacs-exec-path.patch \ diff --git a/gnu/packages/aux-files/guix.vim b/gnu/packages/aux-files/guix.vim index 9397c53701..24a6b941a8 100644 --- a/gnu/packages/aux-files/guix.vim +++ b/gnu/packages/aux-files/guix.vim @@ -1,13 +1,8 @@ -" This appends all of the vim plugins to the end of Vim's runtimepath. +" This appends all applicable vim paths to the end of packagepath. Once we +" have told vim the packagepath vim will add it to the runtimepath for us. for directory in ["/run/current-system/profile", $HOME . "/.guix-profile", $HOME ."/.guix-home/profile", $GUIX_PROFILE, $GUIX_ENVIRONMENT] let vimplugins = directory . "/share/vim/vimfiles" if isdirectory(vimplugins) - let &rtp = join([&rtp,vimplugins], ',') + let &pp = join([&pp,vimplugins], ',') endif endfor -" Unconditionally add */after directories last, as intended by upstream -" TODO: Remove duplicate */after directories -for directory in [$VIM . "/vimfiles", $HOME ."/.vim"] - let vimplugins = directory . "/after" - let &rtp = join([&rtp,vimplugins], ',') -endfor diff --git a/gnu/packages/boost.scm b/gnu/packages/boost.scm index 98dccf7f16..71999709ed 100644 --- a/gnu/packages/boost.scm +++ b/gnu/packages/boost.scm @@ -8,7 +8,7 @@ ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2018, 2019, 2021 Ricardo Wurmus <rekado@elephly.net> -;;; Copyright © 2018, 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com> +;;; Copyright © 2018, 2020, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; Copyright © 2018, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019, 2020 Giacomo Leidi <goodoldpaul@autistici.org> @@ -44,6 +44,7 @@ #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (gnu packages) + #:use-module (gnu packages autotools) #:use-module (gnu packages compression) #:use-module (gnu packages icu4c) #:use-module (gnu packages llvm) @@ -445,15 +446,18 @@ signals and slots system.") (define-public mdds (package (name "mdds") - (version "2.0.3") + (version "2.1.1") (source (origin - (method url-fetch) - (uri (string-append "https://kohei.us/files/mdds/src/mdds-" - version ".tar.xz")) - (sha256 - (base32 - "1r68kxqppmhfg0dhz54d0hqzs5882cqrv1x6wpg7lak6gyyws0bc")))) + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/mdds/mdds") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0866020brc1kmiryh7dmhjamnywlsd56ks649hy87283k0p7d3bb")))) (build-system gnu-build-system) + (native-inputs (list autoconf automake)) (propagated-inputs (list boost)) ; inclusion of header files (home-page "https://gitlab.com/mdds/mdds") diff --git a/gnu/packages/browser-extensions.scm b/gnu/packages/browser-extensions.scm index 8ae6fbf497..21c519eda3 100644 --- a/gnu/packages/browser-extensions.scm +++ b/gnu/packages/browser-extensions.scm @@ -57,8 +57,8 @@ supported content to the Kodi media center.") ;; Arbitrary commit of branch master, ;; Update when updating uBlockOrigin. (let* ((name "ublock-main-assets") - (commit "c8783488f377723165e3661062bd124ae6d57165") - (revision "0") + (commit "d93605b8584df8cd47bcc91b3d932feecd9e3a2a") + (revision "1") (version (git-version "0" revision commit))) (origin (method git-fetch) @@ -67,14 +67,14 @@ supported content to the Kodi media center.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 "1b6a1m6s060r49vg563f32rsy057af6i4jcyprym4sdci3z90nls"))))) + (base32 "1bbwxmb5rb1afh6i5a7m1ysaw0022wi5g091vpahi4h805p1s7a2"))))) (define ublock-prod-assets ;; Arbitrary commit of branch gh-pages, ;; Update when updating uBlockOrigin. (let* ((name "ublock-prod-assets") - (commit "fbcfe9229ab6b865ef349c01a4eac73943be8418") - (revision "0") + (commit "1d3df32ef6672763f44b27a95fd5cb3b5770d5e2") + (revision "1") (version (git-version "0" revision commit))) (origin (method git-fetch) @@ -83,12 +83,12 @@ supported content to the Kodi media center.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 "0s5rvaz8lc9lk44yfc8463vah8yppy1ybmag0dpd4m1hyj6165h0"))))) + (base32 "1cbx7w1nzdcjq0z4z7j9nr8922i27nslprrw5dy03xcdqwc3x4l6"))))) (define ublock-origin (package (name "ublock-origin") - (version "1.51.0") + (version "1.53.2") (home-page "https://github.com/gorhill/uBlock") (source (origin (method git-fetch) @@ -98,7 +98,7 @@ supported content to the Kodi media center.") (file-name (git-file-name name version)) (sha256 (base32 - "1i8rnij3sbwg6vj6znprrsca0n5xjzhmhppaa8v6jyxg6wrrfch1")))) + "0mz1k5ghyc25v51md02qx7chrbg4cxagvqi18bcbs4agq8ix6sp7")))) (build-system gnu-build-system) (outputs '("xpi" "firefox" "chromium")) (properties '((addon-id . "uBlock0@raymondhill.net"))) diff --git a/gnu/packages/ccache.scm b/gnu/packages/ccache.scm index 26a71f40ef..a1af25df2b 100644 --- a/gnu/packages/ccache.scm +++ b/gnu/packages/ccache.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014, 2015, 2016, 2018 Eric Bavier <bavier@member.fsf.org> -;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2016, 2017, 2023 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2018–2021 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2021, 2022 Greg Hogan <code@greghogan.com> ;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com> @@ -62,7 +62,11 @@ ;; Tests require a writable HOME. (lambda _ (setenv "HOME" (getenv "TMPDIR"))))))) - (native-inputs (list perl ruby-asciidoctor which)) + (native-inputs + (append (list perl which) + (if (supported-package? ruby-asciidoctor) + (list ruby-asciidoctor) + '()))) (inputs (list zlib `(,zstd "lib"))) (home-page "https://ccache.dev/") (synopsis "Compiler cache") diff --git a/gnu/packages/cluster.scm b/gnu/packages/cluster.scm index 1b38015372..f342d159e1 100644 --- a/gnu/packages/cluster.scm +++ b/gnu/packages/cluster.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2019 Andrew Miloradovsky <andrew@interpretmath.pw> ;;; Copyright © 2020, 2022 Marius Bakke <marius@gnu.org> ;;; Copyright © 2021 Dion Mendel <guix@dm9.info> +;;; Copyright © 2023 Efraim Flashner <efraim@flashner.co.il> ;;; ;;; This file is part of GNU Guix. ;;; @@ -74,14 +75,18 @@ (arguments (list #:configure-flags - #~(list "--sysconfdir=/etc" - "--localstatedir=/var" - ;; Do not install sysv or systemd init scripts. - "--with-initscripttype=none" - ;; Disable support for DRBD 8.3 as it is only for - ;; Linux-Libre versions < 3.8. 8.4 is the latest - ;; kernel driver as of Linux 5.18. - "--without-83support") + #~(append + (list "--sysconfdir=/etc" + "--localstatedir=/var" + ;; Do not install sysv or systemd init scripts. + "--with-initscripttype=none" + ;; Disable support for DRBD 8.3 as it is only for + ;; Linux-Libre versions < 3.8. 8.4 is the latest + ;; kernel driver as of Linux 5.18. + "--without-83support") + #$(if (this-package-native-input "ruby-asciidoctor") + #~'() + #~(list "--without-manual"))) #:test-target "test" #:make-flags #~(list "WANT_DRBD_REPRODUCIBLE_BUILD=yesplease") #:phases @@ -126,16 +131,18 @@ (("\\$\\(DESTDIR\\)\\$\\(DRBD_LIB_DIR\\)") "$(DESTDIR)$(prefix)$(DRBD_LIB_DIR)"))))))) (native-inputs - (list clitest - eudev ;just to satisfy a configure check - flex - ;; For the documentation. - docbook-xml - docbook-xml-4.4 ;used by documentation/ra2refentry.xsl - docbook-xsl - libxml2 ;for XML_CATALOG_FILES - libxslt ;for xsltproc - ruby-asciidoctor)) + (append (list clitest + eudev ;just to satisfy a configure check + flex) + ;; For the documentation. + (if (supported-package? ruby-asciidoctor) + (list docbook-xml + docbook-xml-4.4 ;used by documentation/ra2refentry.xsl + docbook-xsl + libxml2 ;for XML_CATALOG_FILES + libxslt ;for xsltproc + ruby-asciidoctor) + '()))) (home-page "https://www.linbit.com/drbd/") (synopsis "Replicate block devices between machines") (description diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm index 21a9f10a11..f53f7dc9e3 100644 --- a/gnu/packages/code.scm +++ b/gnu/packages/code.scm @@ -237,8 +237,9 @@ highlighting your own code that seemed comprehensible when you wrote it.") (lambda _ ;; Install the plugin files in the right place. (let* ((data (string-append #$output "/share/gtags")) - (vim (string-append #$output - "/share/vim/vimfiles/plugin")) + (vim (string-append + #$output + "/share/vim/vimfiles/pack/guix/start/global/plugin")) (lisp (string-append #$output "/share/emacs/site-lisp/" #$(package-name this-package) "-" #$(package-version this-package)))) diff --git a/gnu/packages/cpp.scm b/gnu/packages/cpp.scm index 0ce60c49de..49e5b52e5f 100644 --- a/gnu/packages/cpp.scm +++ b/gnu/packages/cpp.scm @@ -31,7 +31,7 @@ ;;; Copyright © 2022 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2022, 2023 David Elsing <david.elsing@posteo.net> ;;; Copyright © 2022, 2023 Zheng Junjie <873216071@qq.com> -;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com> +;;; Copyright © 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; Copyright © 2022 Antero Mejr <antero@mailbox.org> ;;; Copyright © 2023 Sughosha <Sughosha@proton.me> ;;; Copyright © 2023 Artyom V. Poptsov <poptsov.artyom@gmail.com> @@ -609,6 +609,47 @@ container which uses the order in which keys were inserted to the container as ordering relation.") (license license:expat))) +(define-public frozen + ;; The test suite fails to compile with the latest 1.1.1 release; use a + ;; newer commit (see: + ;; https://github.com/serge-sans-paille/frozen/issues/163). + (let ((commit "dd1f58c5f6c97fbf0832cc4e84676663839b913e") + (revision "0")) + (package + (name "frozen") + (version (git-version "1.1.1" revision commit)) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/serge-sans-paille/frozen") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "06i307a7v6alxfy24d47b1sjkz5f4mrqwl2vb4j8zx7wlgnrf08b")))) + (build-system cmake-build-system) + (home-page "https://github.com/serge-sans-paille/frozen") + (synopsis "C++ constexpr alternative header-only library") + (description "@code{frozen} is a header-only library that provides zero +cost initialization for immutable containers, fixed-size containers, and +various algorithms. It provides features such as: +@itemize +@item +immutable (also known as frozen), @code{constexpr}-compatible versions of +{std::set}, {std::unordered_set}, {std::map} and {std::unordered_map} +@item +fixed-capacity, @code{constinit}-compatible versions of @code{std::map} and +@code{std::unordered_map} with immutable, compile-time selected keys mapped to +mutable values. +@item +zero cost initialization version of @code{std::search} for frozen needles +using Boyer-Moore or Knuth-Morris-Pratt algorithms. +@end itemize +The @code{unordered_*} containers are guaranteed perfect (no hash +collision) and the extra storage is linear with respect to the number of +keys.") + (license license:asl2.0)))) + (define-public json-dto (package (name "json-dto") diff --git a/gnu/packages/dezyne.scm b/gnu/packages/dezyne.scm index 5e84875a42..1115ee8488 100644 --- a/gnu/packages/dezyne.scm +++ b/gnu/packages/dezyne.scm @@ -32,14 +32,14 @@ (define-public dezyne (package (name "dezyne") - (version "2.17.7") + (version "2.17.8") (source (origin (method url-fetch) (uri (string-append "https://dezyne.org/download/dezyne/" name "-" version ".tar.gz")) (sha256 - (base32 "09w2rl2ghm8z6fv3iflxnikcj2q98119imvlgvkmkhch5cplx7ny")))) + (base32 "0m5cnymcyg7k1jhp4xjpvpay7ia72xdzyjnjg0spsr4p7fy7yql4")))) (inputs (list bash-minimal guile-3.0-latest guile-json-4 diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 57e2716b81..1319c353cb 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -1355,7 +1355,7 @@ its mode line.") (define-public emacs-git-modes (package (name "emacs-git-modes") - (version "1.4.1") + (version "1.4.2") (source (origin (method git-fetch) @@ -1364,7 +1364,7 @@ its mode line.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "0b9fywqwccdvyg1cfnlzl61gq1gryjvzp32cw91l4igv7ppmq684")))) + (base32 "0npwjcm04gg1cy19gsha5m6my9xa0din860gv3h32cx8q3nizjjc")))) (build-system emacs-build-system) (propagated-inputs (list emacs-compat)) @@ -1976,7 +1976,7 @@ Apprentice and Sourcerer.") (define-public emacs-suneater-theme (package (name "emacs-suneater-theme") - (version "2.3.0") + (version "2.4.0") (source (origin (method git-fetch) @@ -1985,7 +1985,7 @@ Apprentice and Sourcerer.") (commit version))) (sha256 (base32 - "19432hb4lkfvip72wrc9nqq5bc10nv0g4547x2sif5iqak43dw72")) + "1j216w9c2psynlsl8gdmnya5a60cyx100ibm15zyyaav75wccn5j")) (file-name (git-file-name name version)))) (build-system emacs-build-system) (home-page "https://git.sr.ht/~plattfot/suneater-theme") @@ -2954,13 +2954,13 @@ and ease-of-key score. Most frequently used commands have most easy keys.") (define-public emacs-xr (package (name "emacs-xr") - (version "1.24") + (version "1.25") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/xr-" version ".tar")) (sha256 - (base32 "04g7qx6qmhp98pw5iwdhspln9sg9jzjq2zp3nmq3q1yl82pzd214")))) + (base32 "0w4gaxypl76d1jw9vcq0zhj7ksj44wyfb148l1fb0vl7h6wpv0pg")))) (build-system emacs-build-system) (home-page "https://elpa.gnu.org/packages/xr.html") (synopsis "Convert string regexp to rx notation") @@ -3117,14 +3117,14 @@ project root.") (define-public emacs-relint (package (name "emacs-relint") - (version "1.23") + (version "1.24") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "relint-" version ".tar")) (sha256 - (base32 "0cyv9hjlyxy1c2394544ljq5d4prhi296y9j2zy6p1lq6irncmv9")))) + (base32 "0wc7jzapzc4s7v7yqwp315ymbs6xighy2clx1ylvf60zs49y2bwm")))) (build-system emacs-build-system) (propagated-inputs (list emacs-xr)) (home-page "https://github.com/mattiase/relint") @@ -3674,20 +3674,21 @@ the @code{Dracula} theme for Emacs and the @code{Gloom} theme for Atom.") (define-public emacs-bbdb (package (name "emacs-bbdb") - (version "3.2.2.2") + (version "3.2.2.4") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "bbdb-" version ".tar")) (sha256 - (base32 "0bf20r5xhxln6z4qp8zrlln0303dkci2ydsr74pxcj08aqgk5xxf")))) + (base32 "13i8ggknc29sny16rq126q0ssz26m3fam0zpdhlsm05pa8dydd7p")))) (build-system emacs-build-system) (arguments ;; XXX: The following file cannot be byte-compiled, because et requires ;; `vm-autoloads', from the VM package, with is neither in Emacs nor ;; packaged in Guix. So, don't bother for now. `(#:exclude '("bbdb-vm\\.el"))) + (inputs (list emacs-notmuch)) (home-page "https://elpa.gnu.org/packages/bbdb.html") (synopsis "Contact management utility for Emacs") (description @@ -4170,14 +4171,14 @@ as a library for other Emacs packages.") (define-public emacs-auctex (package (name "emacs-auctex") - (version "13.2.1") + (version "13.2.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "auctex-" version ".tar")) (sha256 - (base32 "0q914q1qm5w0yx9cqfmyxzbzxmrdkz321cazy7g7l4mc5qndb9nm")))) + (base32 "1k8ypxp2iwg7a0m5lyk1sy5chcnmas0gs6frk6xw6k0r974f193s")))) (build-system emacs-build-system) ;; We use 'emacs' because AUCTeX requires dbus at compile time ;; ('emacs-minimal' does not provide dbus). @@ -5880,7 +5881,7 @@ or if you want to ensure that some modes have no ligatures at all.") (define-public emacs-olivetti (package (name "emacs-olivetti") - (version "2.0.4") + (version "2.0.5") (source (origin (method git-fetch) @@ -5889,7 +5890,7 @@ or if you want to ensure that some modes have no ligatures at all.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "0wc0rki4zvzdxs126g5c8d92h1vfn9slfkdx831rr9d0jx93wc7s")))) + (base32 "1v5f0glp0ggmmzzhaxlijc58w4ip1nlik9lx7rcl6symsqcmqmq1")))) (build-system emacs-build-system) (home-page "https://github.com/rnkn/olivetti") (synopsis "Emacs minor mode for a nice writing environment") @@ -6258,7 +6259,7 @@ files and directories.") (define-public emacs-fountain-mode (package (name "emacs-fountain-mode") - (version "3.6.3") + (version "3.7.1") (source (origin (method git-fetch) @@ -6267,7 +6268,7 @@ files and directories.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "18s1dp2n9q6f3py3f1yc3918yqpncdkwkgi3b3bc2868n6sw0n84")))) + (base32 "1m6xvda2bx5pxzklc0nlzfc9a9fbnvysld2zha59qdjlr9zzi298")))) (arguments (list #:phases #~(modify-phases %standard-phases @@ -6584,7 +6585,7 @@ intended to be.") (define-public emacs-ef-themes (package (name "emacs-ef-themes") - (version "1.3.0") + (version "1.4.0") (source (origin (method git-fetch) @@ -6594,7 +6595,7 @@ intended to be.") (file-name (git-file-name name version)) (sha256 (base32 - "0a52zm9h7nsif5b6ig428d9i0gh8c0qcfyarvsmpv8cwk59iba0z")))) + "029pcca3ppbs22isym2hi3zzynmvk5dg7jcimpm7nd8m4qk46f49")))) (build-system emacs-build-system) (home-page "https://git.sr.ht/~protesilaos/ef-themes") (synopsis "Colorful and legible themes") @@ -6703,20 +6704,18 @@ mode, which displays information about Elasticsearch clusters.") (license license:gpl3+))) (define-public emacs-expand-region - (let ((commit "c5c4362741deebb0985a8a29f9b8b0e25160764a") - (revision "1")) - (package + (package (name "emacs-expand-region") - (version (git-version "0.11.0" revision commit)) + (version "1.0.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/magnars/expand-region.el") - (commit commit))) + (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "17h58v5mnggbrwrp61cwkqx8hzazkdqyz9p6s1hl9g2hys7zkb00")))) + (base32 "0mw1jlgdp17k56rq4g801z7y35h4infm9cy3mh8jw5wqqar5ifa6")))) (build-system emacs-build-system) (home-page "https://github.com/magnars/expand-region.el") (synopsis "Increase selected region by semantic units") @@ -6724,7 +6723,7 @@ mode, which displays information about Elasticsearch clusters.") "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+)))) + (license license:gpl3+))) (define-public emacs-explain-pause-mode (let ((commit "2356c8c3639cbeeb9751744dbe737267849b4b51") @@ -8683,14 +8682,14 @@ user.") (define-public emacs-subed (package (name "emacs-subed") - (version "1.2.4") + (version "1.2.7") (source (origin (method url-fetch) (uri (string-append "https://elpa.nongnu.org/nongnu/subed-" version ".tar")) (sha256 (base32 - "05pnjdrf9gq32bayvbd0yvp1lxpwj2xsarcy3s2jjb6zcgm6djyb")))) + "1rvc17pvig3ihc74d7i25kl3lnigp0h8lh634x0676hdx38h91ib")))) (arguments (list #:tests? #t @@ -8802,15 +8801,14 @@ by a query, so both a link can refer to several mails.") (define-public emacs-debbugs (package (name "emacs-debbugs") - (version "0.36") + (version "0.37") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/debbugs-" version ".tar")) (sha256 - (base32 "1rzv13shadbvy583vjj4zg13v920zpiqrsnn10r3cqqyli89ivn2")) - (patches (search-patches "emacs-debbugs-keep-patch-subject.patch")))) + (base32 "0xj0sv5d3y88fsbm7yhm0v59mzj1srxayng1hr418v89ky43rxpr")))) (build-system emacs-build-system) (arguments '(#:include '("\\.el$" "\\.wsdl$" "\\.info$"))) (propagated-inputs @@ -9019,14 +9017,14 @@ variables, and so on. The mode also allows you to execute Tup commands.") (define-public emacs-compat (package (name "emacs-compat") - (version "29.1.4.2") + (version "29.1.4.3") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "compat-" version ".tar")) (sha256 (base32 - "1njvbvvx2gl10psswb8md2s9diiy476gy4yj6vwips40r0n96l3g")))) + "08lg6jph1hqkamf1fhm5ajwy4klh2a2260llr1z7wlbbq52032k5")))) (build-system emacs-build-system) (home-page "https://git.sr.ht/~pkal/compat") (synopsis "Emacs Lisp Compatibility Library") @@ -9047,14 +9045,14 @@ commands and user options are usually not implemented here.") (define-public emacs-company (package (name "emacs-company") - (version "0.9.13") + (version "0.10.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "company-" version ".tar")) (sha256 - (base32 "1c9x9wlzzsn7vrsm57l2l44nqx455saa6wrm853szzg09qn8dlnw")))) + (base32 "0j2qrnx2w2al4f2n37b89q0pkabh5ccv00gsknvgaylhy0za5gq9")))) (build-system emacs-build-system) (home-page "https://company-mode.github.io/") (synopsis "Modular text completion framework") @@ -9196,7 +9194,7 @@ languages.") (define-public emacs-irony-mode (package (name "emacs-irony-mode") - (version "1.6.0") + (version "1.6.1") (home-page "https://github.com/Sarcasm/irony-mode") (source (origin @@ -9206,7 +9204,7 @@ languages.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "1zwmarjy9lzi57m82dw67aj69cn4nscdgp4fm8glx1krk9xh35hp")))) + (base32 "1w0rd74kjgda7mjbf853yavppkgzdfyw1a2hgskbqbbjii3mr1zy")))) (build-system emacs-build-system) (arguments (list @@ -11517,7 +11515,7 @@ answers.") (define-public emacs-base16-theme (package (name "emacs-base16-theme") - (version "3.1") + (version "3.2") (source (origin (method git-fetch) @@ -11526,7 +11524,7 @@ answers.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "1yq9afvybrgkmn17h22ha9231am7hlh3wccxw7g2ks3g0k5vvds0")))) + (base32 "0mdnm6xam1md9yiy6y14yp59j2864brazqszm7vklgb40xpxaxsq")))) (build-system emacs-build-system) (arguments (list #:include #~(cons "^build\\/.*\\.el$" %default-include) @@ -12566,16 +12564,16 @@ hydras with one column per group of heads."))) (define-public emacs-ivy (package (name "emacs-ivy") - (version "0.14.0") + (version "0.14.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/ivy-" version ".tar")) (sha256 - (base32 "1fzl7xcmxjg005g4676ac3jcshgmcmdr81ywmxvjcs8wj71v56jv")))) + (base32 "1zjksh0jvxyqhzgwmh9i26gaip6c04q400xckh730r2gjs287pjj")))) (build-system emacs-build-system) (propagated-inputs - (list emacs-hydra)) + (list)) (home-page "https://github.com/abo-abo/swiper") (synopsis "Incremental vertical completion for Emacs") (description @@ -12590,17 +12588,17 @@ expression.") (define-public emacs-counsel (package (name "emacs-counsel") - (version "0.14.0") + (version "0.14.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "counsel-" version ".tar")) (sha256 - (base32 "03n1qk66dcbh9xlnlzpwkb441c2xdpfc7bzx4i2szw0xh4a6g5sj")))) + (base32 "13119alyzr2xipk3jra3iawplqkqgvv0gdcm4yd527z592b0s7f0")))) (build-system emacs-build-system) (propagated-inputs - (list emacs-swiper)) + (list emacs-ivy emacs-swiper)) (home-page "https://github.com/abo-abo/swiper") (synopsis "Various completion functions using Ivy") (description @@ -12668,13 +12666,13 @@ the same name.") (define-public emacs-swiper (package (name "emacs-swiper") - (version "0.14.0") + (version "0.14.2") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/swiper-" version ".tar")) (sha256 - (base32 "1p2qil6gj4y8y3ydqs8pbxn8j16q9r42nnc2f61c30hws504pkms")))) + (base32 "1x6jnc0nrk68kww12gq6w8nss6ny76xz0fgxf57550bbipx9pa8m")))) (build-system emacs-build-system) (propagated-inputs (list emacs-ivy)) @@ -13940,7 +13938,7 @@ like @code{org-edit-src-code} but for arbitrary regions.") (define-public emacs-projectile (package (name "emacs-projectile") - (version "2.7.0") + (version "2.8.0") (source (origin (method git-fetch) @@ -13950,7 +13948,7 @@ like @code{org-edit-src-code} but for arbitrary regions.") (file-name (git-file-name name version)) (sha256 (base32 - "0ybd41iss8vd56qv6czpxqq7a99s4h7i3a2r4khy4rf5blj5zdqi")))) + "022ca1185ywmw8pjpkrxkd6d2wp4vbq67x2w724iiw2asy69j7wb")))) (build-system emacs-build-system) (arguments (list @@ -14147,7 +14145,7 @@ much easier.") (define-public emacs-elfeed-protocol (package (name "emacs-elfeed-protocol") - (version "0.9.0") + (version "0.9.1") (source (origin (method git-fetch) @@ -14156,7 +14154,7 @@ much easier.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "0cgq280gxw40vxn2pvax9k5k22gd1kwsjw4yl35206d3mb9wb0fa")))) + (base32 "1n5bns7181j6n603a626jsv26v06s3wm86ml7vixlp234p0frypp")))) (build-system emacs-build-system) (propagated-inputs (list emacs-elfeed)) @@ -15404,9 +15402,9 @@ e.g., the expression you've just evaluated would briefly flash and so on.") (license license:gpl3+)))) (define-public emacs-sly - ;; Update together with sbcl-slynk . - (let ((commit "df62abae73bd511885c9c7ec0ea7ea1469a00923") - (revision "8")) + ;; Update together with sbcl-slynk. + (let ((commit "9c43bf65b967e12cef1996f1af5f0671d8aecbf4") + (revision "9")) ;; Versions are not always tagged. Besides, latest master contains ;; important fixes. (package @@ -15421,7 +15419,7 @@ e.g., the expression you've just evaluated would briefly flash and so on.") (file-name (git-file-name name version)) (sha256 (base32 - "1nxijv52bja6la2i3asq7kklpj5li25454n52sgsc6xnnfvakbsv")))) + "15nyr02ykkws4q79jcmxcawddg8sgq9v5l8k7jv7gg3hnpzxjlb2")))) (build-system emacs-build-system) (native-inputs (list texinfo)) @@ -15730,7 +15728,7 @@ Lua programming language}.") (define-public emacs-ebuild-mode (package (name "emacs-ebuild-mode") - (version "1.67") + (version "1.69") (source (origin (method url-fetch) @@ -15739,7 +15737,7 @@ Lua programming language}.") "ebuild-mode-" version ".tar.xz")) (file-name (string-append name "-" version ".tar.xz")) (sha256 - (base32 "0hbx3vrv2h2vfi45q4mj6z9kqsma530gxjsr5hyd4bj1xnk4gb76")))) + (base32 "1sqyjz4qy07q6wkh89gg4f4s1fk96mv2f99y4rm0sp7gf6bkdj38")))) (build-system emacs-build-system) (arguments (list @@ -16418,7 +16416,7 @@ passive voice.") (define-public emacs-org (package (name "emacs-org") - (version "9.6.9") + (version "9.6.11") (source (origin (method git-fetch) @@ -16427,7 +16425,7 @@ passive voice.") (commit (string-append "release_" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "1j1bv6pz8s15ymr1mzrsb465vv39qmd6sb5cjq3sb9c0nzm1mzif")))) + (base32 "167cnc7iq5i278a7rph2rs9dhxb5anckzjz5d4anbkghzk48qa9x")))) (build-system emacs-build-system) (arguments (list @@ -17335,14 +17333,14 @@ customizable by the user.") (define-public emacs-zones (package (name "emacs-zones") - (version "2019.7.13") + (version "2023.6.11") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" - "zones-" version ".el")) + "zones-" version ".tar")) (sha256 - (base32 "0qp1ba2pkqx9d35g7z8hf8qs2k455krf2a92l4rka3ipsbnmq5k1")))) + (base32 "1znz720s9pchc7r9g1mpz9jcnz122bppimmh09g1rn94fh3m6vm3")))) (build-system emacs-build-system) (home-page "https://www.emacswiki.org/emacs/Zones") (synopsis "Define and act on multiple zones of buffer text") @@ -19449,7 +19447,7 @@ more information.") (define-public emacs-jarchive (package (name "emacs-jarchive") - (version "0.10.0") + (version "0.11.0") (source (origin (method git-fetch) (uri (git-reference @@ -19458,7 +19456,7 @@ more information.") (file-name (git-file-name name version)) (sha256 (base32 - "1hddjs4yj03cqppip1gsgmkhp3fmq9ggyf5wxx5k3m78cg7k1bl7")))) + "1v8a2bbjgkn95pxq8x9251znj03m5n0f6bngbf4a63pxa2il3r8n")))) (build-system emacs-build-system) (home-page "https://sr.ht/~dannyfreeman/jarchive") (synopsis "Jarchive teaches Emacs how to navigate to files inside JARs") @@ -22283,26 +22281,29 @@ protocol for PureScript programming language. It features: (license license:gpl3+)))) (define-public emacs-evil-anzu - (package - (name "emacs-evil-anzu") - (version "0.03") - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/syohex/emacs-evil-anzu") - (commit version))) - (file-name (git-file-name name version)) - (sha256 - (base32 "0lw7fg4gqwj30r0l6k2ni36sxqkf65zf0d0z3rxnpwbxlf8dlkrr")))) - (build-system emacs-build-system) - (propagated-inputs - (list emacs-evil emacs-anzu)) - (home-page "https://github.com/syohex/emacs-evil-anzu") - (synopsis "Anzu for evil-mode") - (description "@code{anzu} provides a minor mode that displays the current + ;; No release since January 2015 + (let ((commit "d1e98ee6976437164627542909a25c6946497899") + (revision "0")) + (package + (name "emacs-evil-anzu") + (version (git-version "0.03" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/emacsorphanage/evil-anzu") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1i8f360lq5a32knkzbwdw10ql9cxsmgfd4iiwnr7vcwacm34zq88")))) + (build-system emacs-build-system) + (propagated-inputs (list emacs-evil emacs-anzu)) + (home-page "https://github.com/emacsorphanage/evil-anzu") + (synopsis "Anzu for evil-mode") + (description + "@code{anzu} provides a minor mode that displays the current match and total match information in the mode-line in various search modes.") - (license license:gpl3+))) + (license license:gpl3+)))) (define-public emacs-pg (package @@ -22920,7 +22921,7 @@ according to a parsing expression grammar.") (define-public emacs-eldev (package (name "emacs-eldev") - (version "1.6") + (version "1.7") (source (origin (method git-fetch) @@ -22929,7 +22930,7 @@ according to a parsing expression grammar.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "0m2d607hprkl1pdapxsfjwag7plf822ig59qb6jjzy9m7gwg21k5")))) + (base32 "1q30r6di3r8dxxfbxfyii7kfvjj83c16bxx8ixadki3ix6imd6l5")))) (build-system emacs-build-system) (arguments (list @@ -22942,12 +22943,9 @@ according to a parsing expression grammar.") (setenv "ELDEV_LOCAL" (getcwd)) (make-file-writable "test/project-i/project-i-autoloads.el"))) (add-after 'unpack 'skip-failing-tests - ;; FIXME: 3 tests are failing. Skip them for now. + ;; FIXME: 2 tests are failing. Skip them for now. (lambda _ - (delete-file "test/upgrade-self.el") - (substitute* "test/doctor.el" - (("\\(ert-deftest eldev-doctor-up-to-date-copyright-2 .*" all) - (string-append all "(skip-unless nil)\n"))))) + (delete-file "test/upgrade-self.el"))) (add-after 'install 'install-eldev-executable ;; This constructs the eldev executable from templates and ;; installs it in the specified directory. @@ -23012,15 +23010,15 @@ interactive commands and functions, such as @code{completing-read}.") (define-public emacs-org-ql (package (name "emacs-org-ql") - (version "0.7.2") + (version "0.7.3") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/alphapapa/org-ql") - (commit version))) + (commit (string-append "v" version)))) (sha256 (base32 - "1nxjhk0yd0njlscnxvsxnlf1wy6027spcaks64qgvnrzzq9vnzrj")) + "1jdkk837z8fw2dff5v8fh2dhx7rz348sf5jqpj2aja5ji48p0fs9")) (file-name (git-file-name name version)))) (build-system emacs-build-system) (arguments @@ -23137,7 +23135,7 @@ files to be expanded upon opening them.") (define-public emacs-ebib (package (name "emacs-ebib") - (version "2.39.3") + (version "2.39.4") (source (origin (method git-fetch) @@ -23146,7 +23144,7 @@ files to be expanded upon opening them.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "1azgsjf5j8k6llq74brykidcb2mnq6fghk8jyq7qad5afh7n0mrc")))) + (base32 "08j6z4rpnvz7vhdrm7y3prf2jpxclqicid6as4qljysq3czzfhay")))) (build-system emacs-build-system) (propagated-inputs (list emacs-biblio emacs-ivy emacs-parsebib)) @@ -23193,7 +23191,7 @@ automatically fetched from well-curated sources, and formatted as BibTeX.") (define-public emacs-citar (package (name "emacs-citar") - (version "1.3.1") + (version "1.4.0") (source (origin (method git-fetch) (uri (git-reference @@ -23202,7 +23200,7 @@ automatically fetched from well-curated sources, and formatted as BibTeX.") (file-name (git-file-name name version)) (sha256 (base32 - "12chdrmkggnpci1kdkkrz4a2bnsbzc8pra318zbnn3qxinlpngyy")))) + "07q94iplkx29lggrs5xfzj42rxfcn2cnbr90jgifk29jshcz30pv")))) (build-system emacs-build-system) (arguments (list @@ -23215,7 +23213,10 @@ automatically fetched from well-curated sources, and formatted as BibTeX.") #:phases #~(modify-phases %standard-phases (add-before 'build 'set-home (lambda _ - (setenv "HOME" "/tmp")))))) + (setenv "HOME" "/tmp"))) + ;; XXX: The following phase reports bogus errors. Suppress + ;; it for now. + (delete 'validate-compiled-autoloads)))) (propagated-inputs (list emacs-auctex emacs-citeproc-el emacs-embark @@ -26174,11 +26175,10 @@ be changed by customizing the appropriate variables.") (license license:gpl3+))) (define-public emacs-org-caldav - (let ((commit "8569941a0a5a9393ba51afc8923fd7b77b73fa7a") - (revision "2")) + (let ((commit "754989ae500b3f576bdb94fe2ef3059f12eaf7d7")) ;version bump (package (name "emacs-org-caldav") - (version (git-version "0.0.0" revision commit)) + (version "3.0") (source (origin (method git-fetch) @@ -26187,7 +26187,7 @@ be changed by customizing the appropriate variables.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 "05lgxqaffnqaqnzl24frafdkskran88hl2ml05qvyjhs4jjbgw9g")))) + (base32 "0vx465di6imfxmxxkhd8lsdgywyz3gnindg0fyvb2zshg3zz80bg")))) (build-system emacs-build-system) (arguments ;; Tests require to have two specific calendars on a test server. @@ -26566,7 +26566,7 @@ tracking.") (define-public emacs-helm-company (package (name "emacs-helm-company") - (version "0.2.5") + (version "0.2.7") (source (origin (method git-fetch) @@ -26576,20 +26576,19 @@ tracking.") (file-name (git-file-name name version)) (sha256 (base32 - "1ci37w6ahnqrfpb284gjvxmimlf61sdxb9k192yy9q983cksv2hx")))) + "0zg878i48kmgw9lj772c3kx5v13k9k2afz98j65jx2bjbcm9f338")))) (build-system emacs-build-system) (propagated-inputs (list emacs-helm emacs-company)) (native-inputs (list emacs-ert-runner)) (arguments - `(#:tests? #t - #:test-command '("ert-runner"))) + (list #:tests? #t + #:test-command #~(list "ert-runner"))) (home-page "https://github.com/Sodel-the-Vociferous/helm-company") - (synopsis "Helm interface for company-mode") + (synopsis "Helm interface for Company mode") (description - "This is a Helm interface to company-mode, a text completion -framework.") + "This is a Helm interface to Company mode, a text completion framework.") (license license:gpl3+))) (define-public emacs-helm-descbinds @@ -26831,7 +26830,7 @@ image, rotate it, save modified images, and more.") (define-public emacs-package-lint (package (name "emacs-package-lint") - (version "0.19") + (version "0.20") (source (origin (method git-fetch) @@ -26841,10 +26840,11 @@ image, rotate it, save modified images, and more.") (file-name (git-file-name name version)) (sha256 (base32 - "0afqvsqz5rx39k7k84ffcnf97px8ckmdgq23w19gdxxnzh7vv87z")))) + "1v12l8mbsrgkq5rmgzypkiabhfrd5cq6nrnmsairnpw8rrz4w739")))) (arguments - '(#:include (cons "^data/" %default-include))) + (list #:include #~(cons "^data/" %default-include))) (build-system emacs-build-system) + (propagated-inputs (list emacs-compat)) (home-page "https://github.com/purcell/package-lint") (synopsis "Linting library for Elisp package authors") (description @@ -28125,16 +28125,16 @@ and comments.") (define-public emacs-yeetube (package (name "emacs-yeetube") - (version "2.0.5") + (version "2.0.7") (source (origin (method git-fetch) (uri (git-reference - (url "https://git.thanosapollo.com/yeetube") + (url "https://git.thanosapollo.org/yeetube") (commit version))) (sha256 (base32 - "1pb6pb624icnjp7210vqrxj4sb38kydfaxc88bj1xmk1dh332h1k")) + "05w33431dfr1ldcg3yq01qvz0alpv8q88r0dsb278qbwszw9cfz6")) (file-name (git-file-name name version)))) (build-system emacs-build-system) (arguments @@ -28163,40 +28163,41 @@ This package also includes a @code{yt-dlp} front-end.") (define-public emacs-org-web-tools (package (name "emacs-org-web-tools") - (version "1.1.1") + (version "1.2") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/alphapapa/org-web-tools") - (commit version))) + (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 (base32 - "0v4qad54r0z7dr7kg5lpfdsazi44qvrbybx9aciyl4w9grfajphb")))) + "1w24d1cxzgjqycqz894kg3707n3ckwpv5cmbywfaffsz1v5i2p3a")))) (build-system emacs-build-system) (propagated-inputs - (list emacs-dash emacs-esxml emacs-request emacs-s)) + (list emacs-compat emacs-dash emacs-esxml emacs-request emacs-s)) (inputs (list pandoc)) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-exec-paths - (lambda* (#:key inputs #:allow-other-keys) - (let ((pandoc (assoc-ref inputs "pandoc"))) - (substitute* "org-web-tools.el" - (("\"pandoc\"") (string-append "\"" pandoc "/bin/pandoc\""))) - #t)))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-exec-paths + (lambda* (#:key inputs #:allow-other-keys) + (let ((pandoc (search-input-file inputs "/bin/pandoc"))) + (substitute* "org-web-tools.el" + (("\"pandoc\"") (string-append "\"" pandoc "\""))))))))) (home-page "https://github.com/alphapapa/org-web-tools") - (synopsis "Display/Process web page as Org-mode content") - (description "This package contains library functions and commands useful -for retrieving web page content and processing it into Org-mode content. - -For example, you can copy a URL to the clipboard or kill-ring, then run a -command that downloads the page, isolates the “readable” content with -@command{eww-readable}, converts it to Org-mode content with Pandoc, and -displays it in an Org-mode buffer. Another command does all of that but + (synopsis "Display/Process web page as Org mode content") + (description + "This package contains library functions and commands useful +for retrieving web page content and processing it into Org mode content. + +For example, you can copy a URL to the clipboard or kill-ring, then run +a command that downloads the page, isolates the ``readable'' content with +@command{eww-readable}, converts it to Org mode content with Pandoc, and +displays it in an Org mode buffer. Another command does all of that but inserts it as an Org entry instead of displaying it in a new buffer.") (license license:gpl3+))) @@ -30545,7 +30546,7 @@ real search.") (define-public emacs-notmuch-indicator (package (name "emacs-notmuch-indicator") - (version "1.0.1") + (version "1.1.0") (home-page "https://git.sr.ht/~protesilaos/notmuch-indicator") (source (origin (method url-fetch) @@ -30554,7 +30555,7 @@ real search.") ".tar")) (sha256 (base32 - "1n5k2ikk93mdwqqysf6l7gd8i6iazk8yvbqpf8xnz5zny248cc2x")))) + "0k5csfrs8y1r6g7hs2y0961jpx0ih090kb6rkijljny2qhfj0573")))) (build-system emacs-build-system) (synopsis "Display a mode line indicator with @code{notmuch-count} output") (description "This package renders an indicator with an email count of the @@ -32045,14 +32046,14 @@ well as an option for visually flashing evaluated s-expressions.") (define-public emacs-tramp (package (name "emacs-tramp") - (version "2.6.1.3") + (version "2.6.1.4") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" "tramp-" version ".tar")) (sha256 - (base32 "0z7q55yilwicgzl2m69r275pq6bzpyksxcjaf8fb3bcr3zvzil0y")))) + (base32 "1ajlx0982hx6ypby9dvw1yh9zyl1h4j9xp4n9rfzxhfvvq3139bi")))) (build-system emacs-build-system) (arguments (list @@ -32416,14 +32417,14 @@ advice system without dropping support for Emacs<24.4.") (define-public emacs-url-http-ntlm (package (name "emacs-url-http-ntlm") - (version "2.0.4") + (version "2.0.5") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/" - "url-http-ntlm-" version ".el")) + "url-http-ntlm-" version ".tar")) (sha256 - (base32 "1cakq2ykraci7d1gl8rnpv4f2f5ffyaidhqb1282g7i72adwmb98")))) + (base32 "0bpjif0c4yzz75v59wsv7hilkpj2gv4kyc0rdk8h3d9hvmlq7791")))) (build-system emacs-build-system) (propagated-inputs (list emacs-ntlm)) (home-page "https://elpa.gnu.org/packages/url-http-ntlm.html") @@ -33992,11 +33993,11 @@ other @code{helm-type-file} sources such as @code{helm-locate}.") (license license:gpl3+))) (define-public emacs-telega-server - (let ((commit "17bfa50c8f2e70daeb8866f3bf195f15623ab520") - (revision "1")) + (let ((commit "4f08c835c08e762137ca04e12055cf9dc0b2b8cf") + (revision "0")) (package (name "emacs-telega-server") - (version (git-version "0.8.03" revision commit)) + (version (git-version "0.8.203" revision commit)) (source (origin (method git-fetch) @@ -34004,7 +34005,7 @@ other @code{helm-type-file} sources such as @code{helm-locate}.") (url "https://github.com/zevlg/telega.el") (commit commit))) (sha256 - (base32 "1057zr4g8llxmzy47l5klyi89x66q8qx5vrd50pmpsp4c6772jz9")) + (base32 "02iv2cxwsmfpx2b6wvp7l22izvqw21f1b98jm0yihmfh39idxwn8")) (file-name (git-file-name "emacs-telega" version)) (patches (search-patches "emacs-telega-path-placeholder.patch" @@ -35027,14 +35028,14 @@ example code.") (define-public emacs-buffer-env (package (name "emacs-buffer-env") - (version "0.4") + (version "0.5") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/buffer-env-" version ".tar")) (sha256 (base32 - "0y8ik87dqldhn6q631zp2ln9z5byqgm9icrvr4xrdx6g8mr9c56z")))) + "17q0flxp0rp52ksyh5ijcamvvm003icbyzv28r6vknrw3qsphb3p")))) (build-system emacs-build-system) (propagated-inputs (list emacs-compat)) (home-page "https://github.com/astoff/buffer-env") @@ -37066,7 +37067,7 @@ and preferred services can easily be configured.") (define-public emacs-ivy-avy (package (name "emacs-ivy-avy") - (version "0.14.0") + (version "0.14.2") (source (origin (method url-fetch) @@ -37074,7 +37075,7 @@ and preferred services can easily be configured.") "https://elpa.gnu.org/packages/" "ivy-avy-" version ".tar")) (sha256 - (base32 "0gjpvjahhkxsakqrcni78v71fsrh3f0jrs55a4kqc5hv6qyn8hk9")))) + (base32 "0vdrfn2i078567lklhxfhzq2cjplfpawyq2rzpdpww0fzz6fi426")))) (build-system emacs-build-system) (propagated-inputs (list emacs-ivy emacs-avy)) @@ -37158,7 +37159,7 @@ files, providing syntax highlighting and indentation rules.") (define-public emacs-ivy-hydra (package (name "emacs-ivy-hydra") - (version "0.14.0") + (version "0.14.2") (source (origin (method url-fetch) @@ -37166,7 +37167,7 @@ files, providing syntax highlighting and indentation rules.") "https://elpa.gnu.org/packages/" "ivy-hydra-" version ".tar")) (sha256 - (base32 "1gsjr2yny9qcj56cb4xy47la11z0lszq0f2qws0yzyh02ng30k1n")))) + (base32 "10qav0rvgc5bnlazjiwnv9dlk6hivl4acif0zq2f0qqgld9nh528")))) (build-system emacs-build-system) (propagated-inputs (list emacs-ivy emacs-hydra)) @@ -37909,7 +37910,7 @@ hacker.") (define-public emacs-osm (package (name "emacs-osm") - (version "0.13") + (version "0.14") (source (origin (method git-fetch) (uri (git-reference @@ -37918,7 +37919,7 @@ hacker.") (file-name (git-file-name name version)) (sha256 (base32 - "0i1lks8724i2nz9jk5csl4nfkyi49fc928a117sn7438z82r9gyr")))) + "1y0zkfc27pnhz5hqpapsqin2kc6al1zjgd6cd4nhzqmh49h81bsb")))) (build-system emacs-build-system) (arguments (list #:phases #~(modify-phases %standard-phases diff --git a/gnu/packages/geo.scm b/gnu/packages/geo.scm index a33d446201..dbc8440141 100644 --- a/gnu/packages/geo.scm +++ b/gnu/packages/geo.scm @@ -1940,7 +1940,7 @@ to the OSM opening hours specification.") (define-public josm (package (name "josm") - (version "18646") + (version "18822") (source (origin (method svn-fetch) (uri (svn-reference @@ -1949,7 +1949,7 @@ to the OSM opening hours specification.") (recursive? #f))) (sha256 (base32 - "0zr3p1i39wi0f29lgb3xrnv6lijrq5ia8jxn4wnq1yz0xdlbg98i")) + "0b4q6n3jbqrh7dsfmcf2g0xdd1wjj62sjq8lwvggvrpqlk1fyn1b")) (file-name (string-append name "-" version "-checkout")) (modules '((guix build utils))) (snippet @@ -1963,17 +1963,18 @@ to the OSM opening hours specification.") (list java-commons-jcs java-commons-compress java-jmapviewer - java-jsonp-api - java-jsonp-impl ; runtime dependency + java-jakarta-json java-jsr305 java-metadata-extractor java-opening-hours-parser java-openjfx-media + java-parsson ; runtime dependency java-signpost-core java-svg-salamander)) (arguments `(#:tests? #f #:jar-name "josm.jar" + #:jdk ,openjdk11 #:phases (modify-phases %standard-phases (add-after 'unpack 'rm-build.xml diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm index ac427b8eaa..7c8c4e0a36 100644 --- a/gnu/packages/java.scm +++ b/gnu/packages/java.scm @@ -880,7 +880,14 @@ new Date();")) (build-system gnu-build-system) (outputs '("out" "jdk" "doc")) (arguments - `(#:tests? #f; require jtreg + `(#:imported-modules + ((guix build ant-build-system) + ,@%gnu-build-system-modules) + #:modules + ((guix build utils) + (guix build gnu-build-system) + (ice-9 popen)) + #:tests? #f; require jtreg #:make-flags '("all") #:disallowed-references ,(list (gexp-input icedtea-8) (gexp-input icedtea-8 "jdk")) @@ -973,6 +980,80 @@ new Date();")) (find-files "." "\\.c$|\\.h$")) #t))) + ;; By default OpenJDK only generates an empty keystore. In order to + ;; be able to use certificates in Java programs we need to generate a + ;; keystore from a set of certificates. For convenience we use the + ;; certificates from the nss-certs package. + (add-after 'install 'install-keystore + (lambda* (#:key inputs outputs #:allow-other-keys) + (use-modules (ice-9 rdelim)) + (let* ((keystore "cacerts") + (certs-dir (search-input-directory inputs + "etc/ssl/certs")) + (keytool (string-append (assoc-ref outputs "jdk") + "/bin/keytool"))) + (define (extract-cert file target) + (call-with-input-file file + (lambda (in) + (call-with-output-file target + (lambda (out) + (let loop ((line (read-line in 'concat)) + (copying? #f)) + (cond + ((eof-object? line) #t) + ((string-prefix? "-----BEGIN" line) + (display line out) + (loop (read-line in 'concat) #t)) + ((string-prefix? "-----END" line) + (display line out) + #t) + (else + (when copying? (display line out)) + (loop (read-line in 'concat) copying?))))))))) + (define (import-cert cert) + (format #t "Importing certificate ~a\n" (basename cert)) + (let ((temp "tmpcert")) + (extract-cert cert temp) + (let ((port (open-pipe* OPEN_WRITE keytool + "-import" + "-alias" (basename cert) + "-keystore" keystore + "-storepass" "changeit" + "-file" temp))) + (display "yes\n" port) + (when (not (zero? (status:exit-val (close-pipe port)))) + (format #t "failed to import ~a\n" cert))) + (delete-file temp))) + + ;; This is necessary because the certificate directory contains + ;; files with non-ASCII characters in their names. + (setlocale LC_ALL "en_US.utf8") + (setenv "LC_ALL" "en_US.utf8") + + (copy-file (string-append (assoc-ref outputs "out") + "/lib/security/cacerts") + keystore) + (chmod keystore #o644) + (for-each import-cert (find-files certs-dir "\\.pem$")) + (mkdir-p (string-append (assoc-ref outputs "out") + "/lib/security")) + (mkdir-p (string-append (assoc-ref outputs "jdk") + "/lib/security")) + + ;; The cacerts files we are going to overwrite are chmod'ed as + ;; read-only (444) in icedtea-8 (which derives from this + ;; package). We have to change this so we can overwrite them. + (chmod (string-append (assoc-ref outputs "out") + "/lib/security/" keystore) #o644) + (chmod (string-append (assoc-ref outputs "jdk") + "/lib/security/" keystore) #o644) + + (install-file keystore + (string-append (assoc-ref outputs "out") + "/lib/security")) + (install-file keystore + (string-append (assoc-ref outputs "jdk") + "/lib/security"))))) ;; Some of the libraries in the lib/ folder link to libjvm.so. ;; But that shared object is located in the server/ folder, so it ;; cannot be found. This phase creates a symbolic link in the @@ -1046,6 +1127,7 @@ new Date();")) ("icedtea-8:jdk" ,icedtea-8 "jdk") ;; XXX: The build system fails with newer versions of GNU Make. ("make@4.2" ,gnu-make-4.2) + ("nss-certs" ,nss-certs) ("unzip" ,unzip) ("which" ,which) ("zip" ,zip))) @@ -1128,6 +1210,7 @@ new Date();")) `(("openjdk9" ,openjdk9) ("openjdk9:jdk" ,openjdk9 "jdk") ("make@4.2" ,gnu-make-4.2) + ("nss-certs" ,nss-certs) ("unzip" ,unzip) ("which" ,which) ("zip" ,zip))))) @@ -1154,6 +1237,7 @@ new Date();")) #:modules `((guix build gnu-build-system) (guix build utils) (ice-9 match) + (ice-9 popen) (srfi srfi-1) (srfi srfi-26)) #:disallowed-references (list (gexp-input openjdk10) @@ -1396,6 +1480,7 @@ new Date();")) openjdk10 `(,openjdk10 "jdk") gnu-make-4.2 + nss-certs pkg-config unzip which @@ -13570,6 +13655,70 @@ and allows building a Java object model for JSON text using API classes parse, generate, transform and query) JSON messages. This package contains a reference implementation of that API."))) +(define-public java-jakarta-json + (package + (name "java-jakarta-json") + (version "2.1.3") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/jakartaee/jsonp-api") + (commit (string-append version "-RELEASE")))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1q600harqfhlf763l75j4fx7ai7ybp7ga06aiky2a2hg8mhz0s5f")))) + (build-system ant-build-system) + (arguments + `(#:jar-name "jakarta-json.jar" + #:source-dir "api/src/main/java" + #:tests? #f; no tests + #:jdk ,openjdk11)) + (home-page "https://github.com/jakartaee/jsonp-api") + (synopsis "Portable API for JSON handling in Java") + (description "This project contains API and Compatible Implementation of +Jakarta JSON Processing specification. Jakarta JSON Processing provides +portable APIs to parse, generate, transform, and query JSON documents.") + ;; with classpath exception + (license license:epl2.0))) + +(define-public java-parsson + (package + (name "java-parsson") + (version "1.1.5") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/eclipse-ee4j/parsson") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "06vvr6qv1ihnk212gdxg4x0sd61lgxk7wf062s7gym5k2h7fms0p")))) + (build-system ant-build-system) + (arguments + `(#:jar-name "parsson.jar" + #:source-dir "impl/src/main/java" + #:test-dir "impl/src/test" + #:use-java-modules? #t + #:jdk ,openjdk11 + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'copy-resources + (lambda _ + (copy-recursively "impl/src/main/resources" + "build/classes")))))) + (inputs + (list java-jakarta-json)) + (native-inputs + (list java-junit)) + (home-page "https://github.com/eclipse-ee4j/parsson") + (synopsis "Implementation of Jakarta JSON API") + (description "Eclipse Parsson is an implementation of the Jakarta JSON +Processing specification.") + ;; with classpath exception + (license license:epl2.0))) + (define-public java-xmp (package (name "java-xmp") diff --git a/gnu/packages/libreoffice.scm b/gnu/packages/libreoffice.scm index 71131ca1f3..79b30cecaf 100644 --- a/gnu/packages/libreoffice.scm +++ b/gnu/packages/libreoffice.scm @@ -14,6 +14,7 @@ ;;; Copyright © 2019 Chris Marusich <cmmarusich@gmail.com> ;;; Copyright © 2020 Marcin Karpezo <sirmacik@wioo.waw.pl> ;;; Copyright © 2023 Nicolas Graves <ngraves@ngraves.fr> +;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -50,6 +51,7 @@ #:use-module (gnu packages boost) #:use-module (gnu packages check) #:use-module (gnu packages compression) + #:use-module (gnu packages cpp) #:use-module (gnu packages cups) #:use-module (gnu packages curl) #:use-module (gnu packages cyrus-sasl) @@ -92,20 +94,19 @@ (define-public ixion (package (name "ixion") - (version "0.17.0") - (source - (origin - (method url-fetch) - (uri (string-append "http://kohei.us/files/ixion/src/libixion-" - version ".tar.xz")) - (sha256 - (base32 - "07hhqkvns4da8xv990gr1smqz1zf40m531lg95nphfrz48wp3jak")))) + (version "0.19.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/ixion/ixion") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0nycbs3765wkaw9ff7aflm56ayxkn15dlfl5pbbb9b5i2rcv3dq6")))) (build-system gnu-build-system) - (native-inputs - (list pkg-config)) - (inputs - (list mdds python spdlog)) + (native-inputs (list autoconf automake libtool pkg-config)) + (inputs (list mdds python spdlog)) (home-page "https://gitlab.com/ixion/ixion") (synopsis "General purpose formula parser and interpreter") (description "Ixion is a library for calculating the results of formula @@ -117,22 +118,22 @@ their dependencies automatically upon calculation.") (define-public orcus (package (name "orcus") - (version "0.17.2") - (source - (origin - (method url-fetch) - (uri (string-append "http://kohei.us/files/orcus/src/lib" - "orcus-" version ".tar.xz")) - (sha256 - (base32 - "1as04qb74jnlnwy4wh5jwaw2nnzgn2s3230ymvh3kx1w9r0rsl1h")))) + (version "0.19.0") + (source (origin + ;; The test suite requires data files store with Git Large + ;; File Storage. + (method git-fetch/lfs) + (uri (git-reference + (url "https://gitlab.com/orcus/orcus") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "02prj6kgph56fkr89k8wlqarrmx65cq92863i4rrny5sqr8c2llr")))) (build-system gnu-build-system) - (arguments - `(#:configure-flags '("--disable-static"))) - (native-inputs - (list pkg-config)) - (inputs - (list ixion mdds python zlib)) + (arguments (list #:configure-flags #~(list "--disable-static"))) + (native-inputs (list autoconf automake libtool pkg-config)) + (inputs (list ixion mdds python zlib)) (home-page "https://gitlab.com/orcus/orcus") (synopsis "File import filter library for spreadsheet documents") (description "Orcus is a library that provides a collection of standalone @@ -353,7 +354,7 @@ working with graphics in the WPG (WordPerfect Graphics) format.") (name "libcmis") ;; Note: Use an unreleased version because libreoffice requires it and ;; is the only user (see <https://github.com/tdf/libcmis/pull/43>). - (version "0.5.2-46-gf264a61") + (version "0.6.0") (home-page "https://github.com/tdf/libcmis") (source (origin @@ -363,7 +364,7 @@ working with graphics in the WPG (WordPerfect Graphics) format.") (file-name (git-file-name name version)) (sha256 (base32 - "06ff5vw0xrymvvna18wlaayyk20755sk2541i1gh7zpbmncs2ni6")))) + "17jx9fb7nmyp6jhz9nlmb3wcp8k03vhcv7sqql6a7jhsjnw3hq0k")))) (build-system gnu-build-system) (native-inputs (list autoconf automake libtool cppunit pkg-config)) @@ -897,7 +898,7 @@ commonly called @code{ftoa} or @code{dtoa}.") (define-public libreoffice (package (name "libreoffice") - (version "7.5.4.2") + (version "7.6.3.1") (source (origin (method url-fetch) @@ -906,7 +907,7 @@ commonly called @code{ftoa} or @code{dtoa}.") "https://download.documentfoundation.org/libreoffice/src/" (version-prefix version 3) "/libreoffice-" version ".tar.xz")) (sha256 - (base32 "1s3592ick745kl60yjlv7ki3p7nnwswj0mgjh3nk6k7skyvx3fv8")))) + (base32 "148084acq370483y0xwvcvck30kxhr78cnmibp5lks17xqp5f9q7")))) (build-system glib-or-gtk-build-system) (arguments (list @@ -1088,6 +1089,7 @@ commonly called @code{ftoa} or @code{dtoa}.") (list bison cppunit flex + frozen ;header-only library pkg-config python-wrapper which diff --git a/gnu/packages/lisp-check.scm b/gnu/packages/lisp-check.scm index ee045d1387..cbbc8c3979 100644 --- a/gnu/packages/lisp-check.scm +++ b/gnu/packages/lisp-check.scm @@ -625,8 +625,8 @@ to make test code more informative. (sbcl-package->cl-source-package sbcl-kaputt)) (define-public sbcl-lift - (let ((commit "2594160d6ca3a77d8750110dfa63214256aab852") - (revision "2")) + (let ((commit "a7941845a9de72be60e66ea941aa34cbee35bf23") + (revision "3")) (package (name "sbcl-lift") (version (git-version "1.7.1" revision commit)) @@ -634,10 +634,10 @@ to make test code more informative. (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/lift") + (url "https://github.com/hraban/lift") (commit commit))) (sha256 - (base32 "01xvz9sl5l5lai4h9dabmcjnm659wf5zllaxqbs55lffskp6jwq3")) + (base32 "1513n46fkqw8rnvz69s7xnwj476qm8ibdlwsr63qj9yh0mib0q6x")) (file-name (git-file-name "lift" version)) (modules '((guix build utils))) (snippet diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 4743e39d93..7f00a08203 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -1247,8 +1247,8 @@ and Gopher website hosting.") (delete 'build-program)))))))) (define-public sbcl-trivial-timeout - (let ((commit "feb869357f40f5e109570fb40abad215fb370c6c") - (revision "1")) + (let ((commit "e70d9b4f7caeab83ea6ac50d724470fe49561e66") + (revision "2")) (package (name "sbcl-trivial-timeout") (version (git-version "0.1.5" revision commit)) @@ -1256,19 +1256,15 @@ and Gopher website hosting.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/trivial-timeout/") + (url "https://github.com/hraban/trivial-timeout") (commit commit))) (file-name (git-file-name "trivial-timeout" version)) (sha256 - (base32 "1kninxwvvih9nhh7a9y8lfgi7pdr76675y1clw4ss17vz8fbim5p")))) + (base32 "0s8z9aj6b3kv21yiyk13cjylzf5zlnw9v86vcff477m1gk9yddjs")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-lift)) - (arguments - ;; NOTE: (Sharlatan-20210202T231437+0000): Due to the age of this library - ;; tests use some deprecated functionality and keep failing. - `(#:tests? #f)) - (home-page "https://github.com/gwkkwg/trivial-timeout/") + (home-page "https://github.com/hraban/trivial-timeout") (synopsis "Timeout library for Common Lisp") (description "This library provides an OS and implementation independent access to @@ -2260,8 +2256,9 @@ antialiased TrueType font rendering using CLX and XRender extension.") (sbcl-package->ecl-package sbcl-clx-truetype)) (define-public sbcl-slynk - (let ((commit "df62abae73bd511885c9c7ec0ea7ea1469a00923") - (revision "8")) + ;; Update together with emacs-sly. + (let ((commit "9c43bf65b967e12cef1996f1af5f0671d8aecbf4") + (revision "9")) (package (name "sbcl-slynk") (version (git-version "1.0.43" revision commit)) @@ -2273,7 +2270,7 @@ antialiased TrueType font rendering using CLX and XRender extension.") (url "https://github.com/joaotavora/sly") (commit commit))) (sha256 - (base32 "1nxijv52bja6la2i3asq7kklpj5li25454n52sgsc6xnnfvakbsv")) + (base32 "15nyr02ykkws4q79jcmxcawddg8sgq9v5l8k7jv7gg3hnpzxjlb2")) (file-name (git-file-name "cl-slynk" version)))) (build-system asdf-build-system/sbcl) (outputs '("out" "image")) @@ -2708,8 +2705,8 @@ arbitrary Lisp data.") (sbcl-package->ecl-package sbcl-cl-dot)) (define-public sbcl-cl-graph - (let ((commit "3cb786797b24883d784b7350e7372e8b1e743508") - (revision "1")) + (let ((commit "c617de35390cb02db88bc5b5febffafdb8947ae8") + (revision "2")) (package (name "sbcl-cl-graph") (version (git-version "0.10.2" revision commit)) @@ -2717,11 +2714,11 @@ arbitrary Lisp data.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/cl-graph") + (url "https://github.com/hraban/cl-graph") (commit commit))) (file-name (git-file-name "cl-graph" version)) (sha256 - (base32 "1748rj52f2jmd5jvsy9jwhn0zf73sjzjhwhnljvq6yi2kdqr30kl")))) + (base32 "0g1abkph9zb0m9zz6q2471ml9q9acdhwyapk8ra3bisqpwlxvpyf")))) (build-system asdf-build-system/sbcl) (arguments ;; TODO: (Sharlatan-20221118T215839+0000): Tests failed @@ -5601,8 +5598,8 @@ client and server.") (sbcl-package->ecl-package sbcl-trivial-clipboard)) (define-public sbcl-trivial-backtrace - (let ((commit "6eb65bde7229413040c81d42ea22f0e4c9c8cfc9") - (revision "1")) + (let ((commit "7f90b4a4144775cca0728791e4b92ac2557b07a1") + (revision "2")) (package (name "sbcl-trivial-backtrace") (version (git-version "1.1.0" revision commit)) @@ -5610,11 +5607,11 @@ client and server.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/trivial-backtrace") + (url "https://github.com/hraban/trivial-backtrace") (commit commit))) (file-name (git-file-name "trivial-backtrace" version)) (sha256 - (base32 "1mbaqiwj5034iw6jzw30jyhwzp1pvhnz1zcy0lns0z5j2h9ldapw")))) + (base32 "11j0p3vgmnn5q84xw7sacr5p3cvff2hfhsh2is8xpm2iwxc723kn")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-lift)) @@ -7730,8 +7727,8 @@ CPython implementation of Python) and Common Lisp.") (sbcl-package->ecl-package sbcl-burgled-batteries3)) (define-public sbcl-metabang-bind - (let ((commit "c93b7f7e1c18c954c2283efd6a7fdab36746ab5e") - (revision "1")) + (let ((commit "08196426cb099db0623e6cae2aeca566e0b788b2") + (revision "2")) (package (name "sbcl-metabang-bind") (version (git-version "0.8.0" revision commit)) @@ -7739,12 +7736,12 @@ CPython implementation of Python) and Common Lisp.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/metabang-bind") + (url "https://github.com/hraban/metabang-bind") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 - "0hd0kr91795v77akpbcyqiss9p0p7ypa9dznrllincnmgvsxlmf0")))) + "14g7k3zhm8cd6bssc5mm5h6iq1dv5lfhiq33aimcmj5a6vbiq47d")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-lift)) @@ -9220,8 +9217,8 @@ discontiguous ranges of time.") (sbcl-package->ecl-package sbcl-periods)) (define-public sbcl-metatilities-base - (let ((commit "6eaa9e3ff0939a93a92109dd0fcd218de85417d5") - (revision "1")) + (let ((commit "ef04337759972fd622c9b27b53149f3d594a841f") + (revision "2")) (package (name "sbcl-metatilities-base") (version (git-version "0.6.6" revision commit)) @@ -9229,12 +9226,12 @@ discontiguous ranges of time.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/metatilities-base") + (url "https://github.com/hraban/metatilities-base") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 - "0xpa86pdzlnf4v5g64j3ifaplx71sx2ha8b7vvakswi652679ma0")))) + "069rk5ncwvjnnzvvky6xiriynl72yzvjpnzl6jw9jf3b8na14zrk")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-lift)) @@ -9252,8 +9249,8 @@ which implements a set of utilities.") (sbcl-package->ecl-package sbcl-metatilities-base)) (define-public sbcl-cl-containers - (let ((commit "3d1df53c22403121bffb5d553cf7acb1503850e7") - (revision "3")) + (let ((commit "781ebfe0888bae46f07c018f7d473898b1bd4f5f") + (revision "4")) (package (name "sbcl-cl-containers") (version (git-version "0.12.1" revision commit)) @@ -9261,12 +9258,12 @@ which implements a set of utilities.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/cl-containers") + (url "https://github.com/hraban/cl-containers") (commit commit))) (file-name (git-file-name "cl-containers" version)) (sha256 (base32 - "18s6jfq11n8nv9k4biz32pm1s7y9zl054ry1gmdbcf39nisy377y")))) + "1nrql8s1j123v5gscy99lxvhlzp0ijig9x94w30v3lwfa58hf90l")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-lift)) @@ -17097,12 +17094,21 @@ not so easy to copy (ssyntax, argument destructuring, etc.).") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/trivial-shell") + (url "https://github.com/hraban/trivial-shell") (commit commit))) (file-name (git-file-name name version)) (sha256 (base32 "08mpkl5ij5sjfsyn8pq2kvsvpvyvr7ha1r8g1224fa667b8k2q85")))) (build-system asdf-build-system/sbcl) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda _ + (substitute* "dev/definitions.lisp" + (("/bin/sh") + (which "sh")))))))) (native-inputs (list sbcl-lift)) (home-page "https://common-lisp.net/project/trivial-shell/") @@ -17687,31 +17693,34 @@ It aims to be implementation-agnostic and to climb the syntax trees.") (sbcl-package->ecl-package sbcl-agnostic-lizard)) (define-public sbcl-dynamic-classes - (package - (name "sbcl-dynamic-classes") - (version "1.0.2") - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/gwkkwg/dynamic-classes") - (commit (string-append "version-" version)))) - (file-name (git-file-name "dynamic-classes" version)) - (sha256 - (base32 "1z3ag6w4ff0v6715xa9zhvwjqnp4i6zrjfmxdz8m115sklbwgm6c")))) - (build-system asdf-build-system/sbcl) - (inputs - `(("metatilities-base" ,sbcl-metatilities-base))) - (arguments - ;; NOTE: (Sharlatan-20210106222900+0000) Circular dependencies and failing - ;; test suites. lift-standard.config contains referances to deprecated - ;; functionality. - `(#:tests? #f)) - (home-page "https://common-lisp.net/project/dynamic-classes/") - (synopsis "Dynamic class definition for Common Lisp") - (description "Dynamic-Classes helps to ease the prototyping process by + (let ((commit "ebd7405603f67b16e8f2bc08ce8e2bcfcf439501") + (revision "0")) + (package + (name "sbcl-dynamic-classes") + (version (git-version "1.0.2" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/hraban/dynamic-classes") + (commit commit))) + (file-name (git-file-name "dynamic-classes" version)) + (sha256 + (base32 "1k9lkchwyi2xhygp2v8ifq3kg1l3wcnihhzgr06jrivjxgdqpc1a")))) + (build-system asdf-build-system/sbcl) + (inputs + `(("metatilities-base" ,sbcl-metatilities-base))) + (arguments + ;; NOTE: (Sharlatan-20210106222900+0000) Circular dependencies and failing + ;; test suites. lift-standard.config contains referances to deprecated + ;; functionality. + ;; See https://github.com/hraban/dynamic-classes/issues/2 + `(#:tests? #f)) + (home-page "https://common-lisp.net/project/dynamic-classes/") + (synopsis "Dynamic class definition for Common Lisp") + (description "Dynamic-Classes helps to ease the prototyping process by bringing dynamism to class definition.") - (license license:expat))) + (license license:expat)))) (define-public ecl-dynamic-classes (sbcl-package->ecl-package sbcl-dynamic-classes)) @@ -17720,41 +17729,47 @@ bringing dynamism to class definition.") (sbcl-package->cl-source-package sbcl-dynamic-classes)) (define-public sbcl-cl-markdown - ;; NOTE: (Sharlatan-20210106214629+0000) latest version tag - ;; "version-0.10.6_version-0.10.6" is failing to build due to missing system - ;; #:container-dynamic-classes - (package - (name "sbcl-cl-markdown") - (version "0.10.4") - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/gwkkwg/cl-markdown") - (commit (string-append "version-" version)))) - (file-name (git-file-name "cl-markdown" version)) - (sha256 - (base32 "1wdjbdd1zyskxf7zlilcp6fmwkivybj0wjp64vvzb265d5xi7p8p")))) - (build-system asdf-build-system/sbcl) - (inputs - `(("anaphora" ,sbcl-anaphora) - ("cl-containers" ,sbcl-cl-containers) - ("cl-ppcre" ,sbcl-cl-ppcre) - ("dynamic-classes" ,sbcl-dynamic-classes) - ("metabang-bind" ,sbcl-metabang-bind) - ("metatilities-base" ,sbcl-metatilities-base))) - (arguments - ;; NOTE: (Sharlatan-20210107213629+0000) Tests depend on too many not - ;; available systems, which themself are abandoned. - `(#:tests? #f)) - (home-page "https://common-lisp.net/project/cl-markdown/") - (synopsis "Common Lisp rewrite of Markdown") - (description - "This is an implementation of a Markdown parser in Common Lisp.") - (license license:expat))) + ;; The latest changes with fixes are not released yet, see + ;; https://github.com/hraban/cl-markdown/issues/9 + (let ((commit "3788802199228b49d0e06c3feb80c1c22af05cfc") + (revision "0")) + (package + (name "sbcl-cl-markdown") + (version (git-version "0.10.6" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/hraban/cl-markdown") + (commit commit))) + (file-name (git-file-name "cl-markdown" version)) + (sha256 + (base32 "1algqwmafipyf194cx9wfhg0pdx1ppx6s444p1pm8yaycbsyla1v")))) + (build-system asdf-build-system/sbcl) + (native-inputs + (list sbcl-lift sbcl-trivial-shell)) + (inputs + (list sbcl-anaphora + sbcl-cl-containers + sbcl-cl-ppcre + sbcl-dynamic-classes + sbcl-metabang-bind + sbcl-metatilities-base)) + (home-page "https://common-lisp.net/project/cl-markdown/") + (synopsis "Common Lisp rewrite of Markdown") + (description + "This is an implementation of a Markdown parser in Common Lisp.") + (license license:expat)))) (define-public ecl-cl-markdown - (sbcl-package->ecl-package sbcl-cl-markdown)) + (let ((pkg (sbcl-package->ecl-package sbcl-cl-markdown))) + (package + (inherit pkg) + (arguments + ;; XXX: Tests fail with "The function LIFT::GET-BACKTRACE-AS-STRING is + ;; undefined" on ECL. + ;; See https://github.com/hraban/cl-markdown/issues/11 + '(#:tests? #f))))) (define-public cl-markdown (sbcl-package->cl-source-package sbcl-cl-markdown)) @@ -19481,7 +19496,7 @@ immediately loaded.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/cl-mathstats") + (url "https://github.com/hraban/cl-mathstats") (commit commit))) (file-name (git-file-name "cl-mathstats" version)) (sha256 @@ -19491,7 +19506,7 @@ immediately loaded.") (list sbcl-lift)) (inputs (list sbcl-cl-containers sbcl-metatilities-base)) - (home-page "https://github.com/gwkkwg/cl-mathstats") + (home-page "https://github.com/hraban/cl-mathstats") (synopsis "Common Lisp collection of mathematical routines") (description "This package provides Common Lisp math and statistics routines.") @@ -21219,8 +21234,8 @@ running into parallelism problems when having to change directory.") (sbcl-package->cl-source-package sbcl-simple-inferiors)) (define-public sbcl-metacopy - (let ((commit "1b5bf443206cc1dea7801ae23d1167bd02122d30") - (revision "1")) + (let ((commit "df7856f2a43fa91124fe780ef22f792040bc130c") + (revision "2")) (package (name "sbcl-metacopy") (version (git-version "0.2.0" revision commit)) @@ -21228,27 +21243,27 @@ running into parallelism problems when having to change directory.") (origin (method git-fetch) (uri (git-reference - (url "https://github.com/gwkkwg/metacopy") + ;; Upstream changed the maintaner. + ;; legacy https://github.com/gwkkwg/metacopy + (url "https://github.com/hraban/metacopy") (commit commit))) (file-name (git-file-name "cl-metacopy" version)) (sha256 - (base32 "1rzp112djgw5n76s6hy2aq92bc43p0zd5bgzvqwvgvws4pls42s9")))) + (base32 "0l5ryg8pvqz9sn9s8bsvd0plvcnm7crsx86iqk5wxblkialaizip")))) (build-system asdf-build-system/sbcl) (native-inputs (list sbcl-asdf-system-connections sbcl-lift)) (inputs (list sbcl-contextl sbcl-moptilities)) - (home-page "https://github.com/gwkkwg/metacopy") + (home-page "https://github.com/hraban/metacopy") (synopsis "Flexible Common Lisp shallow/deep copy mechanism") (description "This package provides a flexible shallow/deep copy mechanism for Common Lisp.") (license license:expat)))) -;; NOTE: (Sharlatan-20221112T214131+0000): There is no ecl-moptilities variable -;; required for tests. -;; -;; ecl-metacopy +(define-public ecl-metacopy + (sbcl-package->ecl-package sbcl-metacopy)) (define-public cl-metacopy (sbcl-package->cl-source-package sbcl-metacopy)) diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm index 15004f449e..f26362c79f 100644 --- a/gnu/packages/lisp.scm +++ b/gnu/packages/lisp.scm @@ -1061,8 +1061,9 @@ the HTML documentation of TXR.") '("txr-manpage.html" "txr-manpage.pdf"))))) (add-after 'install 'install-vim-files (lambda _ - (let ((syntax (string-append #$output - "/share/vim/vimfiles/syntax"))) + (let ((syntax (string-append + #$output + "/share/vim/vimfiles/pack/guix/start/txr/syntax"))) (install-file "tl.vim" syntax) (install-file "txr.vim" syntax))))))) (native-inputs diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm index 5b5b29a468..256bd4b03a 100644 --- a/gnu/packages/mail.scm +++ b/gnu/packages/mail.scm @@ -1867,7 +1867,8 @@ addons which can add many functionalities to the base client.") (doc (string-append out "/share/doc/msmtp")) (msmtpq "scripts/msmtpq") (msmtpqueue "scripts/msmtpqueue") - (vimfiles (string-append out "/share/vim/vimfiles/syntax"))) + (vimfiles (string-append + out "/share/vim/vimfiles/pack/guix/start/msmtp/syntax"))) (install-file (string-append msmtpq "/msmtpq") bin) (install-file (string-append msmtpq "/msmtp-queue") bin) (install-file (string-append msmtpqueue "/msmtp-enqueue.sh") bin) diff --git a/gnu/packages/markup.scm b/gnu/packages/markup.scm index 6ee7bebf57..595b08fa20 100644 --- a/gnu/packages/markup.scm +++ b/gnu/packages/markup.scm @@ -125,39 +125,39 @@ convert it to structurally valid XHTML (or HTML).") "See License.text in the distribution.")))) (define-public lowdown - (let ((commit "1de10c1d71bfb4348ae0beaec8b1547d5e114969") - (revision "1")) - (package - (name "lowdown") - (version (git-version "0.10.0" revision commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/kristapsdz/lowdown") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 "1wh07nkiihvp1m79sj4qlnqklnn0rfp3hwls8sqcp0bfd96wpa1h")))) - (build-system gnu-build-system) - (arguments - (list - #:test-target "regress" - #:phases - #~(modify-phases %standard-phases - (replace 'configure - (lambda _ - (invoke "./configure" - (string-append "PREFIX=" #$output) - (string-append "MANDIR=" #$output "/share/man"))))) - #:make-flags #~(list "CFLAGS=-fPIC"))) - (native-inputs - (list which)) - (home-page "https://kristaps.bsd.lv/lowdown/") - (synopsis "Simple Markdown translator") - (description "Lowdown is a Markdown translator producing HTML5, -roff documents in the ms and man formats, LaTeX, gemini, and terminal output.") - (license license:isc)))) + (package + (name "lowdown") + (version "1.1.0") + (source + (origin + (method url-fetch) + (uri (string-append + "https://kristaps.bsd.lv/lowdown/snapshots/lowdown-" + version ".tar.gz")) + (sha256 + (base32 "0y88gffrg1zrin0y53j4gbkmpia0r8p0kyklj501wavkqi83j7pk")))) + (build-system gnu-build-system) + (arguments + (list + #:test-target "regress" + #:phases + #~(modify-phases %standard-phases + (replace 'configure + (lambda _ + (invoke "./configure" + (string-append "PREFIX=" #$output) + (string-append "MANDIR=" #$output "/share/man")))) + (replace 'install + (lambda _ + (invoke "make" "install" "install_libs")))) + #:make-flags #~(list "CFLAGS=-fPIC"))) + (native-inputs + (list which)) + (home-page "https://kristaps.bsd.lv/lowdown/") + (synopsis "Simple Markdown translator") + (description "Lowdown is a Markdown translator producing HTML5, roff +documents in the ms and man formats, LaTeX, gemini, and terminal output.") + (license license:isc))) (define-public discount (package diff --git a/gnu/packages/mes.scm b/gnu/packages/mes.scm index 2a55258a92..e5f3e04376 100644 --- a/gnu/packages/mes.scm +++ b/gnu/packages/mes.scm @@ -33,6 +33,7 @@ #:use-module (gnu packages texinfo) #:use-module (guix build-system gnu) #:use-module (guix download) + #:use-module (guix gexp) #:use-module (guix git-download) #:use-module (guix licenses) #:use-module (guix packages) @@ -153,15 +154,16 @@ parsers to allow execution with Guile as extension languages."))) (define-public mes (package (name "mes") - (version "0.24.2") + (version "0.25") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/mes/" "mes-" version ".tar.gz")) (sha256 (base32 - "0vp8v88zszh1imm3dvdfi3m8cywshdj7xcrsq4cgmss69s2y1nkx")))) - (supported-systems '("armhf-linux" "i686-linux" "x86_64-linux")) + "0h49h85m1jkppfsv95zdxdrrw1q1mwswhq81lwxj1nbyasrm0lij")))) + (supported-systems '("aarch64-linux" "armhf-linux" "i686-linux" + "x86_64-linux" "riscv64-linux")) (propagated-inputs (list mescc-tools nyacc-1.00.2)) (native-inputs (append (list guile-3.0) @@ -173,8 +175,13 @@ parsers to allow execution with Guile as extension languages."))) ;; MesCC 64 bit .go files installed ready for use with Guile. (list (cross-binutils "i686-unknown-linux-gnu") (cross-gcc "i686-unknown-linux-gnu"))) - (else - '()))) + ((string-prefix? "aarch64-linux" target-system) + ;; Use cross-compiler rather than #:system "armhf-linux" to get + ;; MesCC 64 bit .go files installed ready for use with Guile. + (let ((triplet "arm-linux-gnueabihf")) + (list (cross-binutils triplet) (cross-gcc triplet)))) + (else + '()))) (list graphviz help2man m2-planet perl ;build-aux/gitlog-to-changelog @@ -209,9 +216,8 @@ Guile.") (version "1.5.0") (source (origin (method url-fetch) - (uri (string-append - "https://github.com/oriansj/mescc-tools/releases/download/" - "Release_" version "/" name "-" version ".tar.gz")) + (uri (string-append "mirror://savannah/" name "/" + name "-" version ".tar.gz")) (sha256 (base32 "1vjczlajyrbjcx9ld35vhdqbxfdwwy3axg0jray3iwnrf70qr700")))) @@ -220,10 +226,15 @@ Guile.") "armhf-linux" "aarch64-linux" "riscv64-linux")) (arguments - `(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))) - #:test-target "test" - #:phases (modify-phases %standard-phases - (delete 'configure)))) + (list + #:make-flags #~(list (string-append "PREFIX=" #$output)) + #:test-target "test" + #:phases #~(modify-phases %standard-phases + (delete 'configure) + (add-after 'unpack 'patch-Kaem/test.sh + (lambda _ + (substitute* "Kaem/test.sh" + (("#/usr/") "#! /usr"))))))) (native-inputs (list which)) (synopsis "Tools for the full source bootstrapping process") (description @@ -268,3 +279,4 @@ built as Phase-5 of the full source bootstrapping process and is capable of building GNU Mes.") (home-page "https://github.com/oriansj/m2-planet") (license gpl3+))) + diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm index c669b6f139..1c5bc4bbd7 100644 --- a/gnu/packages/messaging.scm +++ b/gnu/packages/messaging.scm @@ -2636,11 +2636,11 @@ replacement.") (license license:gpl2+))) (define-public tdlib - (let ((commit "4d1d22d6f477d61f6ff2b8f6e49de1847092c5b4") + (let ((commit "4ed0b23c9c99868ab4d2d28e8ff244687f7b3144") (revision "0")) (package (name "tdlib") - (version (git-version "1.8.16" revision commit)) + (version (git-version "1.8.20" revision commit)) (source (origin (method git-fetch) @@ -2648,7 +2648,7 @@ replacement.") (url "https://github.com/tdlib/td") (commit commit))) (sha256 - (base32 "0nv921k795kq0l993rxzd5pm5v3l3mnwbaxb7d7d0m0506l4w9fk")) + (base32 "16kprlcnphi89yfwgnlaxjwwb1xx24az8xd710rx8cslb4zv00qw")) (file-name (git-file-name name version)))) (build-system cmake-build-system) (arguments diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index b0381515a5..1a8912ac87 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -154,7 +154,6 @@ #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) #:use-module (gnu packages readline) - #:use-module (gnu packages ruby) #:use-module (gnu packages samba) #:use-module (gnu packages serialization) #:use-module (gnu packages shells) @@ -867,25 +866,9 @@ publish/subscribe, RPC-style request/reply, or service discovery.") (sha256 (base32 "01ddfzjlkf2dgijrmm3j3j8irccsnbgfvjcnwslsfaxnrmrq5s64")))) (build-system cmake-build-system) - (outputs '("out" "doc")) (arguments `(#:configure-flags - (list - "-DNN_ENABLE_COVERAGE=ON") - #:phases - (modify-phases %standard-phases - (add-after 'install 'move-docs - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (doc (assoc-ref outputs "doc"))) - (mkdir-p (string-append doc "/share/doc")) - (rename-file - (string-append out "/share/doc/nanomsg") - (string-append doc "/share/doc/nanomsg")) - #t)))))) - (native-inputs - `(("asciidoctor" ,ruby-asciidoctor) - ("pkg-config" ,pkg-config))) + (list "-DNN_ENABLE_COVERAGE=ON"))) (synopsis "Scalable socket library") (description "Nanomsg is a socket library that provides several common communication patterns. It aims to make the networking layer fast, scalable, diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm index a9bfc27bed..afbffc2f0b 100644 --- a/gnu/packages/package-management.scm +++ b/gnu/packages/package-management.scm @@ -174,8 +174,8 @@ ;; Note: the 'update-guix-package.scm' script expects this definition to ;; start precisely like this. (let ((version "1.4.0") - (commit "e863274e67e2242b970845783172c9f4e49405ca") - (revision 13)) + (commit "a60ff4611a8814d1f33d64af07401762afbcc597") + (revision 14)) (package (name "guix") @@ -191,7 +191,7 @@ (commit commit))) (sha256 (base32 - "0g8p0w9qrqbzz3b4fzbvvqpdfgwhlxpz75n3ysa6haima5s19mp3")) + "08czk2789y21cydg1xwwrmah8hjaprdnzvb993n7d7d70ccxk5kz")) (file-name (string-append "guix-" version "-checkout")))) (build-system gnu-build-system) (arguments diff --git a/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch b/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch deleted file mode 100644 index 7a6cb642d0..0000000000 --- a/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch +++ /dev/null @@ -1,29 +0,0 @@ -Preserve subject when replying to patch threads. -Upstream status: likely to be in the next release (bug#66330) - -diff --git a/debbugs-gnu.el b/debbugs-gnu.el -index f366fba11d..cd549e364d 100644 ---- a/debbugs-gnu.el -+++ b/debbugs-gnu.el -@@ -1747,6 +1747,12 @@ MERGED is the list of bugs merged with this one." - (format "Re: bug#%d: %s" id (alist-get 'subject status))) - (debbugs-gnu-summary-mode 1))) - -+(defcustom debbugs-gnu-summary-keep-subject -+ (rx "[PATCH" (? (0+ (not (any digit "/]"))) (1+ digit) "/" (1+ digit)) "]") -+ "Regular expression which keeps the original message subject in replies." -+ :version "29.1" -+ :type 'regexp) -+ - (defvar debbugs-gnu-summary-mode-map - (let ((map (make-sparse-keymap))) - (define-key map "C" #'debbugs-gnu-send-control-message) -@@ -1778,6 +1784,8 @@ MERGED is the list of bugs merged with this one." - (cons new new)) - address)))))) - ,@(and debbugs-gnu-subject -+ (not (string-match-p debbugs-gnu-summary-keep-subject -+ debbugs-gnu-subject)) - `((subject ,debbugs-gnu-subject))))))) - - (defun debbugs-gnu-guess-current-id () diff --git a/gnu/packages/pdf.scm b/gnu/packages/pdf.scm index a2c0118455..44bae7f0d9 100644 --- a/gnu/packages/pdf.scm +++ b/gnu/packages/pdf.scm @@ -117,7 +117,7 @@ (define-public capypdf (package (name "capypdf") - (version "0.5.0") + (version "0.6.0") (source (origin (method git-fetch) (uri (git-reference @@ -125,7 +125,7 @@ (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "1mb3i0jq04gg5cm1l07mn9kal5s748miql97j6fpaf1x1j2lcrsx")))) + (base32 "15l8zwc83l65xh739s0qddlv5qv537wnx74s8fcwlm1r8y7kf2x4")))) (build-system meson-build-system) (arguments (list #:meson meson/newer diff --git a/gnu/packages/radio.scm b/gnu/packages/radio.scm index 17589b584c..486244e154 100644 --- a/gnu/packages/radio.scm +++ b/gnu/packages/radio.scm @@ -13,6 +13,7 @@ ;;; Copyright © 2022 Greg Hogan <code@greghogan.com> ;;; Copyright © 2022 Ryan Tolboom <ryan@using.tech> ;;; Copyright © 2023 Sharlatan Hellseher <sharlatanus@gmail.com> +;;; Copyright © 2023 Efraim Flashner <efraim@flashner.co.il> ;;; ;;; This file is part of GNU Guix. ;;; @@ -218,49 +219,46 @@ mathematical operations, and much more.") (license license:expat))) (define-public rtl-sdr - ;; No tagged release since 2018 - (let ((commit "5e73f90f1d85d8db2e583f3dbf1cff052d71d59b") - (revision "1")) - (package - (name "rtl-sdr") - (version (git-version "0.6.0" revision commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://git.osmocom.org/rtl-sdr/") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 "106fwzyr7cba952f3p3wm3hdqzm9zvm0v3gcz4aks2n7fnvrgrvn")))) - (build-system cmake-build-system) - (inputs - (list libusb)) - (native-inputs - (list pkg-config)) - (arguments - `(#:configure-flags '("-DDETACH_KERNEL_DRIVER=ON" - "-DINSTALL_UDEV_RULES=ON") - #:tests? #f ; No tests - #:phases - (modify-phases %standard-phases - (add-after 'unpack 'fix-paths - (lambda* (#:key outputs #:allow-other-keys) - (substitute* "CMakeLists.txt" - (("DESTINATION \"/etc/udev/") - (string-append "DESTINATION \"" - (assoc-ref outputs "out") - "/lib/udev/"))))) - (add-after 'fix-paths 'fix-udev-rules - (lambda _ - (substitute* "rtl-sdr.rules" - ;; The plugdev group does not exist; use dialout as in - ;; the hackrf package. - (("GROUP=\"plugdev\"") - "GROUP=\"dialout\""))))))) - (home-page "https://osmocom.org/projects/sdr/wiki/rtl-sdr") - (synopsis "Software defined radio driver for Realtek RTL2832U") - (description "DVB-T dongles based on the Realtek RTL2832U can be used as a + (package + (name "rtl-sdr") + (version "2.0.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://git.osmocom.org/rtl-sdr/") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0z8dn0gdava894fb9fs9gcwvmik31fcj6ldkggylc0mhgw5145pr")))) + (build-system cmake-build-system) + (inputs + (list libusb)) + (native-inputs + (list pkg-config)) + (arguments + `(#:configure-flags '("-DDETACH_KERNEL_DRIVER=ON" + "-DINSTALL_UDEV_RULES=ON") + #:tests? #f ; No tests + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda* (#:key outputs #:allow-other-keys) + (substitute* "CMakeLists.txt" + (("DESTINATION \"/etc/udev/") + (string-append "DESTINATION \"" + (assoc-ref outputs "out") + "/lib/udev/"))))) + (add-after 'fix-paths 'fix-udev-rules + (lambda _ + (substitute* "rtl-sdr.rules" + ;; The plugdev group does not exist; use dialout as in + ;; the hackrf package. + (("GROUP=\"plugdev\"") + "GROUP=\"dialout\""))))))) + (home-page "https://osmocom.org/projects/sdr/wiki/rtl-sdr") + (synopsis "Software defined radio driver for Realtek RTL2832U") + (description "DVB-T dongles based on the Realtek RTL2832U can be used as a cheap software defined radio, since the chip allows transferring the raw I/Q samples to the host. @code{rtl-sdr} provides drivers for this purpose. @@ -275,7 +273,7 @@ system configuration: To install the rtl-sdr udev rules, you must extend 'udev-service-type' with this package. E.g.: @code{(udev-rules-service 'rtl-sdr rtl-sdr)}") - (license license:gpl2+)))) + (license license:gpl2+))) (define-public airspy (let ((commit "6f92f47146aa8a8fce59b60927cf8c53da6851b3") @@ -1662,13 +1660,19 @@ instances over the network, and general QSO and DXpedition logging.") (base32 "1lqd77v9xm58k9g9kfwxva3mmzm1yyk1v27nws5j1a293zfg2hkw")))) (build-system qt-build-system) (arguments - (list #:tests? #f)) ; No test suite + (list #:tests? #f ; No test suite + #:configure-flags + (if (this-package-native-input "ruby-asciidoctor") + #~'() + #~(list "-DWSJT_GENERATE_DOCS=OFF")))) (native-inputs - (list asciidoc - gfortran - pkg-config - qttools-5 - ruby-asciidoctor)) + (append (list asciidoc + gfortran + pkg-config + qttools-5) + (if (supported-package? ruby-asciidoctor) + (list ruby-asciidoctor) + '()))) (inputs (list boost fftw @@ -1914,7 +1918,7 @@ from devices on the 433 MHz, 868 MHz, 315 MHz, 345 MHz and 915 MHz ISM bands.") (define-public multimon-ng (package (name "multimon-ng") - (version "1.2.0") + (version "1.3.0") (source (origin (method git-fetch) @@ -1923,7 +1927,7 @@ from devices on the 433 MHz, 868 MHz, 315 MHz, 345 MHz and 915 MHz ISM bands.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "0hm7391z1iz2sk4xkwfphqz8qvihqjzsh45csz14gb4jfs1p6ks2")))) + (base32 "1gd3kxb1w2fc6waa8g7af036yicjbg4a7hs0dgdci4d3aqwyz690")))) (build-system cmake-build-system) (inputs (list libx11 pulseaudio)) @@ -2569,7 +2573,7 @@ voice formats.") (define-public sdrangel (package (name "sdrangel") - (version "7.16.0") + (version "7.17.0") (source (origin (method git-fetch) @@ -2578,7 +2582,7 @@ voice formats.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "1c2pdxw2a3pysqlmr42gghg0ga33afwdp6wc97h7s6gwc5km6zlk")))) + (base32 "16hpnfzccpj8a3i24ryli870ym6kjih981sjapcqdc8va0q14qdz")))) (build-system qt-build-system) (native-inputs (list doxygen graphviz pkg-config)) diff --git a/gnu/packages/rust-apps.scm b/gnu/packages/rust-apps.scm index a06447143a..eb5214f534 100644 --- a/gnu/packages/rust-apps.scm +++ b/gnu/packages/rust-apps.scm @@ -2206,7 +2206,8 @@ consecutive lines and since program start.") (bin (string-append out "/bin")) (share (string-append out "/share")) (man (string-append out "/share/man")) - (vimfiles (string-append share "/vim/vimfiles/plugin")) + (vimfiles (string-append + share "/vim/vimfiles/pack/guix/start/skim/plugin")) (bash-completion (string-append share "/bash-completions/completions")) (zsh-site (string-append share "/zsh/site-functions")) diff --git a/gnu/packages/tor.scm b/gnu/packages/tor.scm index 562054ede4..71f32b3f43 100644 --- a/gnu/packages/tor.scm +++ b/gnu/packages/tor.scm @@ -63,14 +63,14 @@ (define-public tor (package (name "tor") - (version "0.4.8.7") + (version "0.4.8.8") (source (origin (method url-fetch) (uri (string-append "https://dist.torproject.org/tor-" version ".tar.gz")) (sha256 (base32 - "14blalf96240dg6crpmgyf2bdcj109dyx47h0w6a0a6vfjf2n3dj")))) + "0140d0zcjxi4vijvr2gk3kmnd4xa80sjj9kdcc2gzazyr84fkfr1")))) (build-system gnu-build-system) (arguments (list #:configure-flags diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm index 76fa8ef5d0..cf9a2f7a4c 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -3188,26 +3188,33 @@ will reconstruct the object along its delta-base chain and return it.") #$(file-append (this-package-input "go-golang-org-x-net") "/src/golang.org/x/net/publicsuffix/data") "src/golang.org/x/net/publicsuffix/data"))) - (add-before 'build 'man-gen - ;; Without this, the binary generated in 'build - ;; phase won't have any embedded usage-text. - (lambda _ - (with-directory-excursion "src/github.com/git-lfs/git-lfs" - (invoke "make" "mangen")))) - (add-after 'build 'build-man-pages - (lambda _ - (with-directory-excursion "src/github.com/git-lfs/git-lfs" - (invoke "make" "man")))) - (add-after 'install 'install-man-pages - (lambda* (#:key outputs #:allow-other-keys) - (with-directory-excursion "src/github.com/git-lfs/git-lfs/man" - (for-each - (lambda (manpage) - (install-file manpage - (string-append #$output "/share/man/man1"))) - (find-files "." "^git-lfs.*\\.1$")))))))) + ;; Only build the man pages if ruby-asciidoctor is available. + #$@(if (this-package-native-input "ruby-asciidoctor") + #~((add-before 'build 'man-gen + ;; Without this, the binary generated in 'build + ;; phase won't have any embedded usage-text. + (lambda _ + (with-directory-excursion "src/github.com/git-lfs/git-lfs" + (invoke "make" "mangen")))) + (add-after 'build 'build-man-pages + (lambda _ + (with-directory-excursion "src/github.com/git-lfs/git-lfs" + (invoke "make" "man")))) + (add-after 'install 'install-man-pages + (lambda* (#:key outputs #:allow-other-keys) + (with-directory-excursion "src/github.com/git-lfs/git-lfs/man" + (for-each + (lambda (manpage) + (install-file manpage + (string-append #$output "/share/man/man1"))) + (find-files "." "^git-lfs.*\\.1$")))))) + #~())))) ;; make `ronn` available during build for man page generation - (native-inputs (list ronn-ng git-minimal ruby-asciidoctor)) + (native-inputs + (append (list git-minimal) + (if (supported-package? ruby-asciidoctor) + (list ronn-ng ruby-asciidoctor) + '()))) (propagated-inputs (list go-github-com-xeipuuv-gojsonschema go-github-com-xeipuuv-gojsonreference diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index a6dfec06bf..68581301a2 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -179,6 +179,7 @@ #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages python-build) + #:use-module (gnu packages python-check) #:use-module (gnu packages python-crypto) #:use-module (gnu packages python-web) #:use-module (gnu packages python-xyz) @@ -2430,7 +2431,7 @@ images and image hosting sites.") (define-public mpv-mpris (package (name "mpv-mpris") - (version "1.0") + (version "1.1") (source (origin (method git-fetch) @@ -2439,7 +2440,7 @@ images and image hosting sites.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "1vpx4kzyg4pssn1hql2ci4s9x08sdx2v0kphw4aryywnz04yjhzf")))) + (base32 "1384y8n3l0xk8hbad1nsj9ljzb1h02g3ln3jysd8bd6shbl0x4mx")))) (build-system copy-build-system) (arguments '(#:install-plan @@ -2453,7 +2454,7 @@ images and image hosting sites.") (native-inputs (list pkg-config)) (inputs - (list glib mpv)) + (list ffmpeg glib mpv)) (home-page "https://github.com/hoyon/mpv-mpris") (synopsis "MPRIS plugin for mpv") (description "This package provides an @dfn{MPRIS} (Media Player Remote @@ -3272,33 +3273,45 @@ and custom quantization matrices.") (define-public streamlink (package (name "streamlink") - (version "3.2.0") + (version "6.3.1") (source (origin (method url-fetch) (uri (pypi-uri "streamlink" version)) (sha256 (base32 - "09nrspga15svzi0hmakcarbciav0nzf30hg1ff53gia473cd4w4p")))) + "0i2qym2plm4gpcq50vl67j69m8a4zz9mb8gi2xryx28pbnpdzh4k")) + (snippet + #~(begin (use-modules (guix build utils)) + (substitute* "pyproject.toml" + (("trio >=0\\.22") "trio >=0.21")))))) (build-system python-build-system) (arguments - `(#:phases (modify-phases %standard-phases + `(#:phases + (modify-phases %standard-phases (replace 'check (lambda* (#:key tests? #:allow-other-keys) (when tests? (invoke "python" "-m" "pytest"))))))) (native-inputs - (list python-freezegun python-mock python-pytest - python-requests-mock)) + (list python-freezegun + python-requests-mock + python-pytest + python-pytest-asyncio + python-pytest-trio)) (propagated-inputs - (list python-pysocks - python-websocket-client + (list python-certifi python-isodate python-lxml python-pycountry python-pycryptodome + python-pysocks python-requests - python-urllib3)) + python-trio + python-trio-websocket + python-typing-extensions + python-urllib3 + python-websocket-client)) (home-page "https://github.com/streamlink/streamlink") (synopsis "Extract streams from various services") (description "Streamlink is command-line utility that extracts streams diff --git a/gnu/packages/vim.scm b/gnu/packages/vim.scm index c2ed7b9249..469c8b64cb 100644 --- a/gnu/packages/vim.scm +++ b/gnu/packages/vim.scm @@ -31,17 +31,17 @@ ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. (define-module (gnu packages vim) - #:use-module ((guix licenses) #:prefix license:) + #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix gexp) #:use-module (guix utils) #:use-module (guix download) #:use-module (guix git-download) #:use-module (guix build-system cmake) - #:use-module (guix build-system copy) #:use-module (guix build-system gnu) #:use-module (guix build-system python) #:use-module (guix build-system pyproject) + #:use-module (guix build-system vim) #:use-module (gnu packages) #:use-module (gnu packages acl) #:use-module (gnu packages admin) ; For GNU hostname @@ -299,12 +299,9 @@ written in the Python 3, Perl, Ruby, Tcl, and Lua programming languages."))) (sha256 (base32 "1h6sci5mhdfg6sjsjpi8l5li02hg858zcayiwl60y9j2gqnd18lv")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "neocomplete")) (synopsis "Next generation completion framework for Vim") (description "@code{neocomplete}, an abbreviation of 'neo-completion with cache', @@ -332,10 +329,9 @@ features than Vim's built-in completion.") (sha256 (base32 "151wpvbj6jb9jdkbhj3b77f5sq7y328spvwfbqyj1y32rg4ifmc6")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("neosnippets" "share/vim/vimfiles/")))) + (list #:plugin-name "neosnippet")) ; Extends neosnippet (synopsis "Snippets for neosnippet") (description "@code{neosnippet-snippets} provides standard snippets for the Vim plugin @@ -361,17 +357,9 @@ you can fill in on the fly.") (sha256 (base32 "0k80syscmpnj38ks1fq02ds59g0r4jlg9ll7z4qc048mgi35alw5")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("ftdetect" "share/vim/vimfiles/") - ("ftplugin" "share/vim/vimfiles/") - ("indent" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("rplugin" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "neosnippet")) (synopsis "Snippet support for Vim") (description "@code{neosnippet}, is a plugin for Vim which adds snippet support to Vim. @@ -400,12 +388,9 @@ trouble using them, because you do not have to remember each snippet name.") (sha256 (base32 "04h946vr4f8wxap3wzqs69y2v8n50g2zbk22jsg2kxr4c01z5cbw")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("ftplugin" "share/vim/vimfiles/") - ("indent" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "vim-scheme")) (synopsis "Scheme syntax for Vim") (description "@code{vim-scheme} provides Scheme support for Vim (R7RS and CHICKEN).") @@ -428,10 +413,9 @@ trouble using them, because you do not have to remember each snippet name.") (sha256 (base32 "0ka3qbhsh8lix1vyj4678j7dnchkd8khhirrnn3aylxxf8fpqyg8")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("colors" "share/vim/vimfiles/")))) + (list #:plugin-name "luna")) (synopsis "Dark color theme for Vim") (description "@code{vim-luna} is a dark color theme for Vim.") @@ -455,11 +439,9 @@ trouble using them, because you do not have to remember each snippet name.") (sha256 (base32 "0alvrfhmd91zkd9h83s8wvgyq4iakcf6rybsyjd369qbgpcqky89")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("doc" "share/vim/vimfiles/") - ("autoload" "share/vim/vimfiles/")))) + (list #:plugin-name "context_filetype")) (synopsis "Context filetype library for Vim") (description "@code{vim-context-filetype} is context filetype library for Vim script.") @@ -479,15 +461,9 @@ trouble using them, because you do not have to remember each snippet name.") (file-name (git-file-name name version)) (sha256 (base32 "138290g2aph1jjhaza6biky5qi4ka6435s01bwxivllgb53g3irc")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("ftdetect" "share/vim/vimfiles/") - ("ftplugin" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "fugitive")) (home-page "https://github.com/tpope/vim-fugitive") (synopsis "Vim plugin to work with Git") (description "Vim-fugitive is a wrapper for Vim that complements the @@ -509,12 +485,9 @@ commit or run any Git arbitrary command.") (sha256 (base32 "1aksmr73648pvyc75pfdz28k2d4ky52rn7xiwcv7lz87q3vqld7k")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "airline")) (synopsis "Statusline for Vim") (description "@code{vim-airline} is an extensible statusline for Vim. @@ -540,12 +513,9 @@ and powerline symbols, etc.") (sha256 (base32 "1sb7nb7j7bz0pv1c9bgdy0smhr0jk2b1vbdv9yzghg5lrknpsbr6")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "airline-themes")) (synopsis "Collection of themes for Vim-airline") (description "@code{vim-airline-themes} is a collection of themes for @code{vim-airline}.") @@ -565,13 +535,9 @@ and powerline symbols, etc.") (file-name (git-file-name name version)) (sha256 (base32 "0j91f72jaz1s6aw1hpjiz30vk2ds2aqd9gisk91grsldy6nz6hhz")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("syntax_checkers" "share/vim/vimfiles/")))) + (list #:plugin-name "syntastic")) (synopsis "Syntax checking plugin for Vim") (description "Vim-syntastic is a syntax checking plugin for Vim. It runs files through @@ -581,6 +547,17 @@ are detected, the user is notified.") (home-page "https://github.com/vim-syntastic/syntastic") (license license:wtfpl2))) +(define-public neovim-syntastic + (package + (inherit vim-syntastic) + (name "neovim-syntastic") + (synopsis "Syntax checking plugin for Neovim") + (description + "Vim-syntastic is a syntax checking plugin for Neovim. It runs files through +external syntax checkers and displays any resulting errors to the user. This +can be done on demand, or automatically as files are saved. If syntax errors +are detected, the user is notified."))) + (define-public vim-solarized (let ((commit "62f656a02f93c5190a8753159e34b385588d5ff3") (revision "1")) @@ -596,11 +573,15 @@ are detected, the user is notified.") (file-name (git-file-name name version)) (sha256 (base32 "0001mz5v3a8zvi3gzmxhi3yrsb6hs7qf6i497arsngnvj2cwn61d")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("vim-colors-solarized/colors" "share/vim/vimfiles/") - ("vim-colors-solarized/doc" "share/vim/vimfiles/")))) + (list + #:plugin-name "solarized" + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'chdir + (lambda _ + (chdir "vim-colors-solarized")))))) (home-page "https://github.com/altercation/vim-colors-solarized") (synopsis "Solarized color scheme for Vim") (description @@ -631,9 +612,16 @@ switching between the light and dark background modes.") (file-name (git-file-name name version)) (sha256 (base32 "1jya8wwlkmgs89hndrq6gsaskhk9g0fh62wdib8v9vz2x5g3738z")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan '(("opt" "share/vim/vimfiles/pack/rainbow/")))) + (list + #:plugin-name "rainbow" + #:mode "opt" + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'chdir + (lambda _ + (chdir "opt/rainbow")))))) (home-page "https://github.com/mason1920/rainbow") (synopsis "Rainbow Parentheses Improved") (description @@ -656,12 +644,11 @@ codes by showing different levels of parentheses in different colors.") (sha256 (base32 "0mp80bi2m56bb93szw87vy6q5s85yk9g91sl4pr51316rgdv5kkv")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list + #:plugin-name "editorconfig" + #:vim? #t)) (home-page "https://editorconfig.org/") (synopsis "EditorConfig plugin for Vim") (description "EditorConfig makes it easy to maintain the correct coding @@ -686,11 +673,9 @@ editors.") (sha256 (base32 "1xn08z3a21mgfvp5i1nv57jnldwxwnl5nkryiff3zc99b1mizigp")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - (list #:install-plan - #~'(("lua" "share/nvim/site/pack/guix/start/packer.nvim/") - ("doc" "share/nvim/site/pack/guix/start/packer.nvim/")))) + (list #:plugin-name "packer.nvim")) (home-page "https://github.com/wbthomason/packer.nvim") (synopsis "Plugin manager for Neovim") (description @@ -699,23 +684,6 @@ editors.") is based on Vim's builtin plugin support.") (license license:expat)))) -(define-public neovim-syntastic - (package - (inherit vim-syntastic) - (name "neovim-syntastic") - (arguments - '(#:install-plan - '(("autoload" "share/nvim/site/") - ("doc" "share/nvim/site/") - ("plugin" "share/nvim/site/") - ("syntax_checkers" "share/nvim/site/")))) - (synopsis "Syntax checking plugin for Neovim") - (description - "Vim-syntastic is a syntax checking plugin for Neovim. It runs files through -external syntax checkers and displays any resulting errors to the user. This -can be done on demand, or automatically as files are saved. If syntax errors -are detected, the user is notified."))) - (define-public neovim (package (name "neovim") @@ -889,12 +857,12 @@ and support for fonts with ligatures.") (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) (vifm (string-append out "/share/vifm")) - (vimfiles (string-append out "/share/vim/vimfiles"))) + (vimfiles (string-append + out "/share/vim/vimfiles/pack/guix/start/vifm"))) (copy-recursively (string-append vifm "/colors") (string-append vimfiles "/colors")) (copy-recursively (string-append vifm "/vim") vimfiles) - (delete-file-recursively (string-append vifm "/colors")) (delete-file-recursively (string-append vifm "/vim")))))))) (native-inputs (list groff)) ; for the documentation @@ -986,17 +954,9 @@ a nested nvim process.") (sha256 (base32 "013yn2n2nsspk12bldkc9xn4z4kjx9rvracbllc8i1nngldckxd0")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("compiler" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("indent" "share/vim/vimfiles/") - ("ftdetect" "share/vim/vimfiles/") - ("ftplugin" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "guix")) (home-page "https://git.sr.ht/~efraim/guix.vim") (synopsis "Guix integration in Vim") (description "This package provides support for GNU Guix in Vim.") @@ -1015,11 +975,10 @@ a nested nvim process.") (sha256 (base32 "11zcw0sll6qg6ha0rr6n1cw5v73azvf7ycwn9lgiwa5cj7rrqjf4")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("plugin" "share/vim/vimfiles/") - ("doc/" "share/vim/vimfiles/doc" #:include ("asyncrun.txt"))))) + (list + #:plugin-name "asyncrun")) (home-page "https://github.com/skywind3000/asyncrun.vim") (synopsis "Run Async Shell Commands in Vim") (description "This plugin takes the advantage of new APIs in Vim 8 (and @@ -1041,12 +1000,9 @@ quickfix window in realtime.") (sha256 (base32 "1m8b5mn2zqlphzs6xfwykwmghf6p0wabrhpjmh7vav35jgcxc4wl")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "dispatch")) (home-page "https://github.com/tpope/vim-dispatch") (synopsis "Asynchronous build and test dispatcher") (description "Leverage the power of Vim's compiler plugins without being @@ -1071,11 +1027,9 @@ the job completes, errors will be loaded and parsed automatically.") (file-name (git-file-name name version)) (sha256 (base32 "05ffhhfahjqwxyrqmsinsahrs15wknzl2qbj8mznyv319mn2civ2")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - `(#:install-plan - '(("ftdetect" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "gemini")) (home-page "https://git.sr.ht/~torresjrjr/gemini.vim") (synopsis "Vim syntax highlighting plugin for Gemini") (description "This Vim plugin provides a Vim syntax highlighting plugin @@ -1099,11 +1053,9 @@ specification.") (sha256 (base32 "1xadb22kd40swmww0qxmmkcpcq6viy8l167pjck5q32hfngll5d3")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "eunuch")) (home-page "https://github.com/tpope/vim-eunuch") (synopsis "Vim sugar for the UNIX shell commands") (description "Vim sugar for the UNIX shell commands that need it the most. @@ -1127,13 +1079,9 @@ help working on Vim buffers and the files they reference with one command.") (file-name (git-file-name name version)) (sha256 (base32 "0k4b629jn6xlxyjxdl3cgm06v9dmx967rqnslv5m82c9kscwpyh4")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - `(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("ftplugin" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "vim-slime")) (home-page "https://technotales.wordpress.com/2007/10/03/like-slime-for-vim/") (synopsis "Vim plugin to give you some slime") (description "SLIME is an Emacs plugin to turn Emacs into a Lisp IDE. You @@ -1159,28 +1107,29 @@ to Lisp.") (sha256 (base32 "1dfc1wyjsgkckrklkzvk4whaz3ahaka59rvm7rc724mabmk83pmp")) (file-name (git-file-name name version)))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("vim/autoload" "share/vim/vimfiles/") - ("vim/doc" "share/vim/vimfiles/") - ("vim/ftplugin" "share/vim/vimfiles/") - ("vim/syntax" "share/vim/vimfiles/") - ("vim/test" "share/vim/vimfiles/") - ;; This is so the Vimscript part of Vlime can find the lisp files. - ("lisp" "share/vim/") - ;; This is so lisp can load Vlime without the Vim part. - ("lisp" "share/common-lisp/source/vlime")) + '(#:plugin-name "vlime" #:phases (modify-phases %standard-phases - ;; Create a symbolic link to the .asd file so that - ;; (asdf:load-system "vlime") finds the system. - (add-after 'install 'link-asd + (add-after 'symlink-files 'install-lisp-files (lambda* (#:key outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out"))) - (mkdir-p (string-append out "/share/common-lisp/systems/")) - (symlink (string-append out "/share/common-lisp/source/vlime/vlime.asd") - (string-append out "/share/common-lisp/systems/vlime.asd")))))))) + (let* ((out (assoc-ref outputs "out")) + (common-lisp (string-append out "/share/common-lisp"))) + ;; Create a symbolic link to the .asd file so that + ;; (asdf:load-system "vlime") finds the system. + (copy-recursively "lisp" (string-append common-lisp "/source/vlime")) + (mkdir-p (string-append common-lisp "/systems/")) + (symlink (string-append common-lisp "/source/vlime/vlime.asd") + (string-append common-lisp "/systems/vlime.asd"))))) + (add-after 'install 'symlink-files + (lambda* (#:key outputs plugin-name mode #:allow-other-keys) + (with-directory-excursion + (string-append (assoc-ref outputs "out") + "/share/vim/vimfiles/pack/guix/" mode "/" plugin-name) + (for-each (lambda (dir) + (symlink (string-append "./vim/" dir) dir)) + (list "after" "autoload" "doc" "ftplugin" "syntax")))))))) (propagated-inputs (list cl-alexandria cl-slime-swank @@ -1211,11 +1160,9 @@ to aid you in your glorious Common Lisp hacking quest.") (file-name (git-file-name name version)) (sha256 (base32 "07d5s20r0ssd7rir45vy0fqlci44gha1a81rcilgar227f3nw328")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "paredit")) (home-page "https://github.com/kovisoft/paredit") (synopsis "Vim plugin for structured editing of Lisp S-expressions") (description @@ -1237,11 +1184,9 @@ to aid you in your glorious Common Lisp hacking quest.") (file-name (git-file-name name version)) (sha256 (base32 "1b0bd5m5lv1p4d299mrwjfs2gk0zqwyaqdaid9hs9yqlxnr8s5nf")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "surround")) (home-page "https://github.com/tpope/vim-surround") (synopsis "Vim plugin for easy quoting and parenthesizing") (description @@ -1262,12 +1207,9 @@ change and add such surroundings in pairs.") "/vim-gnupg-v" version ".tar.gz")) (sha256 (base32 "02w8lgyyh7wgxysvmmcf9ja5c06vrbyh3alzvv97x8cfhrp0skn7")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "vim-gnupg")) (home-page "https://www.vim.org/scripts/script.php?script_id=3645") (synopsis "Vim plugin for transparent editing of gpg encrypted files") (description @@ -1293,12 +1235,9 @@ swapfile, and undofile when editing encrypted files to increase security.") (file-name (git-file-name name version)) (sha256 (base32 "0n68hg59h4rjn0ziqbsh5pr03l3kr98zk54659ny6vq107af1w96")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "ctrlp.vim")) (home-page "https://ctrlpvim.github.io/ctrlp.vim/") (synopsis "Fuzzy file, buffer, mru, tag, etc. finder for Vim") (description @@ -1330,12 +1269,9 @@ anything). (file-name (git-file-name name version)) (sha256 (base32 "054g80n09mmxxlh8xaic29bn8bgn3clvv732rymljdyvbj1mlhwd")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "MUcomplete")) (home-page "https://github.com/lifepillar/vim-mucomplete") (synopsis "MUcomplete is a minimalist autocompletion plugin for Vim") (description @@ -1359,12 +1295,9 @@ result is returned.") (file-name (git-file-name name version)) (sha256 (base32 "0zpa7cs59a8sq0k3frlf9flpf30jcn239yrpmv40r7nqvxzglbpl")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "gitgutter")) (synopsis "Vim plugin which shows a git diff in the sign column") (description "A Vim plugin which shows a git diff in the sign column. It shows which @@ -1388,12 +1321,9 @@ buffer.") (file-name (git-file-name name version)) (sha256 (base32 "0ppsbsd696ih40d9f76mdl9sd9y7p2pvm65qmvq4b2zhkv4xbpxz")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "characterize")) (home-page "https://github.com/tpope/vim-characterize") (synopsis "Vim plugin for showing Unicode character metadata") (description @@ -1422,13 +1352,9 @@ additions: (file-name (git-file-name name version)) (sha256 (base32 "1fqfs8msmr6d4kpvxqp14sdjvp5fj52q5w5kz71myzcd4kqzmirp")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")) + '(#:plugin-name "tagbar" #:phases (modify-phases %standard-phases (add-after 'unpack 'link-universal-ctags @@ -1463,15 +1389,9 @@ the class they are defined in.") (file-name (git-file-name name version)) (sha256 (base32 "1si8qla86ng8cffbmfrk9gss0i3912yw0f1ph4bsiq0kk837lccp")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - '(#:install-plan - '(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("lib" "share/vim/vimfiles/") - ("nerdtree_plugin" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/") - ("syntax" "share/vim/vimfiles/")))) + (list #:plugin-name "nerdtree")) (home-page "https://github.com/preservim/nerdtree") (synopsis "Tree explorer plugin for Vim") (description @@ -1493,13 +1413,9 @@ files for reading or editing, and perform basic file system operations.") (file-name (git-file-name name version)) (sha256 (base32 "1ka2rqn7rby55aps3iblh1dcqxm7m7qx72mpkz6y2aaj8mkj0zyd")))) - (build-system copy-build-system) + (build-system vim-build-system) (arguments - (list - #:install-plan - #~`(("autoload" "share/vim/vimfiles/") - ("doc" "share/vim/vimfiles/") - ("plugin" "share/vim/vimfiles/")))) + (list #:plugin-name "nerdcommenter")) (home-page "https://github.com/preservim/nerdcommenter") (synopsis "Vim plugin for easy commenting of code") (description diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm index 95d2a879bc..82ef67a2e4 100644 --- a/gnu/packages/wm.scm +++ b/gnu/packages/wm.scm @@ -787,7 +787,7 @@ desktop environment.") (define-public icewm (package (name "icewm") - (version "3.4.3") + (version "3.4.4") (source (origin (method url-fetch) (uri (string-append @@ -795,7 +795,7 @@ desktop environment.") version "/icewm-" version ".tar.lz")) (sha256 (base32 - "1r2x7acjahq4666mds1di46zc32sl80592wllghqcp5800jpjcjm")))) + "0cdsb2d45dwcr2dm4jfh0z5g6pkb0ghd4jaybxqiz74mbw5rmjhv")))) (build-system gnu-build-system) (native-inputs (list pkg-config)) (inputs (list fontconfig @@ -1084,7 +1084,8 @@ drags, snap-to-border support, and virtual desktops.") (add-after 'install 'install-vim-files (lambda* (#:key outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) - (syntax (string-append out "/share/vim/vimfiles/syntax"))) + (syntax (string-append + out "/share/vim/vimfiles/pack/guix/start/fluxbox/syntax"))) (copy-recursively "3rd/vim/vim/syntax" syntax) #t))) (add-after 'install 'install-xsession |