* Re: help with packaging a common lisp software
2021-02-20 11:18 ` cage
@ 2021-02-20 13:27 ` Guillaume Le Vaillant
0 siblings, 0 replies; 4+ messages in thread
From: Guillaume Le Vaillant @ 2021-02-20 13:27 UTC (permalink / raw)
To: cage; +Cc: help-guix
[-- Attachment #1.1: Type: text/plain, Size: 2411 bytes --]
cage <cage-dev@twistfold.it> skribis:
> On Mon, Feb 15, 2021 at 10:03:02PM +0100, cage wrote:
>
> Hi!
>
> With help from many people i managed to build the package!
>
> But there is a single issue left, this program uses ncurses for TUI,
> when built with guix it fails to render properly the character. This
> problem does not arises when compiling the software on the same machine
> but without guix.
>
> I would be glad if some one could confirm the issue on their machine.
>
> To reproduce the problem just, after the program starts, type ">" and
> then type an accented letter or even backspace, the line will be all
> messed up after typing.
>
> Thank in advance!
> C.
Hi,
I took a look at your file and it looks like you are using an old
version of Guix. The 'asd-system-name' parameter no longer exists and
has been replaced by the 'asd-systems' parameter several months ago.
At which commit is your Guix? (you can get it with the "guix describe"
command).
I made a few modifications to your file (in attachment) to make it work
with a more recent Guix, but Tinmop crashed when I tried to start it,
with the following error:
--8<---------------cut here---------------start------------->8---
Loading configuration file shared.conf
#<SB-INT:SIMPLE-PROGRAM-ERROR "invalid number of arguments: ~S" {100BBD2663}>
debugger invoked on a SB-INT:SIMPLE-PROGRAM-ERROR in thread
#<THREAD "main thread" RUNNING {1004698103}>:
invalid number of arguments: 1
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [REPLACE-FUNCTION] Call a different function with the same arguments
1: [CALL-FORM ] Call a different form
2: [ABORT ] Exit from the current thread.
((LAMBDA NIL :IN RESOURCES-UTILS::GET-RESOURCE-FILE) #<SIMPLE-ERROR "Cannot find \"client\" in either \"/gnu/store/qpr0zxgq5r4jz9mvk5y7b8s5yrwhdglw-tinmop-0.5.2-1.ceb965d/share/tinmop/client\" or \"/home/guillaume/.local/share/tinmop//client\"." {100BBD1EA3}>) [external]
error finding frame source: Bogus form-number: the source file has probably
changed too much to cope with.
source: NIL
0]
--8<---------------cut here---------------end--------------->8---
Is there some extra configuration required to start the program
correctly?
[-- Attachment #1.2: tinmop-guix.scm --]
[-- Type: application/octet-stream, Size: 20593 bytes --]
;;; Copyright © 2021 cage released under GPLv3+
;;; derived from:
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014 John Darrington <jmd@gnu.org>
;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org>
;;; Copyright © 2015 Siniša Biđin <sinisa@bidin.eu>
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
;;; Copyright © 2015 xd1le <elisp.vim@gmail.com>
;;; Copyright © 2015, 2016 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2016 Al McElrath <hello@yrns.org>
;;; Copyright © 2016 Carlo Zancanaro <carlo@zancanaro.id.au>
;;; Copyright © 2016 Danny Milosavljevic <dannym@scratchpost.org>
;;; Copyright © 2016 Federico Beffa <beffa@fbengineering.ch>
;;; Copyright © 2016 Ivan Vilata i Balaguer <ivan@selidor.net>
;;; Copyright © 2016 doncatnip <gnopap@gmail.com>
;;; Copyright © 2016, 2017 Andy Patterson <ajpatter@uwaterloo.ca>
;;; Copyright © 2016, 2017 Nikita <nikita@n0.is>
;;; Copyright © 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016, 2017, 2018, 2020 Nikita <nikita@n0.is>
;;; Copyright © 2017 Mekeor Melire <mekeor.melire@gmail.com>
;;; Copyright © 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017, 2019 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2017, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017, 2019, 2020 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2017, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018 Alex Vong <alexvong1995@gmail.com>
;;; Copyright © 2018 Benjamin Slade <slade@jnanam.net>
;;; Copyright © 2018 Pierre-Antoine Rouby <contact@parouby.fr>
;;; Copyright © 2018, 2019 Meiyo Peng <meiyo@riseup.net>
;;; Copyright © 2018, 2019 Pierre Langlois <pierre.langlois@gmx.com>
;;; Copyright © 2018, 2019, 2020 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018, 2020 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2019 Brett Gilio <brettg@gnu.org>
;;; Copyright © 2019 Evan Straw <evan.straw99@gmail.com>
;;; Copyright © 2019 Gábor Boskovits <boskovits@gmail.com>
;;; Copyright © 2019 Ingo Ruhnke <grumbel@gmail.com>
;;; Copyright © 2019 Jesse Gildersleve <jessejohngildersleve@protonmail.com>
;;; Copyright © 2019 John Soo <jsoo1@asu.edu>
;;; Copyright © 2019 Kyle Andrews <kyle.c.andrews@gmail.com>
;;; Copyright © 2019 Noodles! <nnoodle@chiru.no>
;;; Copyright © 2019 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2019 Tanguy Le Carrour <tanguy@bioneland.org>
;;; Copyright © 2019 Timothy Sample <samplet@ngyro.com>
;;; Copyright © 2019, 2020 Alexandru-Sergiu Marton <brown121407@member.fsf.org>
;;; Copyright © 2019, 2020 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2019, 2020 Katherine Cox-Buday <cox.katherine.e@gmail.com>
;;; Copyright © 2020 Adam Kandur <rndd@tuta.io>
;;; Copyright © 2020 Boris A. Dekshteyn <harlequin78@gmail.com>
;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re>
;;; Copyright © 2020 Dimakis Dimakakos <me@bendersteed.tech>
;;; Copyright © 2020 EuAndreh <eu@euandre.org>
;;; Copyright © 2020 Konrad Hinsen <konrad.hinsen@fastmail.net>
;;; Copyright © 2020 Marcin Karpezo <sirmacik@wioo.waw.pl>
;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2020 Zhu Zihao <all_but_last@163.com>
;;; Copyright © 2021 Sharlatan Hellseher <sharlatanus@gmail.com>
;;;
;;; This file is not part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; and
;;;
;;; Copyright (c) 2010 Zachary Beane, All Rights Reserved
;;;
;;; Redistribution and use in source and binary forms, with or without
;;; modification, are permitted provided that the following conditions
;;; are met:
;;;
;;; * Redistributions of source code must retain the above copyright
;;; notice, this list of conditions and the following disclaimer.
;;;
;;; * Redistributions in binary form must reproduce the above
;;; copyright notice, this list of conditions and the following
;;; disclaimer in the documentation and/or other materials
;;; provided with the distribution.
;;;
;;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED
;;; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
;;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
;;; ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
;;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
;;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
;;; GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
;;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
;;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
;;;
;;; This file contains package definition file for tinmop and related libraries.
(define-module (tinmop-guix)
#:use-module (gnu packages)
#:use-module (gnu packages gettext)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages lisp)
#:use-module (gnu packages lisp-xyz)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages nano)
#:use-module (gnu packages tls)
#:use-module (gnu packages curl)
#:use-module (gnu packages gnupg)
#:use-module ((guix build asdf-build-system))
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix hg-download)
#:use-module (guix utils)
#:use-module (guix build-system asdf)
#:use-module ((guix build asdf-build-system) #:prefix asdf-build:)
#:use-module (guix build-system gnu))
(define-public tooter
(let ((commit "b8d4b245b1d946bc9da6f51a3d8c2dc43e4d3868")
(revision "1"))
(package
(name "tooter")
(version (git-version "1.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Shinmera/tooter")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0g40dlis4dbw4p3zxz3scx27b9zm8zlzihywapf5zqrdqfx5hpq9"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("tooter")))
(inputs
`(("sbcl-yason" ,sbcl-yason)
("sbcl-cl-ppcre" ,sbcl-cl-ppcre)
("sbcl-drakma" ,sbcl-drakma)
("sbcl-documentation-utils" ,sbcl-documentation-utils)))
(synopsis "Common Lisp client library for Mastodon instances")
(description "A Common Lisp client library for Mastodon instances.")
(home-page "https://shinmera.github.io/tooter/")
(license license:zlib))))
(define-public sbcl-croatoan
(let ((commit "89ecd147cf1548f569f23353b3ab656cfb74de1f")
(revision "1"))
(package
(name "sbcl-croatoan")
(version (git-version "0.0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/McParen/croatoan")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0pk4mym88531jx0f1zmm6gmvrmdjzj2zcl2cdywdsxvjygr53zyx"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("croatoan")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "ncurses/ncurses.lisp"
(("libncursesw" all)
(string-append (assoc-ref inputs "ncurses")
"/lib/"
all))))))))
(inputs
`(("ncurses" ,ncurses)
("sbcl-cffi" ,sbcl-cffi)
("sbcl-trivial-gray-streams" ,sbcl-trivial-gray-streams)
("sbcl-bordeaux-threads" ,sbcl-bordeaux-threads)))
(synopsis "High-level Lisp CLOS bindings for the ncurses terminal library")
(description "High-level Lisp CLOS bindings for the ncurses terminal library.")
(home-page "https://github.com/McParen/croatoan")
(license license:x11))))
(define-public sbcl-cl-spark
(let ((commit "4e34bcebdcf8e45265986eb43ad4ad03bb41a581")
(revision "1"))
(package
(name "sbcl-cl-spark")
(version (git-version "0.1.13" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/tkych/cl-spark")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0my1fsgi2rjaqkpk934f2bjy63pmnj7faza3fzvnk6k3l66y19nk"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("cl-spark")))
(inputs `(("sbcl-fiveam" ,sbcl-fiveam)))
(synopsis "Library to write histogram using utf-8 block characters")
(description "Library to write histogram using utf-8 block characters")
(home-page "https://github.com/tkych/cl-spark")
(license license:x11))))
(define-public sbcl-cl-access
(let ((commit "1b26db3760018cdc4624f880f0a1e0155d8f6c50")
(revision "1"))
(package
(name "sbcl-cl-access")
(version (git-version "1.5.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/sharplispers/access")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1knd3n4mpzkc97i1znbas32pscd30416isvmx2pjmgvar6k93pl5"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("access")))
(inputs
`(("sbcl-lisp-unit2" ,sbcl-lisp-unit2)
("sbcl-iterate" ,sbcl-iterate)
("sbcl-closer-mop" ,sbcl-closer-mop)
("sbcl-alexandria" ,sbcl-alexandria)
("sbcl-anaphora" ,sbcl-anaphora)
("sbcl-interpol" ,sbcl-cl-interpol)))
(synopsis "Common lisp library to unify access to dictionary-like data-structures")
(description "Common lisp library to unify access to dictionary structures ")
(home-page "https://github.com/sharplispers/access")
(license license:bsd-3))))
(define-public sbcl-sxql-composer
(let ((commit "2b2230cb01ae1b68e28921d99e4814046867fb75")
(revision "1"))
(package
(name "sbcl-sxql-composer")
(version (git-version "0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mmontone/sxql-composer")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1agkrj3ymskzc3c7pxbrj123d1kygjqcls145m0ap3i07q96hh1r"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("sxql-composer")))
(inputs
`(("sbcl-sxql" ,sbcl-sxql)))
(synopsis "Build and compose SXQL queries dynamically")
(description "Build and compose SXQL queries dynamically")
(home-page "https://github.com/mmontone/sxql-composer")
(license license:x11))))
(define-public sbcl-cl-i18n
(let ((commit "fa0aa5bef8dfbdf2d72f7cc9f49e848ccbb567aa")
(revision "1"))
(package
(name "sbcl-cl-i18n")
(version (git-version "0.5.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://notabug.org/cage/cl-i18n")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1hpsdbb3hd79bzbrnbqgk2j3f0ispxvk91snp08fm2z3f1sds5as"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("cl-i18n")))
(inputs
`(("sbcl-alexandria" ,sbcl-alexandria)
("sbcl-cl-ppcre-unicode" ,sbcl-cl-ppcre-unicode)
("sbcl-babel" ,sbcl-babel)))
(synopsis "Gettext-style internationalisation framework for Common Lisp")
(description "Gettext-style internationalisation framework for Common Lisp")
(home-page "https://notabug.org/cage/cl-i18n")
(license license:llgpl))))
(define-public sbcl-crypto-shortcuts
(let ((commit "7efd22d80e867cd8c9f8f363d4fe7b51ee2dadc0")
(revision "1"))
(package
(name "sbcl-crypto-shortcuts")
(version (git-version "2.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Shinmera/crypto-shortcuts")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0c0m0ar04jn7qf2v8c4sivamlzki03r13rnxy8b3n27rh9r6hgin"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("crypto-shortcuts")))
(inputs
`(("sbcl-ironclad" ,sbcl-ironclad)
("sbcl-cl-base64" ,sbcl-cl-base64)
("sbcl-flexi-stream" ,sbcl-flexi-streams)))
(synopsis "Collection of common cryptography functions")
(description "Collection of common cryptography functions")
(home-page "https://shinmera.github.io/crypto-shortcuts/")
(license license:zlib))))
(define-public sbcl-cl-html5-parser
(let ((commit "74a92eb3a183a0afd089ea33350e816e6b9aeefa")
(revision "1"))
(package
(name "sbcl-cl-html5-parser")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/rotatef/cl-html5-parser")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "04if61wigylsmn996rbfl8ylsd0d9hzdmg7p2wiglncibjzcl5k9"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:tests? #f
#:asd-systems '("cl-html5-parser")))
(inputs
`(("sbcl-cl-ppcre" ,sbcl-cl-ppcre)
("sbcl-string-case" ,sbcl-string-case)
("sbcl-flexi-stream" ,sbcl-flexi-streams)))
(synopsis "HTML5 parser for Common Lisp")
(description "HTML5 parser for Common Lisp")
(home-page "https://github.com/rotatef/cl-html5-parser")
(license license:gpl3+))))
(define-public sbcl-percent-encoding
(let ((commit "c1224e22bc8048fbd3ebbc9329715a0c1b673170")
(revision "1"))
(package
(name "sbcl-percent-encoding")
(version (git-version "0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/llibra/percent-encoding")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0q1lh3sa6mkjr5gcdkgimkpc29rgf9cjhv90f61h8ridj28grq0h"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("percent-encoding")))
(inputs
`(("sbcl-fiveam" ,sbcl-fiveam)
("sbcl-anaphora" ,sbcl-anaphora)
("sbcl-babel" ,sbcl-babel)))
(synopsis "RFC 3986 percent-encoding library")
(description "RFC 3986 percent-encoding library")
(home-page "https://github.com/llibra/percent-encoding")
(license license:x11))))
(define-public sbcl-esrap
(let ((commit "da6b24fb18bdb8e7e177bcf2820cdaf0b560deb6")
(revision "1"))
(package
(name "sbcl-esrap")
(version (git-version "0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/scymtym/esrap")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "12vf3bxwzf8icnf6rw1xalvm7493cfbb46r2vlhc09s59djkf39q"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:tests? #f
#:asd-systems '("esrap")))
(inputs
`(("sbcl-alexandria" ,sbcl-alexandria)))
(synopsis "Common Lisp packrat parser")
(description "Common Lisp packrat parser")
(home-page "https://github.com/scymtym/esrap")
(license license:x11))))
(define-public tinmop
(let ((commit "ceb965dc83efa6b0f95411fe3b9c0d35ba7c72a8")
(revision "1"))
(package
(name "tinmop")
(version (git-version "0.5.2" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://notabug.org/cage/tinmop/")
(commit commit)))
(file-name (git-file-name name version))
(sha256 (base32 "0y422g5dw944szqrd8kvnfgq2hgx89kh77dgdabqjqkmf9bzdszx"))))
(build-system gnu-build-system)
(native-inputs
`(
("gettext" ,gnu-gettext)
("sbcl" ,sbcl)
("curl" ,curl)
("gnupg" ,gnupg)))
(inputs
`(("cl-asdf" ,cl-asdf)
("xdg-utils" ,xdg-utils)
("nano" ,nano)
("openssl" ,openssl)
("sbcl-alexandria" ,sbcl-alexandria)
("sbcl-cl-ppcre" ,sbcl-cl-ppcre)
("tooter" ,tooter)
("sbcl-croatoan" ,sbcl-croatoan)
("sbcl-osicat" ,sbcl-osicat)
("sbcl-cl-spark" ,sbcl-cl-spark)
("sbcl-cl-access" ,sbcl-cl-access)
("sbcl-cl-sqlite" ,sbcl-cl-sqlite)
("sbcl-sxql" ,sbcl-sxql)
("sbcl-sxql-composer" ,sbcl-sxql-composer)
("sbcl-marshal" ,sbcl-marshal)
("sbcl-bordeaux-threads" ,sbcl-bordeaux-threads)
("sbcl-cl-base64" ,sbcl-cl-base64)
("sbcl-cl+ssl" ,sbcl-cl+ssl)
("sbcl-log4cl" ,sbcl-log4cl)
("sbcl-local-time" ,sbcl-local-time)
("sbcl-cl-colors2" ,sbcl-cl-colors2)
("sbcl-cl-i18n" ,sbcl-cl-i18n)
("sbcl-clunit2" ,sbcl-clunit2)
("sbcl-esrap" ,sbcl-esrap)
("sbcl-ieee-floats" ,sbcl-ieee-floats)
("sbcl-parse-number" ,sbcl-parse-number)
("sbcl-cl-html5-parser" ,sbcl-cl-html5-parser)
("sbcl-unix-opts" ,sbcl-unix-opts)
("sbcl-crypto-shortcuts" ,sbcl-crypto-shortcuts)
("sbcl-drakma" ,sbcl-drakma)
("sbcl-usocket" ,sbcl-usocket)
("sbcl-babel" ,sbcl-babel)
("sbcl-percent-encoding" ,sbcl-percent-encoding)))
(arguments
`(#:tests? #f
;; #:make-flags
;; (list (string-append "DESTDIR=" (assoc-ref %outputs "out")))
#:strip-binaries? #f
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'set-home
(lambda _
(setenv "HOME" "/tmp")
#t))
(add-after 'configure 'fix-asdf
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "Makefile.in"
(("LISP_COMPILER) ")
"LISP_COMPILER) --eval \"(require 'asdf)\" --eval \"(push \\\"$$(pwd)/\\\" asdf:*central-registry*)\" "))
#t)))))
(synopsis "Gemini and pleroma client with a terminal interface")
(description "Gemini and pleroma client with a terminal interface")
(home-page "https://www.autistici.org/interzona/tinmop.html")
(license license:gpl3+))))
tinmop
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 247 bytes --]
^ permalink raw reply [flat|nested] 4+ messages in thread