Browse Source

added custom theme, fixed font name

master
Marc 4 years ago
parent
commit
3544b2a1e9
1 changed files with 6 additions and 2 deletions
  1. 8
      init.org

8
init.org

@ -130,6 +130,8 @@ This function updates init.el whenever changes in init.org are made. The update
(defvar MY--PATH_USER_LOCAL (expand-file-name "~/.emacs.d/user-local/")) (defvar MY--PATH_USER_LOCAL (expand-file-name "~/.emacs.d/user-local/"))
(defvar MY--PATH_USER_GLOBAL (expand-file-name "~/.emacs.d/user-global/")) (defvar MY--PATH_USER_GLOBAL (expand-file-name "~/.emacs.d/user-global/"))
(add-to-list 'custom-theme-load-path (concat MY--PATH_USER_GLOBAL "themes"))
(when *sys/linux* (when *sys/linux*
(defconst MY--PATH_ORG_FILES (expand-file-name "~/Archiv/Organisieren/")) (defconst MY--PATH_ORG_FILES (expand-file-name "~/Archiv/Organisieren/"))
(defconst MY--PATH_ORG_FILES_MOBILE (expand-file-name "~/Archiv/Organisieren/mobile/"))) (defconst MY--PATH_ORG_FILES_MOBILE (expand-file-name "~/Archiv/Organisieren/mobile/")))
@ -216,7 +218,7 @@ Some windows specific stuff
:END: :END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(when *sys/linux* (when *sys/linux*
(set-face-font 'default "Hack Nerd Font-10"))
(set-face-font 'default "Hack-10"))
(when *work_remote* (when *work_remote*
(set-face-font 'default "Lucida Sans Typewriter-11")) (set-face-font 'default "Lucida Sans Typewriter-11"))
#+END_SRC #+END_SRC
@ -242,8 +244,10 @@ Some windows specific stuff
Windows Theme: Windows Theme:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(when (or *sys/windows* *sys/linux*)
(when *sys/windows*
(load-theme 'tango)) (load-theme 'tango))
(when *sys/linux*
(load-theme 'plastic))
#+END_SRC #+END_SRC
** line wrappings ** line wrappings
:PROPERTIES: :PROPERTIES:

Loading…
Cancel
Save