From f8df8e589b0545f45be6673e9e0ff06ca41c1c2b Mon Sep 17 00:00:00 2001
From: Blendoit <blendoit@gmail.com>
Date: Wed, 2 Dec 2020 21:22:54 -0800
Subject: sd-sidebar

---
 smart-documents.org | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/smart-documents.org b/smart-documents.org
index 865e779..46f8529 100644
--- a/smart-documents.org
+++ b/smart-documents.org
@@ -927,9 +927,15 @@ We replace the standard welcome screen with our own.
 Get inspiration from ~ibuffer-sidebar~ and create a better sidebar.
 
 #+BEGIN_SRC emacs-lisp :tangle yes
+(defvar sd-sidebar nil "Becomes true if sd-sidebar is visible.")
+
   (defun sd-sidebar ()
     (interactive)
-    (split-window-right))
+(if (eq sd-sidebar t))
+    (split-window-right)
+    (dired ".")
+    (dired-hide-details-mode)
+    (setq sd-sidebar t))
 #+END_SRC
 
 *** Better parentheses
-- 
cgit v1.2.3