heckyel/emacs-base
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

change fonts to Monospace for deafult "9"

Browse Source
This commit is contained in:
Jesús 2018-07-17 17:10:41 -05:00
parent 107194da71
commit 0d906cf344
No known key found for this signature in database
GPG Key ID: F6EE7BC59A315766
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/init-gui.el
View File

@ -29,6 +29,12 @@
(lambda () (lambda ()
(setq line-spacing 0))) (setq line-spacing 0)))
;; Font theme (Monospace, or DejaVu Sans Mono if Monospace is not
;; present)
(condition-case nil
(set-frame-font "Monospace-9")
(error (set-frame-font "DejaVu Sans Mono-10")))
;;---------------------------------------------------------------------------- ;;----------------------------------------------------------------------------
;; Configure keys ;; Configure keys
;;---------------------------------------------------------------------------- ;;----------------------------------------------------------------------------
@ -37,9 +43,9 @@
(global-set-key (kbd "M-<up>") (lambda () (interactive) (sanityinc/adjust-opacity nil 2))) ; M-up more visibility (global-set-key (kbd "M-<up>") (lambda () (interactive) (sanityinc/adjust-opacity nil 2))) ; M-up more visibility
(global-set-key (kbd "M-0") (lambda () (interactive) (modify-frame-parameters nil '((alpha . 100))))) ; M-0 standard visibility (global-set-key (kbd "M-0") (lambda () (interactive) (modify-frame-parameters nil '((alpha . 100))))) ; M-0 standard visibility
(global-set-key (kbd "<f11>") 'myemacs/toggle-fullscreen) ; F11 FullScreen (global-set-key (kbd "<f11>") 'myemacs/toggle-fullscreen) ; F11 FullScreen
(global-set-key (kbd "s-C-+") 'sacha/increase-font-size) ; C-+ increase font size (global-set-key (kbd "s-C-+") 'sacha/increase-font-size) ; C-+ increase font size
(global-set-key (kbd "s-C--") 'sacha/decrease-font-size) ; C-- decrease font size (global-set-key (kbd "s-C--") 'sacha/decrease-font-size) ; C-- decrease font size
(global-set-key (kbd "<f12>") 'revert-buffer-no-confirm) (global-set-key (kbd "<f12>") 'revert-buffer-no-confirm)
(global-set-key (kbd "s-h") 'global-hl-line-mode) ; Highlight current line (global-set-key (kbd "s-h") 'global-hl-line-mode) ; Highlight current line
(provide 'init-gui) (provide 'init-gui)