aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/init-gui.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/init-gui.el')
-rw-r--r--lisp/init-gui.el12
1 files changed, 9 insertions, 3 deletions
diff --git a/lisp/init-gui.el b/lisp/init-gui.el
index 86f0177..78445a8 100644
--- a/lisp/init-gui.el
+++ b/lisp/init-gui.el
@@ -29,6 +29,12 @@
(lambda ()
(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
;;----------------------------------------------------------------------------
@@ -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-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 "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/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 "<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)