Move cp-ui into init.org
This commit is contained in:
parent
c960da5d18
commit
8f55255e40
|
@ -1,78 +0,0 @@
|
||||||
;; 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)
|
|
||||||
|
|
||||||
(use-package shackle
|
|
||||||
:init (shackle-mode)
|
|
||||||
:config (setq shackle-rules '((Info-mode :same t))))
|
|
||||||
|
|
||||||
;; nicked from https://github.com/tarsius/moody
|
|
||||||
;; (use-package solarized-theme
|
|
||||||
;; :config
|
|
||||||
;; (load-theme 'solarized-light t)
|
|
||||||
;; (let ((line (face-attribute 'mode-line :underline)))
|
|
||||||
;; (set-face-attribute 'mode-line nil :overline line)
|
|
||||||
;; (set-face-attribute 'mode-line-inactive nil :overline line)
|
|
||||||
;; (set-face-attribute 'mode-line-inactive nil :underline line)
|
|
||||||
;; (set-face-attribute 'mode-line nil :box nil)
|
|
||||||
;; (set-face-attribute 'mode-line-inactive nil :box nil)
|
|
||||||
;; (set-face-attribute 'mode-line-inactive nil :background "#f9f2d9")))
|
|
||||||
|
|
||||||
(use-package moody
|
|
||||||
:config
|
|
||||||
(setq x-underline-at-descent-line t)
|
|
||||||
(moody-replace-mode-line-buffer-identification)
|
|
||||||
(moody-replace-vc-mode))
|
|
||||||
|
|
||||||
;;;; 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)
|
|
||||||
|
|
||||||
;; ;; disabled on 2021-02-11T19:58:37+0530 - was coloring Org source blocks as comments? :\
|
|
||||||
;; (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)
|
|
78
init.org
78
init.org
|
@ -183,12 +183,82 @@ NAME is the name of the process and its buffer."
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
* user interface
|
* user interface
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(use-package cp-ui
|
;; Simplify the GUI, thanks
|
||||||
:demand
|
;; http://www.masteringemacs.org/articles/2010/10/04/beginners-guide-to-emacs/
|
||||||
:load-path "~/.emacs.d/contrapunctus/")
|
;; (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)
|
||||||
|
|
||||||
(add-to-list 'load-path "~/.emacs.d/user/")
|
;; Highlight current line
|
||||||
|
(global-hl-line-mode 1)
|
||||||
|
|
||||||
|
(defalias 'yes-or-no-p 'y-or-n-p)
|
||||||
|
|
||||||
|
(use-package shackle
|
||||||
|
:init (shackle-mode)
|
||||||
|
:config (setq shackle-rules '((Info-mode :same t))))
|
||||||
|
|
||||||
|
;; nicked from https://github.com/tarsius/moody
|
||||||
|
;; (use-package solarized-theme
|
||||||
|
;; :config
|
||||||
|
;; (load-theme 'solarized-light t)
|
||||||
|
;; (let ((line (face-attribute 'mode-line :underline)))
|
||||||
|
;; (set-face-attribute 'mode-line nil :overline line)
|
||||||
|
;; (set-face-attribute 'mode-line-inactive nil :overline line)
|
||||||
|
;; (set-face-attribute 'mode-line-inactive nil :underline line)
|
||||||
|
;; (set-face-attribute 'mode-line nil :box nil)
|
||||||
|
;; (set-face-attribute 'mode-line-inactive nil :box nil)
|
||||||
|
;; (set-face-attribute 'mode-line-inactive nil :background "#f9f2d9")))
|
||||||
|
|
||||||
|
(use-package moody
|
||||||
|
:config
|
||||||
|
(setq x-underline-at-descent-line t)
|
||||||
|
(moody-replace-mode-line-buffer-identification)
|
||||||
|
(moody-replace-vc-mode))
|
||||||
|
|
||||||
|
;;;; 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)
|
||||||
|
|
||||||
|
;; ;; disabled on 2021-02-11T19:58:37+0530 - was coloring Org source blocks as comments? :\
|
||||||
|
;; (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
|
||||||
|
)
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
* ediff
|
* ediff
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
|
Loading…
Reference in New Issue