(use-modules
 (guix packages)
 ((guix licenses) #:prefix license:)
 (guix gexp)
 (guix git-download)
 (guix utils)
 (guix build-system copy)
 (gnu packages)
 (gnu packages autotools)
 (gnu packages guile)
 (gnu packages guile-xyz)
 (gnu packages pkg-config)
 (gnu packages texinfo))

(define vcs-file?
  (or (git-predicate (current-source-directory))
      (const #t)))

(define-public guile-docs
  (package
    (name "guile-guile-docs")
    (version "0.1")
    (source (local-file "." "guile-checkout"
                        #:recursive? #t
                        #:select? vcs-file?))
    (build-system copy-build-system)
    (arguments `())
    (native-inputs
     `(("autoconf" ,autoconf)
       ("automake" ,automake)
       ("pkg-config" ,pkg-config)
       ("texinfo" ,texinfo)))
    (inputs (list guile-3.0
                  haunt))
    (propagated-inputs `())
    (synopsis "")
    (description "")
    (home-page "")
    (license license:gpl3+)))

guile-docs