me
/
guix
Archived
1
0
Fork 0

gnu: stumpwm: Fix the Texinfo manual.

* gnu/packages/wm.scm (stumpwm)[native-inputs]: Add autoconf & automake.
[arguments]: Bootstrap autotools & configure before making stumpwm.info.
master
Tobias Geerinckx-Rice 2020-10-10 14:01:36 +02:00
parent cf197bff6a
commit afed1b94f7
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 9 additions and 6 deletions

View File

@ -1597,7 +1597,11 @@ compositors that support the layer-shell protocol.")
(base32 "1ha8803ll7472kqxsy2xz0v5d4sv8apmc9z631d67m31q0z1m9rz"))))
(build-system asdf-build-system/sbcl)
(native-inputs `(("fiasco" ,sbcl-fiasco)
("texinfo" ,texinfo)))
("texinfo" ,texinfo)
;; To build the manual.
("autoconf" ,autoconf)
("automake" ,automake)))
(inputs `(("cl-ppcre" ,sbcl-cl-ppcre)
("clx" ,sbcl-clx)
("alexandria" ,sbcl-alexandria)))
@ -1631,13 +1635,12 @@ compositors that support the layer-shell protocol.")
out)))
#t)))
(add-after 'install 'install-manual
(lambda* (#:key outputs #:allow-other-keys)
;; The proper way to the manual is bootstrapping a full autotools
;; build system and running ./configure && make stumpwm.info to
;; do some macro substitution. We can get away with much less.
(lambda* (#:key (make-flags '()) outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(info (string-append out "/share/info")))
(invoke "makeinfo" "stumpwm.texi.in")
(invoke "./autogen.sh")
(invoke "sh" "./configure" "SHELL=sh")
(apply invoke "make" "stumpwm.info" make-flags)
(install-file "stumpwm.info" info)
#t))))))
(synopsis "Window manager written in Common Lisp")