diff options
| author | Blendoit <blendoit@gmail.com> | 2020-12-02 21:22:54 -0800 |
|---|---|---|
| committer | Blendoit <blendoit@gmail.com> | 2020-12-02 21:22:54 -0800 |
| commit | f8df8e589b0545f45be6673e9e0ff06ca41c1c2b (patch) | |
| tree | 1477f6a56dfc43122d09f02812cc3ed15256f356 | |
| parent | 750ba03e9b7f5e4aca4d180302a6641d4a549802 (diff) | |
sd-sidebar
| -rw-r--r-- | smart-documents.org | 8 |
1 files changed, 7 insertions, 1 deletions
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 |