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 a0441214..02199b55 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