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.

1 files changed, 8 insertions, 1 deletions

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)