Update init

This commit is contained in:
Marcus Kammer 2019-09-05 09:20:02 +02:00
parent a6349b8555
commit 23af784bb4

37
init.el
View file

@ -5,7 +5,7 @@
;; 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.
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
(require 'package)
(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos))
(not (gnutls-available-p))))
@ -41,6 +41,13 @@ There are two things you can do about this warning:
'(custom-safe-themes
(quote
("82358261c32ebedfee2ca0f87299f74008a2e5ba5c502bde7aaa15db20ee3731" "4515feff287a98863b7b7f762197a78a7c2bfb6ec93879e7284dff184419268c" default)))
'(default-frame-alist
(quote
((fullscreen . maximized)
(width . 86)
(height . 50)
(font . "Iosevka Term-12.0")
(vertical-scroll-bars))))
'(delete-selection-mode t)
'(diary-file "~/Documents/Diary/diary")
'(display-battery-mode nil)
@ -95,7 +102,7 @@ There are two things you can do about this warning:
'(package-enable-at-startup t)
'(package-selected-packages
(quote
(vimish-fold w3 pickle feature-mode elpy elnode ein latex-extra latex-preview-pane docker docker-api docker-cli docker-compose-mode dockerfile-mode python-docstring pytest py-autopep8 pydoc pylint python-info auto-complete-rst sphinx-doc sphinx-frontend sphinx-mode ox-mediawiki ox-minutes ox-nikola cargo racket-mode rust-mode slime gherkin-mode gitlab gitlab-ci-mode org-jira powershell helm gitconfig-mode gitignore-mode ox-rst typescript-mode ## skewer-mode ob-http ob-ipython ob-restclient linum-relative markdown-mode nord-theme restclient request restclient-test yaml-mode magit)))
(nov vimish-fold w3 pickle feature-mode elpy elnode ein latex-extra latex-preview-pane docker docker-api docker-cli docker-compose-mode dockerfile-mode python-docstring pytest py-autopep8 pydoc pylint python-info auto-complete-rst sphinx-doc sphinx-frontend sphinx-mode ox-mediawiki ox-minutes ox-nikola cargo racket-mode rust-mode slime gherkin-mode gitlab gitlab-ci-mode org-jira powershell helm gitconfig-mode gitignore-mode ox-rst typescript-mode ## skewer-mode ob-http ob-ipython ob-restclient linum-relative markdown-mode nord-theme restclient request restclient-test yaml-mode magit)))
'(python-shell-interpreter "python3" t)
'(request-log-level (quote debug))
'(request-message-level (quote debug))
@ -118,7 +125,7 @@ There are two things you can do about this warning:
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)
(when (display-graphic-p) (add-to-list 'default-frame-alist '(font . "Roboto Mono-11.0")))
;; (when (display-graphic-p) (add-to-list 'default-frame-alist '(font . "Roboto Mono-11.0")))
;; UTF-8 FTW
(prefer-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
@ -137,39 +144,23 @@ There are two things you can do about this warning:
(dolist (mode '(menu-bar-mode tool-bar-mode scroll-bar-mode))
(when (fboundp mode) (funcall mode -1)))
;; custom packages
(when (eq system-type 'darwin)
(when (display-graphic-p)
;;(set-default-font "RobotoMono Nerd Font 13")
(set-frame-font "RobotoMono Nerd Font 13")
(add-to-list 'default-frame-alist '(font . "RobotoMono Nerd Font-12"))
(add-to-list 'default-frame-alist '(ns-transparent-titlebar . t))
(add-to-list 'default-frame-alist '(ns-appearance . dark))
(add-to-list 'default-frame-alist '(height . 60))
(add-to-list 'default-frame-alist '(width . 80))))
(add-to-list 'default-frame-alist '(ns-appearance . dark))))
(when (eq system-type 'windows-nt)
(cd "~/opt")
;; (setq-default line-spacing 5)
(add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))
(setq python-shell-interpreter "python")
;; (require 'evo-feeds)
(when (display-graphic-p)
;(add-to-list 'default-frame-alist '(font . "Consolas-11"))
(add-to-list 'default-frame-alist '(font . "Roboto Mono-11.0"))
(add-to-list 'default-frame-alist '(height . 50))
(add-to-list 'default-frame-alist '(width . 86))
(add-to-list 'default-frame-alist '(fullscreen . maximized))
;; (add-to-list 'default-frame-alist '(alpha . (96)))
))
(when (display-graphic-p)))
(when (eq system-type 'gnu/linux)
(setq-default line-spacing 3)
(when (display-graphic-p)
(add-to-list 'default-frame-alist '(height . 50))
(add-to-list 'default-frame-alist '(width . 80))))
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
(setq-default line-spacing 3))
(defun copy-whole-buffer ()
"Copy entire buffer to clipboard"