Improve the code style

This commit is contained in:
Bozhidar Batsov 2018-05-06 09:53:24 +03:00
parent e1d2f4fd7e
commit 270ef647a1

View file

@ -56,10 +56,9 @@ Windows external keyboard from time to time."
(setq mac-command-modifier 'meta) (setq mac-command-modifier 'meta)
(setq mac-option-modifier 'super) (setq mac-option-modifier 'super)
(message "Command is now bound to META and Option is bound to SUPER.")) (message "Command is now bound to META and Option is bound to SUPER."))
(progn (setq mac-command-modifier 'super)
(setq mac-command-modifier 'super) (setq mac-option-modifier 'meta)
(setq mac-option-modifier 'meta) (message "Command is now bound to SUPER and Option is bound to META.")))
(message "Command is now bound to SUPER and Option is bound to META."))))
(define-key prelude-mode-map (kbd "C-c w") 'prelude-swap-meta-and-super) (define-key prelude-mode-map (kbd "C-c w") 'prelude-swap-meta-and-super)
(define-key prelude-mode-map (kbd "s-/") 'hippie-expand) (define-key prelude-mode-map (kbd "s-/") 'hippie-expand)
@ -67,8 +66,8 @@ Windows external keyboard from time to time."
(menu-bar-mode +1) (menu-bar-mode +1)
;; Enable emoji, and stop the UI from freezing when trying to display them. ;; Enable emoji, and stop the UI from freezing when trying to display them.
(if (fboundp 'set-fontset-font) (when (fboundp 'set-fontset-font)
(set-fontset-font t 'unicode "Apple Color Emoji" nil 'prepend)) (set-fontset-font t 'unicode "Apple Color Emoji" nil 'prepend))
(provide 'prelude-macos) (provide 'prelude-macos)