From 02a1e4e2a82628216046957e929b7f8ec11c6544 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 3 Jan 2023 14:27:04 +0000
Subject: guix.scm: Build package from local source.

* guix.scm: Import (guix gexp) and (guix git-download).
(%source-dir): New variable.
(guile-email)[source]: Use local source.
---
 guix.scm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/guix.scm b/guix.scm
index 5245156..32b6388 100644
--- a/guix.scm
+++ b/guix.scm
@@ -22,13 +22,20 @@
 ;;;
 ;;;  $ guix environment -l guix.scm
 
-(use-modules (guix packages)
+(use-modules (guix gexp)
+             (guix git-download)
+             (guix packages)
              (gnu packages autotools)
              (gnu packages guile-xyz)
              (gnu packages texinfo))
 
+(define %source-dir (dirname (current-filename)))
+
 (package
   (inherit guile-email)
+  (source (local-file %source-dir
+                      #:recursive? #t
+                      #:select? (git-predicate %source-dir)))
   (native-inputs
    `(,@(package-native-inputs guile-email)
      ("autoconf" ,autoconf)
-- 
cgit v1.2.3