18 lines
628 B
EmacsLisp
18 lines
628 B
EmacsLisp
|
|
(when (eq system-type 'darwin)
|
|
(setenv "PATH" "/Users/rachel/.nix-profile/bin:/usr/local/bin:/bin:/usr/bin/:/sbin:/usr/sbin" t)
|
|
(setq mac-right-option-modifier 'none)
|
|
(setq mac-option-modifier 'meta)
|
|
(setq mac-command-modifier 'super)
|
|
(setq ns-use-native-fullscreen t)
|
|
(setq frame-resize-pixelwise t)
|
|
(menu-bar-mode -1)
|
|
(tool-bar-mode -1)
|
|
(scroll-bar-mode -1)
|
|
(toggle-frame-fullscreen)
|
|
(defun transparency (value)
|
|
"Sets the transparency of the frame window. 0=transparent/100=opaque"
|
|
(interactive "nTransparency Value 0 - 100 opaque:")
|
|
(set-frame-parameter (selected-frame) 'alpha value))
|
|
)
|