diff --git a/core/core-ui.el b/core/core-ui.el index ecdb3ec6d..5f5f670ee 100644 --- a/core/core-ui.el +++ b/core/core-ui.el @@ -160,7 +160,10 @@ mode is detected.") (advice-add #'all-the-icons-alltheicon :around #'doom*disable-all-the-icons-in-tty)) (def-package! fringe-helper - :commands fringe-helper-define) + :commands (fringe-helper-define fringe-helper-convert) + :init + (unless (fboundp 'define-fringe-bitmap) + (fset 'define-fringe-bitmap (lambda (&rest _))))) (def-package! hideshow ; built-in :commands (hs-minor-mode hs-toggle-hiding hs-already-hidden-p) diff --git a/modules/ui/doom/config.el b/modules/ui/doom/config.el index 26cd4392d..4cb058c9c 100644 --- a/modules/ui/doom/config.el +++ b/modules/ui/doom/config.el @@ -111,32 +111,31 @@ ov 'display (propertize " [...] " 'face '+doom-folded-face)))))) -(when (and (display-graphic-p) (fboundp 'define-fringe-bitmap)) - ;; NOTE Adjust these bitmaps if you change `doom-ui-fringe-size' - (after! flycheck - ;; because git-gutter is in the left fringe - (setq flycheck-indication-mode 'right-fringe) - ;; A non-descript, left-pointing arrow - (fringe-helper-define 'flycheck-fringe-bitmap-double-arrow 'center - "...X...." - "..XX...." - ".XXX...." - "XXXX...." - ".XXX...." - "..XX...." - "...X....")) +;; NOTE Adjust these bitmaps if you change `doom-ui-fringe-size' +(after! flycheck + ;; because git-gutter is in the left fringe + (setq flycheck-indication-mode 'right-fringe) + ;; A non-descript, left-pointing arrow + (fringe-helper-define 'flycheck-fringe-bitmap-double-arrow 'center + "...X...." + "..XX...." + ".XXX...." + "XXXX...." + ".XXX...." + "..XX...." + "...X....")) - ;; subtle diff indicators in the fringe - (after! git-gutter-fringe - ;; places the git gutter outside the margins. - (setq-default fringes-outside-margins t) - ;; thin fringe bitmaps - (fringe-helper-define 'git-gutter-fr:added '(center repeated) - "XXX.....") - (fringe-helper-define 'git-gutter-fr:modified '(center repeated) - "XXX.....") - (fringe-helper-define 'git-gutter-fr:deleted 'bottom - "X......." - "XX......" - "XXX....." - "XXXX...."))) +;; subtle diff indicators in the fringe +(after! git-gutter-fringe + ;; places the git gutter outside the margins. + (setq-default fringes-outside-margins t) + ;; thin fringe bitmaps + (fringe-helper-define 'git-gutter-fr:added '(center repeated) + "XXX.....") + (fringe-helper-define 'git-gutter-fr:modified '(center repeated) + "XXX.....") + (fringe-helper-define 'git-gutter-fr:deleted 'bottom + "X......." + "XX......" + "XXX....." + "XXXX...."))