Make the guix.scm file load guile-termenv and return it

This means we no longer use a symlink. We also needed to define a
module for the guile-termenv file.
This commit is contained in:
TakeV 2024-03-01 15:55:44 -05:00
parent 6ed6b65d0e
commit f1d09c368d
Signed by: TakeV
GPG Key ID: A64F41345C7400AF
2 changed files with 40 additions and 37 deletions

View File

@ -1,3 +1,4 @@
(define-module (guile-termenv))
(use-modules (gnu packages)
(gnu packages autotools)
(gnu packages guile)
@ -11,39 +12,39 @@
(guix packages)
(srfi srfi-1))
(package
(name "guile-termenv")
(version "0.1")
(source
(local-file
"../.." "guile-termenv-checkout"
#:recursive? #t
#:select? (lambda (file stat)
(not (any (lambda (my-string)
(string-contains file my-string))
(list ".git" ".dir-locals.el" "guix.scm"))))))
(build-system gnu-build-system)
(arguments
(list
#:make-flags
#~(list "GUILE_AUTO_COMPILE=0")
#:phases
#~(modify-phases %standard-phases
(add-before 'bootstrap 'hall
(lambda _
(system* "hall" "build" "-x")))
(replace 'bootstrap
(lambda _
(system* "autoreconf" "-vif"))))))
(native-inputs (list autoconf
automake
guile-hall
pkg-config
texinfo))
(inputs (list guile-3.0))
(synopsis "Guile port of termenv")
(description
"A library to provide easy control of terminals from Guile using terminal control codes.")
(home-page "https://git.solarpunk.moe/vv/guile-termenv")
(license license:gpl3+))
(define-public guile-termenv
(package
(name "guile-termenv")
(version "0.1")
(source
(local-file
"../.." "guile-termenv-checkout"
#:recursive? #t
#:select? (lambda (file stat)
(not (any (lambda (my-string)
(string-contains file my-string))
(list ".git" ".dir-locals.el" "guix.scm"))))))
(build-system gnu-build-system)
(arguments
(list
#:make-flags
#~(list "GUILE_AUTO_COMPILE=0")
#:phases
#~(modify-phases %standard-phases
(add-before 'bootstrap 'hall
(lambda _
(system* "hall" "build" "-x")))
(replace 'bootstrap
(lambda _
(system* "autoreconf" "-vif"))))))
(native-inputs (list autoconf
automake
guile-hall
pkg-config
texinfo))
(inputs (list guile-3.0))
(synopsis "Guile port of termenv")
(description
"A library to provide easy control of terminals from Guile using terminal control codes.")
(home-page "https://git.solarpunk.moe/vv/guile-termenv")
(license license:gpl3+)))

View File

@ -1 +0,0 @@
.guix/modules/guile-termenv.scm

3
guix.scm Normal file
View File

@ -0,0 +1,3 @@
(load ".guix/modules/guile-termenv.scm")
(use-modules (guile-termenv))
guile-termenv