Commit Diff


commit - da4022abeed75da03af91c19e89fb77b6a2c39ce
commit + 489c6310a6f64bc73ea3eeda5dc9a96ad8bf5043
blob - 21b2eb836a1ce7d47d6a4d08779373a5a8d9728e
blob + 1c5aef4099c14a998dea30f500beabf642af6879
--- vc-got.el
+++ vc-got.el
@@ -600,7 +600,9 @@ Got uses an implicit checkout model for every file."
   "Commit FILES with COMMENT as commit message."
   (with-temp-buffer
     (unless (zerop (vc-got--call "commit" "-m"
-                                 (log-edit-extract-headers nil comment)
+                                 (log-edit-extract-headers
+                                  '(("Author" . "-A"))
+                                  comment)
                                  "--"
                                  files))
       (error "[vc-got] can't commit: %s" (buffer-string)))))