62 lines
1.6 KiB
EmacsLisp
62 lines
1.6 KiB
EmacsLisp
;; Simplify the GUI, thanks
|
|
;; http://www.masteringemacs.org/articles/2010/10/04/beginners-guide-to-emacs/
|
|
(menu-bar-mode -1)
|
|
(tool-bar-mode -1)
|
|
(scroll-bar-mode -1)
|
|
(horizontal-scroll-bar-mode -1)
|
|
(display-time-mode t)
|
|
(setq focus-follows-mouse t
|
|
mouse-autoselect-window t
|
|
display-time-format "%a, %d %h %Y %T"
|
|
display-time-interval 1
|
|
use-dialog-box nil)
|
|
|
|
;; Highlight current line
|
|
(global-hl-line-mode 1)
|
|
|
|
(defalias 'yes-or-no-p 'y-or-n-p)
|
|
|
|
(setq ediff-window-setup-function 'ediff-setup-windows-plain)
|
|
|
|
(use-package shackle
|
|
:init (shackle-mode)
|
|
:config (setq shackle-rules '((Info-mode :same t))))
|
|
|
|
;;;; Set theme
|
|
;(load-theme 'distinguished t)
|
|
|
|
;(require 'github-theme)
|
|
|
|
;(require 'heroku-theme)
|
|
|
|
;;;; Good theme but uses different font sizes in org-mode, and (I think) some weird non-monospace font
|
|
;; (require 'monokai-theme)
|
|
|
|
(require 'molokai-theme)
|
|
(enable-theme 'molokai)
|
|
|
|
;; (require 'fullscreen-mode)
|
|
;; (fullscreen-mode 1)
|
|
|
|
;; (require 'relative-line-numbers)
|
|
;; ;; old
|
|
;; ;; (setq relative-line-numbers-motion-function 'vertical-motion)
|
|
;; ;; new
|
|
;; (setq relative-line-numbers-motion-function 'forward-visible-line)
|
|
;; (global-relative-line-numbers-mode 1)
|
|
|
|
;; (add-hook 'shell-mode-hook 'previous-buffer)
|
|
;; ;; is this what deletes windows when you run a shell command?
|
|
;; (add-hook 'shell-mode-hook 'delete-other-windows)
|
|
|
|
;; 2018-08-26T22:39:09+0530
|
|
(defun cp/change-split ()
|
|
"Switch between two windows in horizontal layout and vice-versa."
|
|
(interactive)
|
|
(let (()))
|
|
;; if height of window > width, we're in a vertical split
|
|
;; otherwise we're in a horizontal split
|
|
)
|
|
|
|
(provide 'cp-ui)
|