       diffscuss-author
     (diffscuss-git-user-name)))
 
+(defun diffscuss-get-email ()
+  "Get the author email to user for new comments."
+  (if diffscuss-email
+      diffscuss-email
+    (diffscuss-git-user-email)))
+
 (defun diffscuss-git-user-name ()
-  "Get the git user name"
+  "Get the git user name."
   (diffscuss-get-git-config "user.name"))
+
+(defun diffscuss-git-user-email ()
+  "Get the git user email."
+  (diffscuss-get-git-config "user.email"))
 
 (defun diffscuss-get-git-config (config-name)
   (with-temp-buffer

            header
            " author: "
            (diffscuss-get-author)
            "\n"
            header
            " date: "


;;; Config variables

;; By default, diffscuss will use your git config user.name for new
;; comments.  You can override that here.
(defvar diffscuss-author nil)

;; By default, diffscuss will use your git config user.email for new
;; comments.  You can override that here.
(defvar diffscuss-email nil)

;; Where to find git, by default assume it's whatever version is in
;; the path.
