@@ -4016,12 +4016,14 @@ errors.")
(method git-fetch)
(uri (git-reference
(url "https://code.divoplade.fr/mkdir-p.git")
- (commit "83e955ba612369336a69fe50fe023ad14fbe5d7c")))
- (sha256 (base32 "01k20rjcv6p0spmw8ls776aar6bfw0jxw46d2n12w0cb2p79xjv8"))
+ (commit (string-append "v" version))))
+ (sha256
+ (base32 "01k20rjcv6p0spmw8ls776aar6bfw0jxw46d2n12w0cb2p79xjv8"))
+ (file-name (git-file-name name version))
(snippet
`(begin
(with-output-to-file ".tarball-version"
- (lambda _ (format #t "~a~%" "1.0.1")))
+ (lambda _ (format #t "~a~%" ,version)))
#t))))
(build-system gnu-build-system)
(arguments `())
@@ -4034,14 +4036,12 @@ errors.")
("pkg-config" ,pkg-config)
("gettext" ,gnu-gettext)))
(inputs `(("guile" ,guile-3.0)))
- (propagated-inputs
- `(("guile" ,guile-3.0)))
- (synopsis "Implementation of a recursive mkdir for guile")
+ (synopsis "Implementation of a recursive @code{mkdir} for Guile")
(description
- "This package provides within the (mkdir-p) module the mkdir-p function
-that tries to create the chain of directories recursively. It also provides
-new versions of open-output-file, call-with-output-file and
-with-output-to-file to create the directory of its argument if it does not
-exist.")
+ "This package provides within the @code{(mkdir-p)} module the
+@code{mkdir-p} function that tries to create the chain of directories
+recursively. It also provides new versions of @code{open-output-file},
+@code{call-with-output-file} and @code{with-output-to-file} to create the
+directory of its argument if it does not exist.")
(home-page "https://mkdir-p.divoplade.fr")
(license license:asl2.0)))