This commit is contained in:
2019-11-06 11:27:45 +01:00
parent ecb3e03f5a
commit 1992f57388

46
init.el
View File

@@ -3,6 +3,13 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; install (if needed) and load ;; install (if needed) and load
;; Added by Package.el. This must come before configurations of
;; installed packages. Don't delete this line. If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(package-initialize)
(add-to-list 'load-path "~/.emacs.d/el-get/el-get") (add-to-list 'load-path "~/.emacs.d/el-get/el-get")
(unless (require 'el-get nil 'noerror) (unless (require 'el-get nil 'noerror)
(with-current-buffer (with-current-buffer
@@ -28,6 +35,7 @@
(el-get-bundle dockerfile-mode) (el-get-bundle dockerfile-mode)
(el-get-bundle json-mode) (el-get-bundle json-mode)
(el-get-bundle lua-mode) (el-get-bundle lua-mode)
(el-get-bundle yaml-mode)
(el-get-bundle markdown-mode) (el-get-bundle markdown-mode)
(setq markdown-command "/usr/bin/pandoc") (setq markdown-command "/usr/bin/pandoc")
(show-paren-mode) (show-paren-mode)
@@ -40,6 +48,7 @@
;; SSH agent ;; SSH agent
(el-get-bundle keychain-environment) (el-get-bundle keychain-environment)
(require 'keychain-environment) (require 'keychain-environment)
(setq tramp-default-method "ssh")
;; fixme mode ;; fixme mode
(el-get-bundle fic-mode) (el-get-bundle fic-mode)
@@ -63,8 +72,6 @@
(defun neotree-hide-line-numbers (_unused) (defun neotree-hide-line-numbers (_unused)
(linum-mode -1)) (linum-mode -1))
(add-hook 'neo-after-create-hook 'neotree-hide-line-numbers) (add-hook 'neo-after-create-hook 'neotree-hide-line-numbers)
(add-hook 'neo-enter-hook
(lambda (type) (if (equal type 'file) (neotree-hide))))
(global-set-key "\C-o" 'neotree-toggle) (global-set-key "\C-o" 'neotree-toggle)
;; shortkeys to switch between windows ;; shortkeys to switch between windows
@@ -76,11 +83,6 @@
(global-set-key "\C-xf" 'find-file-in-project) (global-set-key "\C-xf" 'find-file-in-project)
(global-set-key "\C-xd" 'find-file-in-current-directory) (global-set-key "\C-xd" 'find-file-in-current-directory)
;; edit text from chrome
(el-get-bundle edit-server)
(setq edit-server-host "127.0.0.1")
(edit-server-start)
;; ido everywhere ;; ido everywhere
(el-get-bundle ido-ubiquitous) (el-get-bundle ido-ubiquitous)
(ido-mode 1) (ido-mode 1)
@@ -107,14 +109,21 @@
(tool-bar-mode -1) (tool-bar-mode -1)
(set-face-attribute 'vertical-border nil :foreground "#222222") (set-face-attribute 'vertical-border nil :foreground "#222222")
(set-face-background 'fringe "#000000") (set-face-background 'fringe "#000000")
(set-face-attribute 'default nil :height 70) (set-face-attribute 'default nil :height 100)
(setq-default show-trailing-whitespace t) (setq-default show-trailing-whitespace t)
(set-frame-parameter (selected-frame) 'alpha '(90 . 90))
(add-to-list 'default-frame-alist '(alpha . (90 . 90)))
;; scroll-bar ;; scroll-bar
(el-get-bundle yascroll) (el-get-bundle yascroll)
(scroll-bar-mode 0) (scroll-bar-mode 0)
(global-yascroll-bar-mode 1) (global-yascroll-bar-mode 1)
(custom-set-faces '(yascroll:thumb-fringe ((t (:background "white" :foreground "white"))))) (custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(yascroll:thumb-fringe ((t (:background "white" :foreground "white")))))
;; highlight line number ;; highlight line number
(el-get-bundle tom-tan/hlinum-mode) (el-get-bundle tom-tan/hlinum-mode)
@@ -133,16 +142,9 @@
;; never kill emacs ;; never kill emacs
(global-set-key "\C-x\C-c" 'kill-this-buffer) (global-set-key "\C-x\C-c" 'kill-this-buffer)
(custom-set-variables
;; ;; custom-set-variables was added by Custom.
(el-get-bundle sublimity) ;; If you edit it by hand, you could mess it up, so be careful.
(require 'sublimity) ;; Your init file should contain only one such instance.
(require 'sublimity-scroll) ;; If there is more than one, they won't work right.
(sublimity-mode 1) '(package-selected-packages (quote (notmuch minimap))))
(el-get-bundle 'minimap)
(setq minimap-window-location 'right)
(custom-set-faces '(minimap-active-region-background
((((background dark)) (:background "#111111"))
(t (:background "#000000")))
:group 'minimap))
(minimap-mode)