doom-emacs-config/+git.el at main · practicalli-archive/doom-emacs-config · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
;;; +git.el -*- lexical-binding: t; -*-

;; ---------------------------------------
;; Version Control configuration

;; Load magit-todos
(use-package! magit-todos)

;; Location of developer tokens - default ~/.authinfo
;; Use XDG_CONFIG_HOME location or HOME
;; Optional:  (setq auth-source-cache-expiry nil)   ; default is 7200 (2h)
(setq auth-sources (list
                    (concat (getenv "XDG_CONFIG_HOME") "/authinfo.gpg")
                    "~/.authinfo.gpg"))


;; Use Emacs as $EDITOR (or $GIT_EDITOR) for git commits messages
;; when using git commit on the command line
;; (global-git-commit-mode t)


;; Commit message checks
;; ~/.config/emacs/modules/emacs/vc/config.el
;; - checks for overlong-summary-line non-empty-line
;; (setq git-commit-summary-max-length 50
;;       git-commit-style-convention-checks '(overlong-summary-line non-empty-second-line))
(setq git-commit-summary-max-length 60

      ;; Highlight specific characters changed
      magit-diff-refine-hunk 'all

      ;; Show project TODO lines in Magit Status
      magit-todos-mode t

      ;; Show Libravatar of commit author
      magit-revision-show-gravatars '("^Author:     " . "^Commit:     ")
      )


;; Location of Git repositories
;; define paths and level of sub-directories to search
(setq magit-repository-directories
      '(("~/projects/" . 2)))


;; Number of topics displayed (issues, pull requests)
;; open & closed, negative number for closed topics
;; or `forge-toggle-closed-visibility'
;; set closed to 0 to never show closed issues
;; (setq  forge-topic-list-limit '(100 . 0))
(setq  forge-topic-list-limit '(100 . -10))


;; GitHub user and organization accounts owned
;; used by @ c f  to create a fork
(setq forge-owned-accounts
      '(("practicalli" "practicalli-john"
         "ClojureBridgeLondon" "ldnclj"
         "clojure-hacks"
         "reclojure")))


;; Blacklist specific accounts, over-riding forge-owned-accounts
;; (setq forge-owned-blacklist
;;       '(("bad-hacks" "really-bad-hacks")))
;;
;;
;;
;;
;; End of Version Control configuration
;; ---------------------------------------