theme loading on config-reload now smarter

config.org

@@ -139,14 +139,6 @@ https://blog.d46.us/advanced-emacs-startup/
 (setq browse-url-function 'browse-url-generic
       browse-url-generic-program "firefox")
 #+end_src* Package Management
-** dired
-#+begin_src emacs-lisp
-(use-package dired
-  :ensure nil
-  :custom
-  (dired-kill-when-opening-new-dired-buffer t))
-#+end_src
-
 ** Elpaca
 Boilerplate for Elpaca
 #+begin_src emacs-lisp
@@ -350,8 +342,12 @@ Restore it to reasonable value after init. Also stop garbage collection during m
 Windows Theme:
 #+BEGIN_SRC emacs-lisp
 (when *sys/windows*
+  (dolist (theme custom-enabled-themes)
+    (disable-theme theme))
   (load-theme 'tango))
 (when *sys/linux*
+  (dolist (theme custom-enabled-themes)
+    (disable-theme theme))
   (load-theme 'plastic))
 #+END_SRC
 
@@ -410,6 +406,14 @@ e.g. python-mode with just "π ".
 #+END_SRC
 
 
+* dired
+#+begin_src emacs-lisp
+(use-package dired
+  :ensure nil
+  :custom
+  (dired-kill-when-opening-new-dired-buffer t))
+#+end_src
+
 * Bookmarks
 Usage:
 - C-x r m (bookmark-set): add bookmark
@@ -427,6 +431,10 @@ Edit bookmarks (while in bookmark file):
   :ensure nil
   :custom
   (bookmark-default-file (concat MY--PATH_USER_LOCAL "bookmarks")))
+
+;;do I really want this?
+(use-package bookmark+
+  :ensure (:host github :repo "emacsmirror/bookmark-plus"))
 #+end_src
 
 Some windows specific stuff