me
/
guix
Archived
1
0
Fork 0
Code

gnu: emacs-no-x: Use new package style. 

* gnu/packages/emacs.scm (emacs-no-x)[arguments]: Convert to list of
G-Expressions.
[inputs]: Use modify-inputs.
master
Liliana Marie Prikler 2022-05-15 00:10:59 +02:00
parent a56a3fa761
commit 4949188d46
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 11 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gnu/packages/emacs.scm
View File

@ -402,20 +402,18 @@ editor (with xwidgets support)")
(synopsis "The extensible, customizable, self-documenting text (synopsis "The extensible, customizable, self-documenting text
editor (console only)") editor (console only)")
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (fold alist-delete (inputs (modify-inputs (package-inputs emacs)
(package-inputs emacs) (delete "libx11" "gtk+" "libxft" "libtiff" "giflib" "libjpeg"
'("libx11" "gtk+" "libxft" "libtiff" "giflib" "libjpeg"
"imagemagick" "libpng" "librsvg" "libxpm" "libice" "imagemagick" "libpng" "librsvg" "libxpm" "libice"
"libsm" "cairo" "pango" "harfbuzz" "libsm" "cairo" "pango" "harfbuzz"
;; These depend on libx11, so remove them as well. ;; These depend on libx11, so remove them as well.
"libotf" "m17n-lib" "dbus"))) "libotf" "m17n-lib" "dbus")))
(arguments (arguments
(substitute-keyword-arguments (package-arguments emacs) (substitute-keyword-arguments (package-arguments emacs)
((#:configure-flags flags ''()) ((#:configure-flags flags #~'())
`(delete "--with-cairo" ,flags)) #~(delete "--with-cairo" #$flags))
((#:phases phases) ((#:phases phases)
`(modify-phases ,phases #~(modify-phases #$phases
(delete 'restore-emacs-pdmp) (delete 'restore-emacs-pdmp)
(delete 'strip-double-wrap))))))) (delete 'strip-double-wrap)))))))