Reorganize, add page-breaks

diff --git a/init.el b/init.el
index 54147c52f7a0bcfc70a535ec1675613e66385253..c6687c3d74bf92ba02bf3eb6fe6c42c6b66c5080 100644 (file)
--- a/init.el
+++ b/init.el
@@ -26,9 +26,23 @@
 
 (add-to-list 'auto-mode-alist '("\\.keymap\\'" . c-mode))
 (add-hook 'c-mode-hook (lambda () (require 're-c-style)))
+\f
+;; Tabs
+(setq-default indent-tabs-mode 'only
+             tab-width 8)
+(defvaralias 'c-basic-offset 'tab-width)
+(defvaralias 'cperl-indent-level 'tab-width)
+
+(add-hook 'prog-mode-hook
+         (lambda () (keymap-local-set "<TAB>" #'tab-to-tab-stop)))
 
+(add-hook 'text-mode-hook
+         (lambda ()
+           (keymap-set text-mode-map "<TAB>" 'self-insert-command)))
+
+\f
+;; Buffer dealiŋ
 (setq-default indicate-empty-lines t
-             mouse-prefer-closest-glyph t
              fill-column 78)
 
 (blink-cursor-mode -1)
@@ -41,22 +55,16 @@
       next-line-add-newlines t
       scroll-conservatively 101)
 
-;; Buffer dealiŋ
-;; (global-acme-mouse-mode t)
-
 (setq disabled-command-function nil
       save-interprogram-paste-before-kill t
-      confirm-kill-processes nil
-      mouse-1-click-follows-link nil
-      focus-follows-mouse t
-      mouse-autoselect-window -0.25)
-
+      confirm-kill-processes nil)
+\f
 ;; Recent Files/Buffers
 (midnight-mode t)
 (save-place-mode 1)
 (recentf-mode 1)
 (setq recentf-max-menu-items 20)
-
+\f
 ;; Dired
 (setq dired-listing-switches "-Ahlu"
       dired-vc-rename-file t
@@ -72,7 +80,7 @@
          (lambda ()
            (dired-hide-details-mode t)
            (keymap-set dired-mode-map "f" #'re/dired-find-marked-files)))
-
+\f
 ;; Bookmarks
 (setq bookmark-save-flag 1)
 
@@ -84,12 +92,18 @@
       eldoc-echo-area-use-multiline-p nil
       read-buffer-completion-ignore-case t
       history-delete-duplicates t)
-
+\f
 ;; GUI Settings
+(load-theme 'wobow-bow t)
 (menu-bar-mode -1)
 (tool-bar-mode -1)
 (set-scroll-bar-mode 'left)
-(setq frame-title-format "%b")
+
+(setq frame-title-format "%b"
+      mouse-prefer-closest-glyph t
+      mouse-1-click-follows-link nil
+      focus-follows-mouse t
+      mouse-autoselect-window -0.25)
 
 (setq prettify-symbols-alist
       '(("lambda" . 955)
@@ -100,21 +114,8 @@
        (">=" . 8805)))
 
 (global-prettify-symbols-mode t)
-(setq-default indent-tabs-mode 'only
-             tab-width 8)
-(defvaralias 'c-basic-offset 'tab-width)
-(defvaralias 'cperl-indent-level 'tab-width)
-
-(add-hook 'prog-mode-hook
-         (lambda () (keymap-local-set "<TAB>" #'tab-to-tab-stop)))
-
-(add-hook 'text-mode-hook
-         (lambda ()
-           (keymap-set text-mode-map "<TAB>" 'self-insert-command)))
-
-;; (load-theme 'fully-mono-white t)
-(load-theme 'wobow-bow t)
-
+\f
+;; Parens (must be after loading the theme)
 (setq show-paren-delay 0
       show-paren-style 'expression)
 
@@ -132,7 +133,7 @@
                    'unspecified
                    :underline
                    t)
-
+\f
 ;; Transient mark mode temp enabling
 (setq transient-mark-mode nil)
 
@@ -166,22 +167,22 @@
 ;;                org-mark-element
 ;;                org-mark-subtree))
 ;;   (re/remap-mark-command command))
-
+\f
 ;; Help
 (setq apropos-do-all t)
-
+\f
 ;; UTF-8
 (set-language-environment 'utf-8)
 (set-default-coding-systems 'utf-8)
 (set-keyboard-coding-system 'utf-8-unix)
 (set-terminal-coding-system 'utf-8-unix)
-
+\f
 ;; Cleanup on write
 (setq require-final-newline t)
 (add-hook 'before-save-hook #'re/flush-extra-lines)
 (add-hook 'before-save-hook #'whitespace-cleanup)
 (add-hook 'after-save-hook #'executable-make-buffer-file-executable-if-script-p)
-
+\f
 ;; Versioning and Backups
 (setq vc-make-backup-files nil
       vc-handled-backends '(Git)
@@ -210,26 +211,23 @@
 (setq delete-old-versions t
       kept-new-versions 5
       kept-old-versions 5)
-
+\f
 ;; Auto-Revert
 (global-auto-revert-mode t)
 (setq global-auto-revert-non-file-buffers t
       global-auto-revert-ignore-modes '(Buffer-menu-mode))
-
+\f
 ;; Crash handliŋ
 (setq attempt-stack-overflow-recovery nil
       attempt-orderly-shutdown-on-fatal-signal nil)
-
+\f
 ;; Abbrev-mode
 (setq abbrev-file-name (expand-file-name "abbrev_defs" user-emacs-directory)
       save-abbrevs 'silently)
 
 (add-hook 'org-mode-hook #'abbrev-mode)
 (add-hook 'howm-mode-hook #'abbrev-mode)
-
-;; IELM
-(setq ielm-history-file-name (expand-file-name "ielm/history" user-emacs-directory))
-
+\f
 ;; Customization framework
 (setq custom-file (make-temp-file "emacs-custom-")) ; Disable by making a temp file (stolen from prot)