me
/
guix
Archived
1
0
Fork 0

gnu: emacs-edbi: Adjust to changes in emacs-build-system.

* gnu/packages/emacs-xyz.scm (emacs-edbi)[patch-path]: Execute after unpack.
[wrap-edbi-bridge]: New phase (after wrap).  Find edbi-bridge in elpa-directory.
master
Leo Prikler 2021-04-17 19:06:32 +02:00
parent c4fac5dd7f
commit c409cea2d8
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 14 additions and 10 deletions

View File

@ -21593,17 +21593,21 @@ asynchronous communications, the RPC response is fairly good.")
`(#:include '("\\.el$" "\\.pl$") `(#:include '("\\.el$" "\\.pl$")
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'install 'patch-path (add-after 'unpack 'patch-path
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((perl (assoc-ref inputs "perl")) (let ((perl (assoc-ref inputs "perl")))
(dir (string-append (assoc-ref outputs "out") (substitute* "edbi.el"
"/share/emacs/site-lisp")))
(substitute* (string-append dir "/edbi.el")
(("\"perl\"") (string-append "\"" perl "/bin/perl\""))) (("\"perl\"") (string-append "\"" perl "/bin/perl\"")))
(chmod (string-append dir "/edbi-bridge.pl") #o555) #t)))
(wrap-program (string-append dir "/edbi-bridge.pl") (add-after 'wrap 'wrap-edbi-bridge
`("PERL5LIB" ":" prefix (,(getenv "PERL5LIB")))) (lambda* (#:key inputs outputs #:allow-other-keys)
#t)))))) (let* ((out (assoc-ref outputs "out"))
(bridge (string-append (elpa-directory out)
"/edbi-bridge.pl")))
(chmod bridge #o555)
(wrap-program bridge
`("PERL5LIB" ":" prefix (,(getenv "PERL5LIB")))))
#t)))))
(synopsis "Database Interface for Emacs Lisp") (synopsis "Database Interface for Emacs Lisp")
(description "This program connects the database server through Perl's (description "This program connects the database server through Perl's
DBI, and provides DB-accessing API and the simple management UI.") DBI, and provides DB-accessing API and the simple management UI.")