The current directory will be set to the top of that repository; NAME
will be bound to that directory's file name. Once BODY exits, the
-directory will be deleted."
+directory will be deleted.
+
+Some dummy environment variables will be set for the duration of BODY to
+allow 'git commit' to determine identities for authors and committers."
(declare (indent 1))
`(ert-with-temp-directory ,name
- (let ((default-directory ,name))
+ (let ((default-directory ,name)
+ (process-environment (append '("EMAIL=john@doe.ee"
+ "GIT_AUTHOR_NAME=A"
+ "GIT_COMMITTER_NAME=C")
+ process-environment)))
(vc-create-repo 'Git)
,@body)))