From 5b4b3300af62aacba527949fbaa5d6e04ce2ced8 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Thu, 27 Apr 2017 19:02:40 +0200
Subject: Emacs: Show fringe instead of border

---
 emacs/.emacs.d/init.org | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'emacs')

diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org
index a044121..02199b5 100644
--- a/emacs/.emacs.d/init.org
+++ b/emacs/.emacs.d/init.org
@@ -172,25 +172,27 @@ Let’s try a basic theme.
 
             (defun hide-clutter ()
               (interactive)
-              (fringe-mode '(0 . 4))
+              (fringe-mode '(4 . 8))
               (hide-mode-line))
 
             (defun show-clutter ()
               (interactive)
-              (fringe-mode '(8 . 4))
+              (fringe-mode '(8 . 8))
               (show-mode-line))
             (hide-clutter)
 
             (when mode-line-default-hidden
               (call-interactively #'hide-mode-line))
 
+            (setq-default indicate-buffer-boundaries 'left)
+
             (defun hide-mode-line-if-default-hidden ()
               (if mode-line-default-hidden
                   (hide-mode-line)
                 (show-mode-line)))
 
             (add-to-list 'default-frame-alist '(border-width . 0))
-            (add-to-list 'default-frame-alist '(internal-border-width . 1))
+            (add-to-list 'default-frame-alist '(internal-border-width . 0))
             (when (eq window-system 'x)
               (setq window-divider-default-bottom-width 1
                     window-divider-default-right-width 1
-- 
cgit 1.4.1