fetching git submodule using (uri (recursive? #t))

[Myles English <mylesenglish@gmail.com>]

Hello guix,

I am trying to build this package that uses git submodules but the
(recursive? #t) doesn't seem to have any effect.  I understand that it
would be preferable to replace the submodules with separate packages but
the modules themselves are quite specific to the main package,
e.g. https://github.com/solvespace/libdxfrw describes itself as
"SolveSpace's independent fork of libdxfrw".

The actual build error is:

-- Using in-tree libdxfrw
CMake Error at CMakeLists.txt:111 (add_subdirectory):
  The source directory

    /tmp/guix-build-solvespace-git-0.0.1.drv-0/source/extlib/libdxfrw

  does not contain a CMakeLists.txt file.


(define-public solvespace-git
  (let ((commit "03fa5f30f1a1db7231a25653c9dd38044fe06640"))
    (package
     (name "solvespace-git")
     (version "0.0.1")
     (source
      (origin
       (method git-fetch)
       (uri (git-reference
	     (url "https://github.com/solvespace/solvespace.git")
	     (commit commit)
	     (recursive? #t)))
       (sha256
	(base32
	 "0vj40j7fkd0mmwh7p5r1h8gsisfjcikrhwmy1dzi4hpz0w7arxqb"))))
     (build-system cmake-build-system)
     (arguments
      `(#:configure-flags '("-DCMAKE_BUILD_TYPE=Release")
	#:phases
	(modify-phases %standard-phases
		       (add-after 'unpack 'set-git-commit-hash
				  (lambda* (#:key inputs #:allow-other-keys)
				    (substitute* "CMakeLists.txt"
						 (("include\\(GetGitCommitHash\\)")
						  "#include(GetGitCommitHash)")
						 (("\\# set\\(GIT_COMMIT_HASH 0000000000000000000000000000000000000000\\)")
						  (string-append "set(GIT_COMMIT_HASH " ,commit ")")))
				    #t)))))
     (inputs
      `(
	("git" ,git)
	("libpng" ,libpng)
	("cairo" ,cairo)
	("freetype" ,freetype)
	("json-c" ,json-c)
	;; for GUI
	("fontconfig" ,fontconfig)
	("gtkmm" ,gtkmm) ;;@3.0
	("pangomm" ,pangomm) ;;@1.4
	;;       ("gl" ,gl)
	("glu" ,glu)
	;; optional: libspnav
	))
     (home-page "http://solvespace.com")
     (synopsis "Parametric 3D CAD too")
     (description "Parametric 3D CAD too")
     (license license:gpl3+))))


Thanks,
Myles