From aec4ad23620058674fd9213d3d3d06318fb500c6 Mon Sep 17 00:00:00 2001 From: Marcus Kammer <2262664-marcus-kammer@users.noreply.gitlab.com> Date: Wed, 25 Sep 2019 16:16:23 +0200 Subject: [PATCH] Update init --- init.el | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) diff --git a/init.el b/init.el index 5ba04938..fff43b04 100755 --- a/init.el +++ b/init.el @@ -1,3 +1,4 @@ + (setq small-font "Iosevka Term-11") (setq big-font "Iosevka Term-14") ;; start a server, unless one is already running @@ -37,7 +38,7 @@ There are two things you can do about this warning: ;; 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. - ) + '(variable-pitch ((t (:family "Roboto"))))) (custom-set-variables ;; custom-set-variables was added by Custom. @@ -100,7 +101,7 @@ There are two things you can do about this warning: '(global-hl-line-mode t) '(icomplete-mode t) '(indent-tabs-mode nil) - '(inferior-lisp-program (executable-find "sbcl")) + '(inferior-lisp-program (executable-find "sbcl") t) '(inhibit-startup-screen t) '(line-number-mode t) '(line-spacing 3) @@ -133,7 +134,10 @@ There are two things you can do about this warning: '(nord-comment-brightness 15) '(nord-region-highlight "snowstorm") '(nord-uniform-mode-lines t) + '(org-agenda-dim-blocked-tasks nil) '(org-agenda-files (quote ("~/Documents/Journal"))) + '(org-agenda-inhibit-startup nil) + '(org-agenda-use-tag-inheritance nil) '(org-babel-load-languages (quote ((js . t) @@ -219,14 +223,14 @@ There are two things you can do about this warning: (add-to-list 'default-frame-alist '(undecorated . nil)) (add-to-list 'default-frame-alist '(font . "Iosevka Term-11")) (when (string= (system-name) "EVG01788WS") - (add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))) + (add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))) (when (string= (system-name) "XPS-8930")))) (when (eq system-type 'gnu/linux) (setq slime-lisp-implementations '((sbcl ("/usr/bin/sbcl")))) (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3") (when (display-graphic-p) -;; (toggle-frame-fullscreen) + ;; (toggle-frame-fullscreen) (setq-default line-spacing 3) (add-to-list 'default-frame-alist '(font . "Iosevka Term-14")))) ;; ++++++++++++++++++++ OS @@ -292,8 +296,8 @@ There are two things you can do about this warning: ;; ================= ALWAYS AT THE END ================= ;; ;; Turn off chrome -;(dolist (mode '(menu-bar-mode tool-bar-mode scroll-bar-mode)) -; (when (fboundp mode) (funcall mode -1))) +;; (dolist (mode '(menu-bar-mode tool-bar-mode scroll-bar-mode)) +;; (when (fboundp mode) (funcall mode -1))) ;; Local Variables: ;; mode: emacs-lisp