guix_mirror_bot pushed a commit to branch emacs-team
in repository guix.
commit 295cd5a940e718bcf50e4aaca22dc9b68d7ce420
Author: Nicolas Graves <ngra...@ngraves.fr>
AuthorDate: Sun May 18 10:16:16 2025 +0200
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 <i...@retrospec.tv>
---
gnu/packages/emacs-xyz.scm | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 8a2cc8edf4..2539ff495e 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -26167,12 +26167,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";)
