app-emacs/geiser-chez: new package; add version 0.17

Signed-off-by: Maciej Barć <xgqt@gentoo.org>

6 files changed, 91 insertions, 0 deletions

diff --git a/app-emacs/geiser-chez/Manifest b/app-emacs/geiser-chez/Manifest
new file mode 100644
index 000000000000..13aabdb1033a
--- /dev/null
+++ b/app-emacs/geiser-chez/Manifest
@@ -0,0 +1 @@
+DIST geiser-chez-0.17.tar.gz 6664 BLAKE2B d4f72de512e9d443a1ea2dc0cf6cf03f59980097ff26dd51df7a618c651c5beef142c42b1dea9bb56f94fe4a97b370c6844231eea8968618f6d0dbff499c601d SHA512 bfb1e77a3a0be3750e0e30c421a2b34179edbdb3585fe318c3f6a5a14d7220b3933c63cb970e80af4e14f8d220b620915192d7a34759cc91dfed45878d63ed6e
diff --git a/app-emacs/geiser-chez/files/50geiser-chez-gentoo.el b/app-emacs/geiser-chez/files/50geiser-chez-gentoo.el
new file mode 100644
index 000000000000..e839ddce889c
--- /dev/null
+++ b/app-emacs/geiser-chez/files/50geiser-chez-gentoo.el
@@ -0,0 +1,5 @@
+(add-to-list 'load-path "@SITELISP@")
+(autoload 'run-chez "geiser-chez"
+  "Start a Geiser Chez REPL." t)
+(autoload 'switch-to-chez "geiser-chez"
+  "Start a Geiser Chez REPL, or switch to a running one." t)
diff --git a/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-binary.patch b/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-binary.patch
new file mode 100644
index 000000000000..321dffa716f6
--- /dev/null
+++ b/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-binary.patch
@@ -0,0 +1,12 @@
+index 7f29927..45c194e 100644
+--- a/geiser-chez.el
++++ b/geiser-chez.el
+@@ -40,7 +40,7 @@
+   :group 'geiser)
+ 
+ (geiser-custom--defcustom geiser-chez-binary
+-    "scheme"
++    "chezscheme"
+   "Name to use to call the Chez Scheme executable when starting a REPL."
+   :type '(choice string (repeat string))
+   :group 'geiser-chez)
diff --git a/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-src-dir.patch b/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-src-dir.patch
new file mode 100644
index 000000000000..547c8663012b
--- /dev/null
+++ b/app-emacs/geiser-chez/files/geiser-chez-chez-scheme-src-dir.patch
@@ -0,0 +1,12 @@
+index 7f29927..cc1f4ca 100644
+--- a/geiser-chez.el
++++ b/geiser-chez.el
+@@ -78,7 +78,7 @@ init file at this location in remote host."
+     geiser-chez-binary))
+ 
+ (defvar geiser-chez-scheme-dir
+-  (expand-file-name "src" (file-name-directory load-file-name))
++  (expand-file-name "src" "@SITEETC@")
+   "Directory where the Chez scheme geiser modules are installed.")
+ 
+ (defun geiser-chez--parameters ()
diff --git a/app-emacs/geiser-chez/geiser-chez-0.17.ebuild b/app-emacs/geiser-chez/geiser-chez-0.17.ebuild
new file mode 100644
index 000000000000..9aa98f60f933
--- /dev/null
+++ b/app-emacs/geiser-chez/geiser-chez-0.17.ebuild
@@ -0,0 +1,44 @@
+# Copyright 1999-2022 Gentoo Authors
+# Distributed under the terms of the GNU General Public License v2
+
+EAPI=8
+
+NEED_EMACS=26.1
+
+inherit elisp
+
+DESCRIPTION="Chez Scheme's implementation of the Geiser protocols"
+HOMEPAGE="https://gitlab.com/emacs-geiser/chez/"
+SRC_URI="https://gitlab.com/emacs-geiser/chez/-/archive/${PV}/chez-${PV}.tar.gz
+			-> ${P}.tar.gz"
+S="${WORKDIR}"/chez-${PV}
+
+LICENSE="BSD"
+SLOT="0"
+KEYWORDS="~amd64 ~x86"
+
+BDEPEND="app-emacs/geiser"
+RDEPEND="
+	${BDEPEND}
+	dev-scheme/chez
+"
+
+DOCS=( readme.org )
+PATCHES=(
+	"${FILESDIR}"/${PN}-chez-scheme-binary.patch
+	"${FILESDIR}"/${PN}-chez-scheme-src-dir.patch
+)
+SITEFILE="50${PN}-gentoo.el"
+
+src_prepare() {
+	elisp_src_prepare
+
+	sed "s|@SITEETC@|${EPREFIX}${SITEETC}/${PN}|" -i ${PN}.el || die
+}
+
+src_install() {
+	elisp_src_install
+
+	insinto ${SITEETC}/${PN}
+	doins -r src
+}
diff --git a/app-emacs/geiser-chez/metadata.xml b/app-emacs/geiser-chez/metadata.xml
new file mode 100644
index 000000000000..a2f55c9af35d
--- /dev/null
+++ b/app-emacs/geiser-chez/metadata.xml
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE pkgmetadata SYSTEM "https://www.gentoo.org/dtd/metadata.dtd">
+
+<pkgmetadata>
+  <maintainer type="project">
+    <email>gnu-emacs@gentoo.org</email>
+    <name>Gentoo GNU Emacs project</name>
+  </maintainer>
+  <maintainer type="project">
+    <email>scheme@gentoo.org</email>
+    <name>Gentoo Scheme Project</name>
+  </maintainer>
+  <upstream>
+    <bugs-to>https://gitlab.com/emacs-geiser/chez/-/issues/</bugs-to>
+    <remote-id type="gitlab">emacs-geiser/chez</remote-id>
+  </upstream>
+</pkgmetadata>