Compare commits

...

5 Commits

Author SHA1 Message Date
Liliana Marie Prikler
bf2f8ecccd gnu: Remove emacs-xwidgets and its variants.
* gnu/packages/emacs.scm (emacs-xwidgets, emacs-pgtk-xwidgets)
(emacs-next-pgtk-xwidgets): Remove variable.

Fixes: guix/guix#6731 (emacs-xwidgets fails to build)
2026-03-26 09:19:02 +01:00
Liliana Marie Prikler
e1988e2f6b gnu: emacs-next: Update to 31.0.50-3.55c752d.
* gnu/packages/emacs.scm (emacs-next-minimal): Update to 31.0.50-3.55c752d.
2026-03-26 09:00:38 +01:00
Liliana Marie Prikler
ba994bf020 gnu: emacs: Add lexical binding cookies.
* gnu/packages/emacs.scm (emacs-minimal)[#:phases]<install-c-source>
<install-site-start>: Add “;; -*- lexical-binding: t; -*-” at the top of the
generated files.
* gnu/packages/aux-files/emacs/comp-integrity.el: Likewise.
2026-03-26 07:40:32 +01:00
bdunahu
f8251f54cd gnu: emacs: Fix ‘alpha-background’ frame parameter.
* gnu/packages/emacs.scm (emacs)[inputs]: Add libxrender and libxt.

Change-Id: If0726a04956683e32747524b11656f5c267be8a4
Co-authored-by: Sviatoslav Bulbakha <mail@ssbb.me>
Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
Fixes: guix/guix#6490 (alpha-background frame parameter does nothing)
Fixes: https://issues.guix.gnu.org/71627 (likewise)
2026-03-26 07:40:32 +01:00
Liliana Marie Prikler
599cd425a0 build: emacs-build-system: Respect “Package-Version”.
Unlike the builtin ‘package-buffer-info’, the ‘write-pkg-file’ procedure
previously ignored the “Package-Version” header, leading to wrongly reported
version numbers when an actual version would have been available.

* guix/build/emacs-build-system.scm (ensure-package-description): Check for
“package-version” header before invoking ‘lm-version’.

Fixes: guix/guix#5462 (‘emacs-build-system’ generates wrong package versions)
2026-03-26 07:40:31 +01:00
3 changed files with 9 additions and 31 deletions

View File

@@ -1,3 +1,4 @@
;; -*- lexical-binding: t; -*-
(require 'ert)
(eval-when-compile

View File

@@ -386,6 +386,7 @@
(lambda ()
(display
(string-append
";; -*- lexical-binding: t; -*-\n"
"(setq find-function-C-source-directory \"" dest "\")\n\n"
"(provide 'guix-emacs-c-source)")))))))
(add-after 'install 'install-site-start
@@ -412,6 +413,7 @@
(lambda ()
(display
(string-append
";; -*- lexical-binding: t; -*-\n"
"(when (require 'guix-emacs nil t)\n"
" (guix-emacs-autoload-packages 'no-reload)\n"
" (advice-add 'package-load-all-descriptors"
@@ -629,6 +631,8 @@ editor (console only)")
libx11
libxft
libxpm
libxrender
libxt
libwebp
pango
poppler)))))
@@ -644,32 +648,6 @@ editor (console only)")
(description "This Emacs build implements graphical UI purely in terms
of GTK.")))
(define-public emacs-xwidgets
(package/inherit emacs
(name "emacs-xwidgets")
(synopsis "The extensible, customizable, self-documenting text
editor (with xwidgets support)")
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags #~'())
#~(cons "--with-xwidgets" #$flags))))
(inputs
(modify-inputs inputs
(prepend webkitgtk-with-libsoup2 libxcomposite)))))
(define-public emacs-pgtk-xwidgets
(package
(inherit emacs-pgtk)
(name "emacs-pgtk-xwidgets")
(synopsis "Emacs text editor with @code{xwidgets} and @code{pgtk} support")
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags #~'())
#~(cons "--with-xwidgets" #$flags))))
(inputs
(modify-inputs inputs
(prepend gsettings-desktop-schemas webkitgtk-with-libsoup2)))))
(define-public emacs-lucid
(package/inherit emacs-no-x
(name "emacs-lucid")
@@ -727,8 +705,8 @@ editor (with wide ints)" )
#~(cons "--with-wide-int" #$flags))))))
(define-public emacs-next-minimal
(let ((commit "509228fc6c026921c67459f21164e0325efc583b")
(revision "2"))
(let ((commit "55c752d631bcadd53e78b0798b813f50f90aefa9")
(revision "3"))
(package
(inherit emacs-minimal)
(name "emacs-next-minimal")
@@ -742,7 +720,7 @@ editor (with wide ints)" )
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "04aalyrx5jysk5fhlka98fhfx23sy99zp8j16i0ils20sflyig6n"))
(base32 "06z8hrz3490ja50vh073hi0ff69plhmn1g1p51gsiic3fvyc4dkz"))
(patches
(search-patches "emacs-next-disable-jit-compilation.patch"
"emacs-next-exec-path.patch"
@@ -774,7 +752,6 @@ editor (with wide ints)" )
(define-public emacs-next (emacs->emacs-next emacs))
(define-public emacs-next-pgtk (emacs->emacs-next emacs-pgtk))
(define-public emacs-next-pgtk-xwidgets (emacs->emacs-next emacs-pgtk-xwidgets))
(define-deprecated-package emacs-next-tree-sitter
emacs-next)

View File

@@ -182,7 +182,7 @@ locations in the store in '.el' files."
;; of generation -pkg.el will fail.
(condition-case
nil
(let ((version (lm-version)))
(let ((version (or (lm-header "package-version") (lm-version))))
;; raises an error if version is invalid
(and (version-to-list version) version))
(error "0.0.0"))