add gui, mail and programming language settings

settings/ledger-settings.el

@@ -0,0 +1,44 @@
+;;; ledger-settings.el --- ledger settings  -*- lexical-binding: t -*-
+
+;;; Commentary:
+;; https://github.com/ledger/ledger-mode
+
+;; Requirements:
+;;   programs
+;;     ledger https://www.ledger-cli.org/download.html
+;;   Emacs packages
+;;     ledger-mode ;; https://melpa.org/#/ledger-mode
+;;       org
+;;     flycheck-ledger ;; https://melpa.org/#/flycheck-ledger
+;;     company-ledger ;; https://melpa.org/#/company-ledger
+
+;;; Code:
+(use-package ledger-mode
+  :load-path (lambda() (concat user-emacs-directory "lisp/ledger-mode"))
+  :delight
+  (ledger-mode "🅛ｄ") ; "Le "
+  (ledger-report-mode "🅛dr") ; "LeR 🅖⒭"
+  :commands ledger-mode
+  :mode "\\.ledger\\'"
+  :config
+  (setq ledger-post-account-alignment-column 2)
+  (setq ledger-post-amount-alignment-column 62)
+  )
+
+(use-package flycheck-ledger
+  :after (ledger-mode flycheck)
+  )
+
+(use-package company-ledger
+  :after (ledger-mode company)
+  :config
+  ;;(add-to-list 'company-backends 'company-ledger)
+  ;; Only use company-mode with company-ledger in ledger-mode
+  (add-hook 'ledger-mode-hook
+            (lambda ()
+              (set (make-local-variable 'company-backends)
+                   '(company-ledger company-capf company-files))))
+  )
+
+(provide 'ledger-settings)
+;;; ledger-settings.el ends here