No menu entry suppression.

4 files changed, 42 insertions, 292 deletions

diff --git a/blendoit/blendoit-init.org b/blendoit/blendoit-init.org
index 716675f..7a0e853 100644
--- a/blendoit/blendoit-init.org
+++ b/blendoit/blendoit-init.org
@@ -25,7 +25,17 @@ view of publication: this is the endgame of /literate programming/.
 # (org-babel-load-file "~/.emacs.d/blendoit/test.org")
 # #+END_SRC
 
-* Preliminary setup
+* TODO First-time setup
+
+Spacemacs-like dialog for default settings.
+
+#+NAME: first-setup
+#+BEGIN_SRC emacs-lisp
+  ;; Prompt enterprise or personal install. Create file in .emacs.d/ on Linux,
+  ;; AppData/ on Windows. Ask user for details and preferred bindings.
+#+END_SRC
+
+* Early setup
 
 ** Garbage collection
 
@@ -638,95 +648,10 @@ Disable minibuffer scroll bar.
 
 ** Clean up menus
 
-We reduce the burden on the user by reducing total amount of entries in GUI
-menus.
-
-*** File
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-file-menu [print-buffer] nil)
-(define-key menu-bar-file-menu [print-region] nil)
-(define-key menu-bar-file-menu [ps-print-buffer-faces] nil)
-(define-key menu-bar-file-menu [ps-print-region-faces] nil)
-(define-key menu-bar-file-menu [ps-print-buffer] nil)
-(define-key menu-bar-file-menu [ps-print-region] nil)
-(define-key menu-bar-file-menu [split-window-below] nil)
-(define-key menu-bar-file-menu [split-window-right] nil)
-(define-key menu-bar-file-menu [dired] nil)
-#+END_SRC
-
-*** Edit
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Options
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Buffers
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Tools
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Org
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
+Originally, I wished to inhibit certain entries in the GUI menus. Not worth the
+effort at this time.
 
-*** Tbl
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Text
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Projectile
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
-
-*** Help
-
-#+BEGIN_SRC emacs-lisp
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-(define-key menu-bar-file-menu [dired] nil)
-(define-key menu-bar-help-menu [emacs-psychotherapist] nil)
-#+END_SRC
+~menu-bar-mode~ is inhibited in =../custom-init.el=.
 
 ** Coding standards
 
@@ -737,201 +662,19 @@ This is just a better default.
       c-basic-offset 4)
 #+END_SRC
 
-** Tabs
+** Dividers
+
+This ensures users can resize windows using the GUI.
 
 #+BEGIN_SRC emacs-lisp
-(use-package tabbar)
+(menu-bar-bottom-and-right-window-divider)
 #+END_SRC
 
-Thank you
-https://andreyorst.gitlab.io/posts/2020-05-10-making-emacs-tabs-look-like-in-atom/
+
+** Tabs
 
 #+BEGIN_SRC emacs-lisp
-(when (and window-system
-           (not (version< emacs-version "27")))
-  (use-package tab-line
-    :hook (after-init . global-tab-line-mode)
-    :config
-    (defun tab-line-close-tab (&optional e)
-      "Close the selected tab.
-
-If tab is presented in another window, close the tab by using
-`bury-buffer` function.  If tab is unique to all existing
-windows, kill the buffer with `kill-buffer` function.  Lastly, if
-no tabs left in the window, it is deleted with `delete-window`
-function."
-      (interactive "e")
-      (let* ((posnp (event-start e))
-             (window (posn-window posnp))
-             (buffer (get-pos-property 1 'tab (car (posn-string posnp)))))
-        (with-selected-window window
-          (let ((tab-list (tab-line-tabs-window-buffers))
-                (buffer-list (flatten-list
-                              (seq-reduce (lambda (list window)
-                                            (select-window window t)
-                                            (cons (tab-line-tabs-window-buffers) list))
-                                          (window-list) nil))))
-            (select-window window)
-            (if (> (seq-count (lambda (b) (eq b buffer)) buffer-list) 1)
-                (progn
-                  (if (eq buffer (current-buffer))
-                      (bury-buffer)
-                    (set-window-prev-buffers window (assq-delete-all buffer (window-prev-buffers)))
-                    (set-window-next-buffers window (delq buffer (window-next-buffers))))
-                  (unless (cdr tab-list)
-                    (ignore-errors (delete-window window))))
-              (and (kill-buffer buffer)
-                   (unless (cdr tab-list)
-                     (ignore-errors (delete-window window)))))))))
-
-
-    (defcustom tab-line-tab-min-width 10
-      "Minimum width of a tab in characters."
-      :type 'integer
-      :group 'tab-line)
-
-
-    (defcustom tab-line-tab-max-width 30
-      "Maximum width of a tab in characters."
-      :type 'integer
-      :group 'tab-line)
-
-    (defcustom tab-line-ellipsis-string "…"
-      "String for indicating truncated names"
-      :type 'string
-      :group 'tab-line)
-
-    (defun aorst/tab-line--tab-width (window-width tab-amount)
-      "Calculate width of single tab dividing WINDOW-WIDTH by TAB-AMOUNT."
-      (let* ((close-button-size
-              (if tab-line-close-button-show
-                  (length (substring-no-properties tab-line-close-button)) 0))
-             (tab-width (/ window-width tab-amount)))
-        (- (cond ((< window-width 0)
-                  tab-line-tab-min-width)
-                 ((>= tab-width tab-line-tab-max-width)
-                  tab-line-tab-max-width)
-                 ((< tab-width tab-line-tab-min-width)
-                  tab-line-tab-min-width)
-                 (t tab-width))
-           close-button-size)))
-
-    (defun aorst/tab-line--max-width (window)
-      "Calculate free width of the WINDOW.
-
-Free width means amount of space we can use to display tabs
-without truncation."
-      (- (window-width window)
-         (length (substring-no-properties tab-line-left-button))
-         (length (substring-no-properties tab-line-right-button))
-         (if tab-line-new-button-show
-             (length (substring-no-properties tab-line-new-button))
-           0)))
-
-
-    (defun aorst/tab-line--make-pad (tab-width name-width)
-      "Generate padding string based on TAB-WIDTH and NAME-WIDTH."
-      (let* ((width (- tab-width name-width))
-             (padding (/ (if (oddp width) (+ width 1) width) 2)))
-        (make-string padding ?\s)))
-
-
-    (defun aorst/tab-line-name-buffer (buffer &rest _buffers)
-      "Create name for tab with padding and truncation.
-
-If buffer name is shorter than `tab-line-tab-max-width' it gets
-centered with spaces, otherwise it is truncated, to preserve
-equal width for all tabs.  This function also tries to fit as
-many tabs in window as possible, so if there are no room for tabs
-with maximum width, it calculates new width for each tab and
-truncates text if needed.  Minimal width can be set with
-`tab-line-tab-min-width' variable."
-      (with-current-buffer buffer
-        (let* ((amount (length (tab-line-tabs-window-buffers)))
-               (width (aorst/tab-line--tab-width
-                       (aorst/tab-line--max-width (get-buffer-window buffer))
-                       amount))
-               (buffer (string-trim (buffer-name)))
-               (name-width (length buffer))
-               (right-pad (if tab-line-close-button-show "" " "))
-               (truncate-width (- width
-                                  (length tab-line-ellipsis-string)
-                                  (length right-pad))))
-          (if (>= name-width truncate-width)
-              (concat  " " (truncate-string-to-width buffer truncate-width) tab-line-ellipsis-string right-pad)
-            (let* ((padding (aorst/tab-line--make-pad width name-width))
-                   (tab-text (concat padding buffer))
-                   (text-width (length tab-text)))
-              (concat tab-text (make-string (- width text-width) ?\s)))))))
-
-
-    (setq tab-line-close-button-show t
-          tab-line-new-button-show nil
-          tab-line-separator ""
-          tab-line-tab-name-function #'aorst/tab-line-name-buffer
-          tab-line-right-button (propertize (if (char-displayable-p ?▶) " ▶ " " > ")
-                                            'keymap tab-line-right-map
-                                            'mouse-face 'tab-line-highlight
-                                            'help-echo "Click to scroll right")
-          tab-line-left-button (propertize (if (char-displayable-p ?◀) " ◀ " " < ")
-                                           'keymap tab-line-left-map
-                                           'mouse-face 'tab-line-highlight
-                                           'help-echo "Click to scroll left")
-          tab-line-close-button (propertize (if (char-displayable-p ?×) " × " " x ")
-                                            'keymap tab-line-tab-close-map
-                                            'mouse-face 'tab-line-close-highlight
-                                            'help-echo "Click to close tab"))
-
-
-    (let ((bg (if (facep 'solaire-default-face)
-                  (face-attribute 'solaire-default-face :background)
-                (face-attribute 'default :background)))
-          (fg (face-attribute 'default :foreground))
-          (base (if (facep 'solaire-default-face)
-                    (face-attribute 'default :background)
-                  (face-attribute 'mode-line :background)))
-          (box-width (/ (line-pixel-height) 2)))
-      (when (and (color-defined-p bg)
-                 (color-defined-p fg)
-                 (color-defined-p base)
-                 (numberp box-width))
-        (set-face-attribute 'tab-line nil
-                            :background base
-                            :foreground fg
-                            :height 1.0
-                            :inherit nil
-                            :box (list :line-width -1 :color base))
-        (set-face-attribute 'tab-line-tab nil
-                            :foreground fg
-                            :background bg
-                            :weight 'normal
-                            :inherit nil
-                            :box (list :line-width box-width :color bg))
-        (set-face-attribute 'tab-line-tab-inactive nil
-                            :foreground fg
-                            :background base
-                            :weight 'normal
-                            :inherit nil
-                            :box (list :line-width box-width :color base))
-        (set-face-attribute 'tab-line-tab-current nil
-                            :foreground fg
-                            :background bg
-                            :weight 'normal
-                            :inherit nil
-                            :box (list :line-width box-width :color bg))))
-    (setq tab-line-exclude-modes '())
-    (dolist (mode '(ediff-mode
-                    process-menu-mode
-                    term-mode
-                    vterm-mode))
-      (add-to-list 'tab-line-exclude-modes mode))
-
-    (defun aorst/tab-line-drop-caches ()
-      "Drops `tab-line' cache in every window."
-      (dolist (window (window-list))
-        (set-window-parameter window 'tab-line-cache nil)))
-
-    (add-hook 'window-configuration-change-hook #'aorst/tab-line-drop-caches)))
+
 #+END_SRC
 
 ** auto fill
diff --git a/blendoit/themes/blendoit-light-theme.el b/blendoit/themes/blendoit-light-theme.el
index a80b34e..9131a6c 100644
--- a/blendoit/themes/blendoit-light-theme.el
+++ b/blendoit/themes/blendoit-light-theme.el
@@ -1,9 +1,9 @@
 (deftheme blendoit-light
-  "Created 2020-08-03.")
+  "Created 2020-08-09.")
 
 (custom-theme-set-faces
  'blendoit-light
- '(fixed-pitch ((t (:inherit default :family "Dejavu Sans Mono"))))
+ '(fixed-pitch ((t (:family "Dejavu Sans Mono"))))
  '(variable-pitch ((t (:family "Liberation Sans"))))
  '(escape-glyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
  '(homoglyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
@@ -16,15 +16,14 @@
  '(font-lock-builtin-face ((((class grayscale) (background light)) (:weight bold :foreground "LightGray")) (((class grayscale) (background dark)) (:weight bold :foreground "DimGray")) (((class color) (min-colors 88) (background light)) (:foreground "dark slate blue")) (((class color) (min-colors 88) (background dark)) (:foreground "LightSteelBlue")) (((class color) (min-colors 16) (background light)) (:foreground "Orchid")) (((class color) (min-colors 16) (background dark)) (:foreground "LightSteelBlue")) (((class color) (min-colors 8)) (:weight bold :foreground "blue")) (t (:weight bold))))
  '(font-lock-comment-delimiter-face ((t (:inherit font-lock-comment-face :foreground "dim gray"))))
  '(font-lock-comment-face ((t (:foreground "dark gray" :slant italic))))
- '(font-lock-constant-face ((((class grayscale) (background light)) (:underline (:color foreground-color :style line) :weight bold :foreground "LightGray")) (((class grayscale) (background dark)) (:underline (:color foreground-color :style line) :weight bold :foreground "Gray50")) (((class color) (min-colors 88) (background light)) (:foreground "dark cyan")) (((class color) (min-colors 88) (background dark)) (:foreground "Aquamarine")) (((class color) (min-colors 16) (background light)) (:foreground "CadetBlue")) (((class color) (min-colors 16) (background dark)) (:foreground "Aquamarine")) (((class color) (min-colors 8)) (:foreground "magenta")) (t (:underline (:color foreground-color :style line) :weight bold))))
- '(font-lock-doc-face ((t (:inherit font-lock-string-face))))
+ '(font-lock-constant-face ((t (:foreground "dark cyan"))))
  '(font-lock-function-name-face ((((class color) (min-colors 88) (background light)) (:foreground "Blue1")) (((class color) (min-colors 88) (background dark)) (:foreground "LightSkyBlue")) (((class color) (min-colors 16) (background light)) (:foreground "Blue")) (((class color) (min-colors 16) (background dark)) (:foreground "LightSkyBlue")) (((class color) (min-colors 8)) (:weight bold :foreground "blue")) (t (:weight bold :inverse-video t))))
  '(font-lock-keyword-face ((t (:foreground "DodgerBlue4"))))
  '(font-lock-negation-char-face ((t nil)))
  '(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
  '(font-lock-regexp-grouping-backslash ((t (:inherit (bold)))))
  '(font-lock-regexp-grouping-construct ((t (:inherit (bold)))))
- '(font-lock-string-face ((t (:foreground "dark cyan"))))
+ '(font-lock-string-face ((t (:foreground "DeepSkyBlue3"))))
  '(font-lock-type-face ((t (:foreground "ForestGreen"))))
  '(font-lock-variable-name-face ((t (:foreground "sienna"))))
  '(font-lock-warning-face ((t (:inherit (error)))))
@@ -41,7 +40,7 @@
  '(isearch-fail ((((class color) (min-colors 88) (background light)) (:background "RosyBrown1")) (((class color) (min-colors 88) (background dark)) (:background "red4")) (((class color) (min-colors 16)) (:background "red")) (((class color) (min-colors 8)) (:background "red")) (((class color grayscale)) (:foreground "grey")) (t (:inverse-video t))))
  '(lazy-highlight ((t (:background "paleturquoise"))))
  '(match ((((class color) (min-colors 88) (background light)) (:background "yellow1")) (((class color) (min-colors 88) (background dark)) (:background "RoyalBlue3")) (((class color) (min-colors 8) (background light)) (:foreground "black" :background "yellow")) (((class color) (min-colors 8) (background dark)) (:foreground "white" :background "blue")) (((type tty) (class mono)) (:inverse-video t)) (t (:background "gray"))))
- '(next-error ((t (:inherit (region)))))
+ '(next-error ((t (:inherit region))))
  '(query-replace ((t (:inherit (isearch)))))
  '(org-table ((t (:box (:line-width 2 :color "gainsboro" :style released-button)))))
  '(org-formula ((t (:inherit org-table))))
@@ -50,8 +49,8 @@
  '(org-level-1 ((t (:inherit fixed-pitch :height 1.6 :weight bold))))
  '(org-level-2 ((t (:inherit fixed-pitch :height 1.4 :weight bold))))
  '(org-level-3 ((t (:inherit fixed-pitch :weight bold :height 1.2))))
- '(org-level-4 ((t (:height 1.1 :weight bold :inherit fixed-pitch))))
- '(org-date ((t (:inherit link :foreground "DodgerBlue3" :slant italic :family "Liberation Serif"))))
+ '(org-level-4 ((t (:inherit fixed-pitch :weight bold :height 1.1))))
+ '(org-date ((t (:family "Liberation Serif" :slant italic :foreground "DodgerBlue3" :inherit link))))
  '(org-footnote ((t (:foreground "DodgerBlue3" :inherit link))))
  '(org-block ((t (:inherit nil :family "Hermit"))))
  '(org-tag ((t (:inherit link :weight bold :foreground "DodgerBlue3"))))
@@ -59,8 +58,11 @@
  '(link ((t (:foreground "blue" :underline t))))
  '(org-document-info-keyword ((t (:inherit org-meta-line))))
  '(dashboard-heading ((t (:inherit font-lock-keyword-face))))
- '(default ((t (:background "white" :foreground "black" :height 142 :family "Liberation Mono"))))
- '(org-todo ((t (:foreground "Red1" :box 2 :weight bold))))
- '(org-done ((t (:foreground "ForestGreen" :box 2 :weight bold)))))
+ '(org-todo ((t (:weight bold :box nil :foreground "Red1"))))
+ '(org-done ((t (:weight bold :box nil :foreground "ForestGreen"))))
+ '(font-lock-doc-face ((t (:foreground "steel blue" :inherit default))))
+ '(org-code ((t (:inherit default :background "light grey" :foreground "black"))))
+ '(org-verbatim ((t (:inherit org-meta-line))))
+ '(default ((t (:background "white" :foreground "black" :height 142 :family "Liberation Mono")))))
 
 (provide-theme 'blendoit-light)
diff --git a/init-custom.el b/init-custom.el
index c3d9d8a..b98a3be 100644
--- a/init-custom.el
+++ b/init-custom.el
@@ -18,7 +18,7 @@
  '(custom-enabled-themes nil)
  '(custom-safe-themes
    (quote
-    ("5711d98f14878bff94540676e66e7a6f14c82b29ddc7023f6ee8efbd8a479c5c" "3ab5261e83ce9723138117a01b6e73bea41398f8d9293f5b02106f3aead6dbab" "924ce9031ebdb3d16fc6015eef7db63af825780f99a5c90dcdf13233e7939c0c" "323d7466b7924f0f58653bde012468a2fdc3a1ae8492683f866a0222f4c15d09" "0f15173196d31f3d06ff303ca27cc861dd7884132393c91128d761f79655ec91" "291ca32d7cab5f302361ccb42762976004e7fae2edbc34e11152f43a6e5c9c16" "b0c79fa277592cee7dbbfea3170e1f3269b719b54b33d603acdaee5b738b08d6" "a8c710c7efb883b06accec971ed17c18e09f3d05807069a009d93ec7ade38627" "593c0435c789f28bcddd9159d9fa80a45eda69691c67caa4ecba97a5e9f6ac09" "d0c72c22aa52049e1118bc2d98b4037b5203709820525d4f6e9af75cbeb3ae51" "1a212a5389f8a1038252d279a8d7352e548e8d3c8eb20bc4f07870e9812f9392" "c243ddcbe8b454b88b639719082c1a1e82cf4ee67238e5c89346c808542793ac" "df18c6ae25e56a4a079b568e033a65387abd8546c88d10c8f71fd53da6bfaf83" "6f553b32594f38496d6e1a1537f43c7bb01be6e1dd23b71d6eab0dbabec89fea" "a71707f476a82a62b095be6c6dccb0da91d4f6ea08ca6884698442917e916c34" "52beb7a2aaec5d3b886f0a6bb1b3857a2bc231968323528bfcc38cf001f11049" "578cfaf5c4401cee53c3995369c350494fc269f600143335ec1262ffcba4d2f9" "ba6064e2177b67fdc02d3f03a9113d4ec9b74aa59a9c4c113941e2df3c66e300" "bf34b0175ef0ec31b21a711a727c42c8d7ea365687a4112a9673df8533d1d963" "dbe7226f44551ec85af99674282fce8340ee8109cff62fe251f3979125472796" "ec66048d6ed6a5d65a74fd4fd0ba1ce034fd58bc75624539dbed2b85046ee5b7" "b1a729f6d62b537e06abd2913978fc8203136f978bcdd4d0704f232fb59f6d07" "7bc04e8d1cbfa63ac7bfa685909f48cf7b05b772f7fe1de166dc72788c4ae10c" "037c17db2dda3e0a7b367ec22f80933ad61ee2de7b1abbf670172a5e165b9d7f" "dfe4340343a7f5e80441ae544378943db147a1eb6fa5e074fb8955a36b0f182f" "e1ed7dc1cdf09ba9c589c3b829a95723a1b962eaa90668486367f6500d6e464f" "a8b3c62c9b9221c19993f58bb6eaf532e55363d8d2368fde50eb0eef86929ddf" "dc3a12a73fd52959e3c8eebff0911f8a3f764def026e557660590b5fd1248f4b" "b13d696132ccaf45c6f5119439b6664abd2d871197a92f53fedb4e041db5e578" "a5ffe59afbe822411636369fd2f0f7a37dac10f3932ee67be02cc4d5f2f34a62" "05c1eb6742e96a622772413711d1f7b8cc4b7b7ac0a5bb9da3cd0f5a03a94d63" "d400bc776687ac7d8a04f3de3bd12b5714316ce9571805fe43b7b9a3207398e9" "254b7a1f3b6ae1e26a7981a904374909e6094d1959766c8a56e0a72c1bc73988" "c704a1e52c8393bab1edf20333c00f0a1f4e9d68f81dac2231ff8ac7fa594270" "0d33946ed3756f7af05220d584e16e87e94cea39e1a6eef8203762404436c971" "4ea5fc77916d724956ba8668959c87517e25e4df75cc23bbb9709d2c417e420b" "f4992270fc1f04c92a35dc92ff7ae108fcea48d00aed59cd2e2074228f13d206" "4baddb255d9d85b2de41ed80db2304f258e5ab4d9dd86e3d7b645b3fe5d4af47" "77856f1616f0a4befe693cc89718e4e81ca02186ccd423a70f741f2e3974d10f" "9ce3f9dc04a4a50169c8bc58202bd4107bd3bec3dee04ca0d2747f563fdbf37c" "2383aad6d7a2ab84816102a614217ae2f71346febf758a35c38f540cf5a4f870" "4f3256a77d296e0f96ca6071c61f9de658e8e5e8fbb33a3fb0a25bd3cac1ba95" "05f98c3f10b215b37151685fb42bc108481a59145fd557edf5c4b140902af69b" "e6e3f9539236fc2b9f4c1ca06e47289e3e84011d194edc2fe8db1326f27162e2" "91ae05962e013e0925e56e4b98d87090f48de36876ba9fa939ae760e16aee566" "00087223a3ba61a42feb4bb898e8eb6cbc301e96e8e8d46c50f202b6bb435bc8" "b77b4effef346442f97b12b3b17056e60e7d8122fba4b7d692c7e633b00fef2a" "413627ea61e7aee5429a37a07d893436fa50d90db1c9cad63c3fe880d16ea366" "9de2e8914e2d8bdadad1eb0ca9ba5a1c5bbbfb71b91eaca7996691cd97f0e863" "fe4a68cae5bf268eb4da12eb78d06e40265e46c0e63eb5bf6e3545c4d0fe4cf9" "35ae89ec94b266fe007ec56be07b30aabaf6565d9a59c2e21e5943a9fec58069" "5c2bac01062bc2496baf2fde79cc4ede470b9395af5014991132034dcbfda677" "2df61c2e91799bf9d31fbe5ca4d407ef03669dbc8efd84f8acab83b0bbb63a56" "4d966fc76684e7f95122c877a95e8f6e4fa9d784225a4111cf1ce80969a4498f" "935b7766c7b74d2801be8a0cbd14967d090769e7353fcdf72b1a4d695393fd04" "503683e60ca9efa6d138cccae401269d13aef9e0101fbda20341edc2294c950b" "e55352d8828ed4e056652fa7fd5db47603ee48368fbae500837630a7345fb6b2" "f81e8249778eeeed1dc71c69cc37aab6f68d111b6e770496b2e6c87f4d1d9a05" "1ec13d23f091b5e6fb8621b85fad1ebbc3fb132daf505fd953d27f97ec573d67" "923a4e39d4da77bc40ddc2ba2fceec2c5613392bf32cc06a59e10db55ddd4ebd" "57d6156b7ae19dee1c627bcfcf298f52d271e4ca805b5c37d59906c87e281ce3" "aa4e08348cd327190a188a450d55a0abaf8780cf8d04743d632937b593bba5c9" "50fa2844d84cecfa718f92122e095ecc1243fdf004bb1348e9cee856707c6f3d" "429c077679e0586d1b6a9f22586129bb4e0793e70b414ff93f023fcfa654b08a" "9893c7f1274df4d4df0573da1ee4dfe32f73f71cdf45bba7596a09e6c637d990" "e274c4d17ef47311855ce93dcc34c512bb285e3a01e9b3b1b735e059a865e48d" "59b58e2d0b77f0e8dc305bba18dc0913ae11ebc1ea91165911f5f3bd46910470" "2946f0682172ff16ffe531ce59ea26044f949e8a51b2d4ab14d74e21fa8f2b67" "de4fe3532d51a731d313e588531e32a26f9824e216fff1306ca270487f833045" "096bb91c8fd17ff6f2f51ddaf51897c9710da5486fbbb2d370e3ff3b209ff446" "700f0a38b888fb3fe656b9d8647d71fa99b3684641cf9e02106a3e3a1ca1d87a" "5cbf5345c2af35887f1518c35c9a62409304b20006f2455ef1313507e0552b1f" default)))
+    ("d4c160e3c4f172751b29b9f94adbea0f02066618ecca4553c018b027966640c7" "3a4d17a991c9aa1e3ac6d34f63f0588e551c5b38aae25e6bafab38b256e79cdc" "549b332d92fd708c836646a90c37cacca20b48223abf7fa0c29a22bf40d60d35" "9a192155514fbdeb01ccaf996e5b1fbc6b6bf4a18f7bde8f607d57678fad344c" "7f3d65205cac6f913bce9d01373719a44722a07f45501f7d00fe1334cc650814" "5711d98f14878bff94540676e66e7a6f14c82b29ddc7023f6ee8efbd8a479c5c" "3ab5261e83ce9723138117a01b6e73bea41398f8d9293f5b02106f3aead6dbab" "924ce9031ebdb3d16fc6015eef7db63af825780f99a5c90dcdf13233e7939c0c" "323d7466b7924f0f58653bde012468a2fdc3a1ae8492683f866a0222f4c15d09" "0f15173196d31f3d06ff303ca27cc861dd7884132393c91128d761f79655ec91" "291ca32d7cab5f302361ccb42762976004e7fae2edbc34e11152f43a6e5c9c16" "b0c79fa277592cee7dbbfea3170e1f3269b719b54b33d603acdaee5b738b08d6" "a8c710c7efb883b06accec971ed17c18e09f3d05807069a009d93ec7ade38627" "593c0435c789f28bcddd9159d9fa80a45eda69691c67caa4ecba97a5e9f6ac09" "d0c72c22aa52049e1118bc2d98b4037b5203709820525d4f6e9af75cbeb3ae51" "1a212a5389f8a1038252d279a8d7352e548e8d3c8eb20bc4f07870e9812f9392" "c243ddcbe8b454b88b639719082c1a1e82cf4ee67238e5c89346c808542793ac" "df18c6ae25e56a4a079b568e033a65387abd8546c88d10c8f71fd53da6bfaf83" "6f553b32594f38496d6e1a1537f43c7bb01be6e1dd23b71d6eab0dbabec89fea" "a71707f476a82a62b095be6c6dccb0da91d4f6ea08ca6884698442917e916c34" "52beb7a2aaec5d3b886f0a6bb1b3857a2bc231968323528bfcc38cf001f11049" "578cfaf5c4401cee53c3995369c350494fc269f600143335ec1262ffcba4d2f9" "ba6064e2177b67fdc02d3f03a9113d4ec9b74aa59a9c4c113941e2df3c66e300" "bf34b0175ef0ec31b21a711a727c42c8d7ea365687a4112a9673df8533d1d963" "dbe7226f44551ec85af99674282fce8340ee8109cff62fe251f3979125472796" "ec66048d6ed6a5d65a74fd4fd0ba1ce034fd58bc75624539dbed2b85046ee5b7" "b1a729f6d62b537e06abd2913978fc8203136f978bcdd4d0704f232fb59f6d07" "7bc04e8d1cbfa63ac7bfa685909f48cf7b05b772f7fe1de166dc72788c4ae10c" "037c17db2dda3e0a7b367ec22f80933ad61ee2de7b1abbf670172a5e165b9d7f" "dfe4340343a7f5e80441ae544378943db147a1eb6fa5e074fb8955a36b0f182f" "e1ed7dc1cdf09ba9c589c3b829a95723a1b962eaa90668486367f6500d6e464f" "a8b3c62c9b9221c19993f58bb6eaf532e55363d8d2368fde50eb0eef86929ddf" "dc3a12a73fd52959e3c8eebff0911f8a3f764def026e557660590b5fd1248f4b" "b13d696132ccaf45c6f5119439b6664abd2d871197a92f53fedb4e041db5e578" "a5ffe59afbe822411636369fd2f0f7a37dac10f3932ee67be02cc4d5f2f34a62" "05c1eb6742e96a622772413711d1f7b8cc4b7b7ac0a5bb9da3cd0f5a03a94d63" "d400bc776687ac7d8a04f3de3bd12b5714316ce9571805fe43b7b9a3207398e9" "254b7a1f3b6ae1e26a7981a904374909e6094d1959766c8a56e0a72c1bc73988" "c704a1e52c8393bab1edf20333c00f0a1f4e9d68f81dac2231ff8ac7fa594270" "0d33946ed3756f7af05220d584e16e87e94cea39e1a6eef8203762404436c971" "4ea5fc77916d724956ba8668959c87517e25e4df75cc23bbb9709d2c417e420b" "f4992270fc1f04c92a35dc92ff7ae108fcea48d00aed59cd2e2074228f13d206" "4baddb255d9d85b2de41ed80db2304f258e5ab4d9dd86e3d7b645b3fe5d4af47" "77856f1616f0a4befe693cc89718e4e81ca02186ccd423a70f741f2e3974d10f" "9ce3f9dc04a4a50169c8bc58202bd4107bd3bec3dee04ca0d2747f563fdbf37c" "2383aad6d7a2ab84816102a614217ae2f71346febf758a35c38f540cf5a4f870" "4f3256a77d296e0f96ca6071c61f9de658e8e5e8fbb33a3fb0a25bd3cac1ba95" "05f98c3f10b215b37151685fb42bc108481a59145fd557edf5c4b140902af69b" "e6e3f9539236fc2b9f4c1ca06e47289e3e84011d194edc2fe8db1326f27162e2" "91ae05962e013e0925e56e4b98d87090f48de36876ba9fa939ae760e16aee566" "00087223a3ba61a42feb4bb898e8eb6cbc301e96e8e8d46c50f202b6bb435bc8" "b77b4effef346442f97b12b3b17056e60e7d8122fba4b7d692c7e633b00fef2a" "413627ea61e7aee5429a37a07d893436fa50d90db1c9cad63c3fe880d16ea366" "9de2e8914e2d8bdadad1eb0ca9ba5a1c5bbbfb71b91eaca7996691cd97f0e863" "fe4a68cae5bf268eb4da12eb78d06e40265e46c0e63eb5bf6e3545c4d0fe4cf9" "35ae89ec94b266fe007ec56be07b30aabaf6565d9a59c2e21e5943a9fec58069" "5c2bac01062bc2496baf2fde79cc4ede470b9395af5014991132034dcbfda677" "2df61c2e91799bf9d31fbe5ca4d407ef03669dbc8efd84f8acab83b0bbb63a56" "4d966fc76684e7f95122c877a95e8f6e4fa9d784225a4111cf1ce80969a4498f" "935b7766c7b74d2801be8a0cbd14967d090769e7353fcdf72b1a4d695393fd04" "503683e60ca9efa6d138cccae401269d13aef9e0101fbda20341edc2294c950b" "e55352d8828ed4e056652fa7fd5db47603ee48368fbae500837630a7345fb6b2" "f81e8249778eeeed1dc71c69cc37aab6f68d111b6e770496b2e6c87f4d1d9a05" "1ec13d23f091b5e6fb8621b85fad1ebbc3fb132daf505fd953d27f97ec573d67" "923a4e39d4da77bc40ddc2ba2fceec2c5613392bf32cc06a59e10db55ddd4ebd" "57d6156b7ae19dee1c627bcfcf298f52d271e4ca805b5c37d59906c87e281ce3" "aa4e08348cd327190a188a450d55a0abaf8780cf8d04743d632937b593bba5c9" "50fa2844d84cecfa718f92122e095ecc1243fdf004bb1348e9cee856707c6f3d" "429c077679e0586d1b6a9f22586129bb4e0793e70b414ff93f023fcfa654b08a" "9893c7f1274df4d4df0573da1ee4dfe32f73f71cdf45bba7596a09e6c637d990" "e274c4d17ef47311855ce93dcc34c512bb285e3a01e9b3b1b735e059a865e48d" "59b58e2d0b77f0e8dc305bba18dc0913ae11ebc1ea91165911f5f3bd46910470" "2946f0682172ff16ffe531ce59ea26044f949e8a51b2d4ab14d74e21fa8f2b67" "de4fe3532d51a731d313e588531e32a26f9824e216fff1306ca270487f833045" "096bb91c8fd17ff6f2f51ddaf51897c9710da5486fbbb2d370e3ff3b209ff446" "700f0a38b888fb3fe656b9d8647d71fa99b3684641cf9e02106a3e3a1ca1d87a" "5cbf5345c2af35887f1518c35c9a62409304b20006f2455ef1313507e0552b1f" default)))
  '(custom-theme-directory "~/.emacs.d/blendoit/themes/")
  '(fci-rule-color "#383838")
  '(fill-column 79)
@@ -36,6 +36,7 @@
      ("account" "%(binary) -f %(ledger-file) reg %(account)")
      ("budget" "%(binary) -f %(ledger-file) budget --exchange USD"))))
  '(line-number-mode nil)
+ '(menu-bar-mode nil)
  '(message-required-headers (quote ((optional . References) From)))
  '(mixed-pitch-variable-pitch-cursor (quote bar))
  '(nrepl-message-colors
@@ -103,7 +104,7 @@
  '(org-startup-align-all-tables t)
  '(package-selected-packages
    (quote
-    (tabbar-ruler tabbar-mode linum-relative dumb-jump csv-mode rainbow-mode org-mouse projectile minimap gnuplot ledger-mode company-mode wombat-theme wombar-theme which-key srefactor-lisp srefactor all-the-icons flycheck ibuffer-sidebar pdf-tools magit rainbow-delimiters smartparens mixed-pitch org-bullets use-package tabbar powerline ivy-hydra flatui-theme evil counsel company benchmark-init)))
+    (awesome-tab tabbar-ruler tabbar-mode linum-relative dumb-jump csv-mode rainbow-mode org-mouse projectile minimap gnuplot ledger-mode company-mode wombat-theme wombar-theme which-key srefactor-lisp srefactor all-the-icons flycheck ibuffer-sidebar pdf-tools magit rainbow-delimiters smartparens mixed-pitch org-bullets use-package tabbar powerline ivy-hydra flatui-theme evil counsel company benchmark-init)))
  '(pdf-view-midnight-colors (quote ("#DCDCCC" . "#383838")))
  '(save-place-mode t)
  '(send-mail-function (quote smtpmail-send-it))
@@ -132,7 +133,7 @@
      (340 . "#94BFF3")
      (360 . "#DC8CC3"))))
  '(vc-annotate-very-old-color "#DC8CC3")
- '(window-divider-default-places (quote right-only)))
+ '(window-divider-default-places t))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
diff --git a/init.el b/init.el
index 98cc7fa..209bf9a 100644
--- a/init.el
+++ b/init.el
@@ -9,3 +9,7 @@
 ;;; Code:
 
 (org-babel-load-file "~/.emacs.d/blendoit/blendoit-init.org")
+
+(provide 'init)
+
+;;; init.el ends here