33 lines
981 B
Plaintext
33 lines
981 B
Plaintext
(defun my-disable-gui-bars (&optional frame)
|
||
"Turn off tool-, menu- and scroll‑bars in FRAME (default: current frame)."
|
||
(with-selected-frame (or frame (selected-frame))
|
||
(menu-bar-mode -1)
|
||
(tool-bar-mode -1)
|
||
(scroll-bar-mode -1)))
|
||
|
||
;; Apply to the first frame right now
|
||
(my-disable-gui-bars)
|
||
|
||
;; And to every frame created in the future
|
||
(add-hook 'after-make-frame-functions #'my-disable-gui-bars)
|
||
|
||
;; Prevent the bars from flickering at startup
|
||
(setq default-frame-alist
|
||
'((menu-bar-lines . 0)
|
||
(tool-bar-lines . 0)
|
||
(vertical-scroll-bars . nil)))
|
||
|
||
;;(setq inhibit-startup-screen t)
|
||
|
||
(global-set-key (kbd "C-w <left>") #'windmove-left)
|
||
(global-set-key (kbd "C-w <right>") #'windmove-right)
|
||
(global-set-key (kbd "C-w <up>") #'windmove-up)
|
||
(global-set-key (kbd "C-w <down>") #'windmove-down)
|
||
|
||
(load-theme 'tango-dark t)
|
||
|
||
;;(add-to-list 'default-frame-alist
|
||
;; '(font . "Fira Code-14"))
|
||
|
||
(setq org-support-shift-select nil)
|