From afabc8551124f335359e6af1b0d5c09989ff06b6 Mon Sep 17 00:00:00 2001 From: Blendoit Date: Sat, 15 May 2021 13:45:32 -0700 Subject: No more sidebar. --- smart-documents.org | 47 ----------------------------------------------- 1 file changed, 47 deletions(-) diff --git a/smart-documents.org b/smart-documents.org index 1587c78..e7df055 100644 --- a/smart-documents.org +++ b/smart-documents.org @@ -389,23 +389,6 @@ The following bindings lead to more natural window & frame exit behaviors. (global-set-key (kbd "C-q") 'sd-delete-frame-or-kill-emacs) #+END_SRC -*** Open sidebar - -We define bindings to open a sidebar at the left of the frame. - -#+BEGIN_SRC emacs-lisp :tangle yes - (global-set-key (kbd " ") - (lambda () - "Open the sidebar on the left side." - (interactive) - (sd-sidebar "left"))) - (global-set-key (kbd " ") - (lambda () - "Open the sidebar on the right side." - (interactive) - (sd-sidebar "right"))) -#+END_SRC - ** Text display *** Zoom @@ -884,36 +867,6 @@ We replace the standard welcome screen with our own. (setq dashboard-banner-logo-title "A modern professional text editor.")) #+END_SRC -*** TODO Sidebar -:PROPERTIES: -:sd-unpack-path: sd-sidebar.el -:END: - -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 (side) - "Open the sidebar on the chosen SIDE of the buffer." - (interactive) - (cond ((eq sd-sidebar t) - (unless (one-window-p) - (delete-window)) - (setq sd-sidebar nil)) - ((string-equal side "left") - (split-window-right) - (dired ".") - (dired-hide-details-mode) - (setq sd-sidebar t)) - ((string-equal side "right") - (split-window-right) - (windmove-right) - (dired ".") - (dired-hide-details-mode) - (setq sd-sidebar t)))) -#+END_SRC - *** Better parentheses #+BEGIN_SRC emacs-lisp :tangle yes -- cgit v1.2.3