summaryrefslogtreecommitdiff
path: root/.emacs.d/#init.el#
blob: 3c9fcf7a3279e4943eecca5e4e2d2925d95c8fc0 (plain)
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
;;; package --- My .emacs.d init. 2017.12.12
;;; Commentary:
;; -*- coding: utf-8 -*-

;;; Code:

;; Base config

;; 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)

(set debug-on-error t)

;; Path
(add-to-list 'load-path (expand-file-name "lisp" user-emacs-directory))

(menu-bar-mode -1)
(tool-bar-mode -1)
(scroll-bar-mode -1)
(blink-cursor-mode -1)


;; Line number
;; (global-linum-mode 1)
;; Highlight current line
(when window-system
  (global-hl-line-mode))
;; Disable visual bell
(setq ring-bell-function 'ignore)
;; Transparent
;;(set-frame-parameter (selected-frame) 'alpha '(85 . 50))
;;(add-to-list 'default-frame-alist '(alpha . (85 . 50)))

;; Personal information
(setq user-full-name "李向阳 141160029"
      user-mail-address "me@xiangyangli.com")

;; Bootstrap
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
(require 'init-elpa)

(setq emacs-load-start-time (current-time))

;; Theme
(load-theme 'misterioso t)
;; Make highlight color differ from the highlight line
(set-face-attribute 'region nil :background "#213")

(let ((file-name-handler-alist nil))
  (require 'init-evil)
  (require 'init-org)
  (require 'init-program-basic)
  (require 'init-company)
  (require 'init-flycheck)
  (require 'init-expand-region)
  (require 'init-helm)
  (require 'init-window-numbering))

;;----------------------------------------------------------------------------
;; Variables configured via the interactive 'customize' interface
;;----------------------------------------------------------------------------
(when (file-exists-p custom-file)
  (load custom-file))

(provide 'init)
;;; init.el ends here