me
/
guix
Archived
1
0
Fork 0
Code

gnu: emacs-wget: Port to emacs-build-system. 

* gnu/packages/emacs-xyz.scm (emacs-wget)[build-system]: Use
emacs-build-system.
[arguments]: Drop #:modules and #:imported-modules.
Adjust #:phases accordingly.
master
Leo Prikler 2021-04-17 19:06:46 +02:00
parent 0912a64ec0
commit 3c501881c1
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 3 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
gnu/packages/emacs-xyz.scm
View File

@ -1826,35 +1826,18 @@ or unexpected behavior inside an elisp configuration file (typically
version ".orig.tar.gz")) version ".orig.tar.gz"))
(sha256 (sha256
(base32 "10byvyv9dk0ib55gfqm7bcpxmx2qbih1jd03gmihrppr2mn52nff")))) (base32 "10byvyv9dk0ib55gfqm7bcpxmx2qbih1jd03gmihrppr2mn52nff"))))
(build-system gnu-build-system) (build-system emacs-build-system)
(inputs `(("wget" ,wget))) (inputs `(("wget" ,wget)))
(native-inputs `(("emacs" ,emacs-minimal))) (native-inputs `(("emacs" ,emacs-minimal)))
(arguments (arguments
`(#:modules ((guix build gnu-build-system) `(#:tests? #f ; no check target
(guix build utils)
(guix build emacs-utils))
#:imported-modules (,@%gnu-build-system-modules
(guix build emacs-utils))
#:tests? #f ; no check target
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(replace 'configure (add-after 'unpack 'patch-exec-paths
(lambda* (#:key outputs #:allow-other-keys)
(substitute* "Makefile"
(("/usr/local") (assoc-ref outputs "out"))
(("/site-lisp/emacs-wget") "/site-lisp"))
#t))
(add-before 'build 'patch-exec-paths
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let ((wget (assoc-ref inputs "wget"))) (let ((wget (assoc-ref inputs "wget")))
(emacs-substitute-variables "wget.el" (emacs-substitute-variables "wget.el"
("wget-command" (string-append wget "/bin/wget")))) ("wget-command" (string-append wget "/bin/wget"))))
#t))
(add-after 'install 'post-install
(lambda* (#:key outputs #:allow-other-keys)
(emacs-generate-autoloads
"wget" (string-append (assoc-ref outputs "out")
"/share/emacs/site-lisp/"))
#t))))) #t)))))
(home-page "https://www.emacswiki.org/emacs/EmacsWget") (home-page "https://www.emacswiki.org/emacs/EmacsWget")
(synopsis "Simple file downloader for Emacs based on wget") (synopsis "Simple file downloader for Emacs based on wget")