Configure guix.scm to read the local dir

guix.scm

@@ -1,8 +1,10 @@
 (use-modules
   (guix packages)
   ((guix licenses) #:prefix license:)
-  (guix download)
-  (guix build-system gnu)
+  (guix gexp)
+  (guix git-download)
+  (guix utils)
+  (guix build-system copy)
   (gnu packages)
   (gnu packages autotools)
   (gnu packages guile)
@@ -10,11 +12,17 @@
   (gnu packages pkg-config)
   (gnu packages texinfo))
 
+(define vcs-file?
+  (or (git-predicate (current-source-directory))
+      (const #t)))
+
 (package
   (name "guile-guile-docs")
   (version "0.1")
-  (source "./guile-guile-docs-0.1.tar.gz")
-  (build-system gnu-build-system)
+  (source (local-file "." "guile-checkout"
+                      #:recursive? #t
+                      #:select? vcs-file?))
+  (build-system copy-build-system)
   (arguments `())
   (native-inputs
     `(("autoconf" ,autoconf)