Gentoo Archives: gentoo-commits

From: "Maciej Barć" <xgqt@g.o>
To: gentoo-commits@l.g.o
Subject: [gentoo-commits] repo/gentoo:master commit in: app-emacs/geiser-mit/, app-emacs/geiser-mit/files/
Date: Wed, 31 Aug 2022 23:37:22
Message-Id: 1661989037.fd0f35d3a5010ffcaf74976e8f464ec66b74ba0a.xgqt@gentoo
1 commit: fd0f35d3a5010ffcaf74976e8f464ec66b74ba0a
2 Author: Maciej Barć <xgqt <AT> gentoo <DOT> org>
3 AuthorDate: Wed Aug 31 23:32:16 2022 +0000
4 Commit: Maciej Barć <xgqt <AT> gentoo <DOT> org>
5 CommitDate: Wed Aug 31 23:37:17 2022 +0000
6 URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=fd0f35d3
7
8 app-emacs/geiser-mit: new package; add version 0.15
9
10 Signed-off-by: Maciej Barć <xgqt <AT> gentoo.org>
11
12 app-emacs/geiser-mit/Manifest | 1 +
13 app-emacs/geiser-mit/files/50geiser-mit-gentoo.el | 5 ++
14 .../geiser-mit/files/geiser-mit-src-dir.patch | 13 ++++++
15 app-emacs/geiser-mit/geiser-mit-0.15.ebuild | 54 ++++++++++++++++++++++
16 app-emacs/geiser-mit/metadata.xml | 17 +++++++
17 5 files changed, 90 insertions(+)
18
19 diff --git a/app-emacs/geiser-mit/Manifest b/app-emacs/geiser-mit/Manifest
20 new file mode 100644
21 index 000000000000..ba55cbe2ce89
22 --- /dev/null
23 +++ b/app-emacs/geiser-mit/Manifest
24 @@ -0,0 +1 @@
25 +DIST geiser-mit-0.15.tar.gz 6216 BLAKE2B d14f412730e86ef580bb13426e3af558403acc00cd1c742507f66f80369a644581c98310803430439ff09b1c13eefe550f6dbc3289897ae86e6471b7197d73cc SHA512 e2d7a81a66293e5232f510eb4cf1707c3ab64ac77a36c29b55d17275a2d0141302e28d29e4280e388f3107db3a961e757e9127219e36b76b1680fa54fee48593
26
27 diff --git a/app-emacs/geiser-mit/files/50geiser-mit-gentoo.el b/app-emacs/geiser-mit/files/50geiser-mit-gentoo.el
28 new file mode 100644
29 index 000000000000..ede47a83779c
30 --- /dev/null
31 +++ b/app-emacs/geiser-mit/files/50geiser-mit-gentoo.el
32 @@ -0,0 +1,5 @@
33 +(add-to-list 'load-path "@SITELISP@")
34 +(autoload 'run-mit "geiser-mit"
35 + "Start a Geiser MIT/GNU Scheme REPL." t)
36 +(autoload 'switch-to-mit "geiser-mit"
37 + "Start a Geiser MIT/GNU Scheme REPL, or switch to a running one." t)
38
39 diff --git a/app-emacs/geiser-mit/files/geiser-mit-src-dir.patch b/app-emacs/geiser-mit/files/geiser-mit-src-dir.patch
40 new file mode 100644
41 index 000000000000..9d0c26f43def
42 --- /dev/null
43 +++ b/app-emacs/geiser-mit/files/geiser-mit-src-dir.patch
44 @@ -0,0 +1,13 @@
45 +diff --git a/geiser-mit.el b/geiser-mit.el
46 +index 53edf0e..2dfe9fa 100644
47 +--- a/geiser-mit.el
48 ++++ b/geiser-mit.el
49 +@@ -61,7 +61,7 @@
50 + geiser-mit-binary))
51 +
52 + (defvar geiser-mit-scheme-dir
53 +- (expand-file-name "src" (file-name-directory load-file-name))
54 ++ (expand-file-name "src" "@SITEETC@")
55 + "Directory where the MIT scheme geiser package is installed.")
56 +
57 + (defun geiser-mit--parameters ()
58
59 diff --git a/app-emacs/geiser-mit/geiser-mit-0.15.ebuild b/app-emacs/geiser-mit/geiser-mit-0.15.ebuild
60 new file mode 100644
61 index 000000000000..06d56c668e75
62 --- /dev/null
63 +++ b/app-emacs/geiser-mit/geiser-mit-0.15.ebuild
64 @@ -0,0 +1,54 @@
65 +# Copyright 1999-2022 Gentoo Authors
66 +# Distributed under the terms of the GNU General Public License v2
67 +
68 +EAPI=8
69 +
70 +NEED_EMACS=24.4
71 +
72 +inherit elisp
73 +
74 +DESCRIPTION="MIT/GNU Scheme's implementation of the Geiser protocols"
75 +HOMEPAGE="https://gitlab.com/emacs-geiser/mit/"
76 +SRC_URI="https://gitlab.com/emacs-geiser/mit/-/archive/${PV}/mit-${PV}.tar.gz
77 + -> ${P}.tar.gz"
78 +S="${WORKDIR}"/mit-${PV}
79 +
80 +LICENSE="BSD"
81 +SLOT="0"
82 +KEYWORDS="~amd64"
83 +
84 +RDEPEND="
85 + app-emacs/geiser
86 + dev-scheme/mit-scheme
87 +"
88 +BDEPEND="${RDEPEND}"
89 +
90 +DOCS=( readme.org )
91 +PATCHES=( "${FILESDIR}"/${PN}-src-dir.patch )
92 +SITEFILE="50${PN}-gentoo.el"
93 +
94 +src_prepare() {
95 + elisp_src_prepare
96 +
97 + sed "s|@SITEETC@|${EPREFIX}${SITEETC}/${PN}|" -i ${PN}.el || die
98 +}
99 +
100 +src_compile() {
101 + elisp_src_compile
102 +
103 + local scms=$(find "${S}" -type f -name "*.scm")
104 + local opts=(
105 + --interactive
106 + --eval "(for-each (lambda (s) (load (symbol->string s))) '(${scms}))"
107 + --eval "(for-each (lambda (s) (cf (symbol->string s))) '(${scms}))"
108 + --eval "(exit)"
109 + )
110 + mit-scheme "${opts[@]}" || die "failed to compile scheme source files"
111 +}
112 +
113 +src_install() {
114 + elisp_src_install
115 +
116 + insinto ${SITEETC}/${PN}
117 + doins -r src
118 +}
119
120 diff --git a/app-emacs/geiser-mit/metadata.xml b/app-emacs/geiser-mit/metadata.xml
121 new file mode 100644
122 index 000000000000..ff6c7d9aad3c
123 --- /dev/null
124 +++ b/app-emacs/geiser-mit/metadata.xml
125 @@ -0,0 +1,17 @@
126 +<?xml version="1.0" encoding="UTF-8"?>
127 +<!DOCTYPE pkgmetadata SYSTEM "https://www.gentoo.org/dtd/metadata.dtd">
128 +
129 +<pkgmetadata>
130 + <maintainer type="project">
131 + <email>gnu-emacs@g.o</email>
132 + <name>Gentoo GNU Emacs project</name>
133 + </maintainer>
134 + <maintainer type="project">
135 + <email>scheme@g.o</email>
136 + <name>Gentoo Scheme Project</name>
137 + </maintainer>
138 + <upstream>
139 + <bugs-to>https://gitlab.com/emacs-geiser/mit/-/issues/</bugs-to>
140 + <remote-id type="gitlab">emacs-geiser/mit</remote-id>
141 + </upstream>
142 +</pkgmetadata>