mirror of
https://https.git.savannah.gnu.org/git/guix.git/
synced 2025-07-14 02:50:45 +02:00
gnu: emacs-emacsql: Improve style.
* gnu/packages/emacs-xyz.scm (emacs-emacsql): [arguments]<phases>: Improve style of 'fix-executable-paths. Signed-off-by: Ian Eure <ian@retrospec.tv>
This commit is contained in:
parent
ce22850867
commit
fdb799491b
1 changed files with 6 additions and 6 deletions
|
@ -26193,12 +26193,12 @@ object has been freed.")
|
|||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-executable-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((mdb (assoc-ref inputs "mariadb"))
|
||||
(psql (assoc-ref inputs "postgresql")))
|
||||
(emacs-substitute-variables "emacsql-psql.el"
|
||||
("emacsql-psql-executable" (string-append psql "/bin/psql")))
|
||||
(emacs-substitute-variables "emacsql-mysql.el"
|
||||
("emacsql-mysql-executable" (string-append mdb "/bin/mysql")))))))))
|
||||
(emacs-substitute-variables "emacsql-psql.el"
|
||||
("emacsql-psql-executable"
|
||||
(search-input-file inputs "bin/psql")))
|
||||
(emacs-substitute-variables "emacsql-mysql.el"
|
||||
("emacsql-mysql-executable"
|
||||
(search-input-file inputs "/bin/mysql"))))))))
|
||||
(inputs (list mariadb postgresql))
|
||||
(native-inputs (list emacs-sqlite3-api))
|
||||
(home-page "https://github.com/magit/emacsql")
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue