Dracula theme

This commit is contained in:
ignuki
2018-09-20 21:53:41 +02:00
parent 120ea05ea1
commit de6261c388

47
init.el
View File

@@ -13,8 +13,8 @@
(defvar prelude-packages (defvar prelude-packages
'(async counsel dracula-theme evil evil-magit fill-column-indicator ghc '(async counsel dracula-theme evil evil-magit fill-column-indicator ghc
git-commit go-mode goto-chg haskell-mode ivy less-css-mode magit git-commit go-mode goto-chg haskell-mode ivy less-css-mode magit
magit-popup pkg-info s swiper undo-tree use-package use-package-chords magit-popup pkg-info python s swiper undo-tree use-package
web-mode with-editor) use-package-chords web-mode with-editor)
"A list of packages to ensure are installed at launch.") "A list of packages to ensure are installed at launch.")
(dolist (pkg prelude-packages) (dolist (pkg prelude-packages)
@@ -54,9 +54,9 @@
vc-mode 1) vc-mode 1)
(global-auto-revert-mode 1) (global-auto-revert-mode 1)
(electric-pair-mode 1)
(show-paren-mode t)
(fringe-mode '(0 . 0)) (fringe-mode '(0 . 0))
(show-paren-mode t)
(electric-pair-mode 1)
(global-hl-line-mode 1) (global-hl-line-mode 1)
(blink-cursor-mode 0) (blink-cursor-mode 0)
(display-time-mode 1) (display-time-mode 1)
@@ -143,12 +143,13 @@
(require 'use-package) (require 'use-package)
(use-package ivy (use-package ivy
:init :init (setq ivy-use-virtual-buffers t
(setq ivy-use-virtual-buffers t
ivy-count-format "" ivy-count-format ""
ivy-display-style nil) ivy-display-style nil)
:config :config (ivy-mode 1))
(ivy-mode 1))
(use-package dracula-theme
:config (load-theme 'dracula t))
(use-package swiper (use-package swiper
:bind (("C-s" . swiper))) :bind (("C-s" . swiper)))
@@ -157,21 +158,12 @@
:bind (("M-x" . counsel-M-x) :bind (("M-x" . counsel-M-x)
("C-x C-f" . counsel-find-file))) ("C-x C-f" . counsel-find-file)))
;;(use-package projectile)
;;(use-package cl)
(use-package evil (use-package evil
:init :init (setq evil-want-fine-undo t)
(setq evil-want-fine-undo t) :config (evil-mode 1))
;; (add-to-list 'evil-insert-state-modes 'lisp-interaction-mode)
:config
(evil-mode 1))
;;(use-package magit)
(use-package evil-magit (use-package evil-magit
:init :init (setq evil-magit-state 'normal))
(setq evil-magit-state 'normal))
(use-package fill-column-indicator (use-package fill-column-indicator
:init :init
@@ -194,8 +186,7 @@
:mode ("\\.mustache\\'" . web-mode) :mode ("\\.mustache\\'" . web-mode)
:mode ("\\.djhtml\\'" . web-mode) :mode ("\\.djhtml\\'" . web-mode)
:mode ("\\.html?\\'" . web-mode) :mode ("\\.html?\\'" . web-mode)
:init :init (setq web-mode-markup-indent-offset 2
(setq web-mode-markup-indent-offset 2
web-mode-code-indent-offset 2 web-mode-code-indent-offset 2
web-mode-css-indent-offset 2)) web-mode-css-indent-offset 2))
@@ -210,8 +201,6 @@
:mode ("\\.py\\'" . python-mode) :mode ("\\.py\\'" . python-mode)
:interpreter ("python" . python-mode)) :interpreter ("python" . python-mode))
;;(use-package sql)
(defvar linum-current-line 1 "Current line number.") (defvar linum-current-line 1 "Current line number.")
(defvar linum-format-fmt "" " ") (defvar linum-format-fmt "" " ")
(defvar linum-format "" " ") (defvar linum-format "" " ")
@@ -228,15 +217,14 @@
"Set the current line." "Set the current line."
(setq linum-current-line (line-number-at-pos))) (setq linum-current-line (line-number-at-pos)))
(unless window-system (add-hook 'linum-before-numbering-hook
(add-hook 'linum-before-numbering-hook
(lambda () (lambda ()
(setq-local linum-format-fmt (setq-local linum-format-fmt
(let ((w (length (number-to-string (let ((w (length (number-to-string
(count-lines (count-lines
(point-min) (point-min)
(point-max)))))) (point-max))))))
(concat " %" (number-to-string w) "d ")))))) (concat " %" (number-to-string w) "d ")))))
(defun linum-format-func (line) (defun linum-format-func (line)
@@ -246,10 +234,11 @@
'linum))) 'linum)))
(propertize (format linum-format-fmt line) 'face face))) (propertize (format linum-format-fmt line) 'face face)))
(unless window-system (setq linum-format 'linum-format-func)
(setq linum-format 'linum-format-func))
(add-hook 'find-file-hook (lambda () (add-hook 'find-file-hook (lambda ()
(linum-mode 1))) (linum-mode 1)))
(add-hook 'eshell-mode-hook (lambda () (add-hook 'eshell-mode-hook (lambda ()
(linum-mode -1))) (linum-mode -1)))
(linum-mode t)