From c0f95d0acafd0cef74b8950301fe29afe4ee7999 Mon Sep 17 00:00:00 2001
From: TakeV <takev@disroot.org>
Date: Wed, 12 Jul 2023 01:48:27 -0700
Subject: [PATCH] Add package for guile-toml

---
 .guix/modules/guix-toml.scm | 39 +++++++++++++++++++++++++++++++++++++
 guix.scm                    |  1 +
 2 files changed, 40 insertions(+)
 create mode 100644 .guix/modules/guix-toml.scm
 create mode 120000 guix.scm

diff --git a/.guix/modules/guix-toml.scm b/.guix/modules/guix-toml.scm
new file mode 100644
index 0000000..78922dc
--- /dev/null
+++ b/.guix/modules/guix-toml.scm
@@ -0,0 +1,39 @@
+(define-module (guix-toml)
+	#:use-module (guix)
+	#:use-module (guix git-download)
+	#:use-module (guix packages)
+	#:use-module ((guix licenses) #:prefix license:)
+	#:use-module (guix build-system guile)
+	#:use-module (gnu packages)
+	#:use-module (gnu packages guile)
+	#:use-module (gnu packages pkg-config))
+
+(define vcs-file?
+	(or (git-predicate "../..")
+			(const #t)))
+
+(define-public guile-toml
+	(package
+		(name "guix-toml")
+		(version "0.1-src")
+		(source (local-file "../.." "guile-toml"
+												#:recursive? #t
+												#:select? vcs-file?))
+		(arguments
+		 (list
+			#:phases
+			#~(modify-phases %standard-phases
+					(add-after 'unpack 'remove-guix
+						(lambda _
+							(begin
+								(delete-file "guix.scm")
+								(delete-file ".guix/modules/guix-toml.scm")))))))
+		(build-system guile-build-system)
+		(native-inputs (list pkg-config guile-3.0 guile-json-4))
+		(propagated-inputs (list guile-json-4))
+		(synopsis "")
+		(description "")
+		(home-page "")
+		(license license:gpl3+)))
+
+guile-toml
diff --git a/guix.scm b/guix.scm
new file mode 120000
index 0000000..dafbcb5
--- /dev/null
+++ b/guix.scm
@@ -0,0 +1 @@
+.guix/modules/guix-toml.scm
\ No newline at end of file