blob: fd5631b5095891181e297366bb62a329bd87ace2 (
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
|
(require 'package)
(add-to-list 'package-archives
'("melpa" . "https://melpa.org/packages/") t)
(package-initialize)
(dolist (package '(monokai-pro-theme evil yasnippet yaml-mode))
(unless (package-installed-p package)
(package-install package)))
; (add-to-list 'load-path "~/.emacs.d/packages")
(menu-bar-mode -1)
(tool-bar-mode -1)
(toggle-scroll-bar -1)
(xterm-mouse-mode 1)
(set-frame-font "Hasklug Nerd Font Mono 15" nil t)
(load-theme 'monokai-pro-spectrum t)
;; (require 'evil)
;; (evil-mode 1)
(require 'discord-emacs)
(discord-emacs-run "384815451978334208")
(require 'yasnippet)
(yas-global-mode 1)
(setq linum-format " %d")
(global-linum-mode 1)
(with-eval-after-load "ispell"
(setq ispell-program-name "hunspell")
(setq ispell-dictionary "en_US,ru_RU")
(ispell-set-spellchecker-params)
(ispell-hunspell-add-multi-dic "en_US,ru_RU"))
(dolist (hook '(text-mode-hook latex-mode org-mode))
(add-hook hook (lambda () (flyspell-mode 1) (flyspell-buffer))))
(defun my-backup-file-name (fpath)
"Return a new file path of a given file path. If the new path's
directories does not exist, create them."
(let* (
(backupRootDir "~/.emacs.d/backup/")
(filePath (replace-regexp-in-string "[A-Za-z]:" "" fpath )) ; remove Windows driver letter in path, for example, “C:”
(backupFilePath (replace-regexp-in-string "//" "/" (concat backupRootDir filePath "~") ))
)
(make-directory (file-name-directory backupFilePath) (file-name-directory backupFilePath))
backupFilePath
)
)
(setq make-backup-file-name-function 'my-backup-file-name)
(require 'yaml-mode)
(require 'json)
(require 'ox)
(setq org-image-actual-width nil)
(setq org-format-latex-options (plist-put org-format-latex-options :scale 1.7))
(setq org-latex-create-formula-image-program 'dvipng)
|
