andrius
/
gash
mirror of https://git.savannah.gnu.org/git/gash.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

gash: Do not try readline on Mes. 

* gash/gash.scm [mes]: Do not try to import '(ice-9 readline)'.
This commit is contained in:
Timothy Sample 2023-02-08 13:08:16 -06:00
parent ac4a84df54
commit b741e2a3e7
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gash/gash.scm
View File

@ -39,11 +39,15 @@
#:use-module (srfi srfi-26)
#:export (main))
(eval-when (expand load eval)
(catch #t
(lambda _ (use-modules (ice-9 readline)))
(lambda (key . args)
(use-modules (gash readline)))))
(cond-expand
(guile
(eval-when (expand load eval)
(catch #t
(lambda _ (use-modules (ice-9 readline)))
(lambda (key . args)
(use-modules (gash readline))))))
(mes
(use-modules (gash readline))))
;; This is done automatically since Guile 2.2.
(if-guile-version-below (2 2 0)