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.
This commit is contained in:
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

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.")