jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

better system-type handling

Browse source
This commit is contained in:
Bozhidar Batsov 2011-10-20 00:54:17 +03:00
parent 8caeaa71c9
commit 7b108c386b
3 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
init.el
View file

@ -39,7 +39,7 @@
;; On OS X Emacs doesn't use the shell PATH if it's not started from ;; On OS X Emacs doesn't use the shell PATH if it's not started from
;; the shell. If you're using homebrew modifying the PATH is essential. ;; the shell. If you're using homebrew modifying the PATH is essential.
(if (string= system-type "darwin") (if (eq system-type 'darwin)
(push "/usr/local/bin" exec-path)) (push "/usr/local/bin" exec-path))
(defvar prelude-dir (file-name-directory load-file-name) (defvar prelude-dir (file-name-directory load-file-name)

2
modules/prelude-common-lisp.el
View file

@ -78,7 +78,7 @@ Common Lisp."
(sbcl ("sbcl" "--noinform") :coding-system utf-8-unix))) (sbcl ("sbcl" "--noinform") :coding-system utf-8-unix)))
;; select the default value from slime-lisp-implementations ;; select the default value from slime-lisp-implementations
(if (string= system-type "darwin") (if (eq system-type 'darwin)
;; default to Clozure CL on OS X ;; default to Clozure CL on OS X
(setq slime-default-lisp 'ccl) (setq slime-default-lisp 'ccl)
;; default to SBCL on Linux and Windows ;; default to SBCL on Linux and Windows

2
modules/prelude-editor.el
View file

@ -39,7 +39,7 @@
;; Emacs users obviously have little need for Command and Option keys, ;; Emacs users obviously have little need for Command and Option keys,
;; but they do need Meta and Super ;; but they do need Meta and Super
(when (string= system-type "darwin") (when (eq system-type 'darwin)
(setq mac-command-modifier 'super) (setq mac-command-modifier 'super)
(setq mac-option-modifier 'meta)) (setq mac-option-modifier 'meta))