el/dot-emacs.el: Support for hideshow mode.

hideshow is mighty and winning.  Turn it on a lot.

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 8d888079074e9f5bc61b14646bdd8d539f2f35c5..65db85af77ce62740b8f2dd3c6a1e553cd40735b 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -629,6 +629,7 @@ (defun mdw-misc-mode-config ()
   (setq show-trailing-whitespace t)
   (and (fboundp 'gtags-mode)
        (gtags-mode))
   (setq show-trailing-whitespace t)
   (and (fboundp 'gtags-mode)
        (gtags-mode))

+  (hs-minor-mode t)

   (outline-minor-mode t)
   (mdw-set-font))
 
   (outline-minor-mode t)
   (mdw-set-font))
 


@@ -2137,7 +2138,7 @@ (defun mdw-text-mode ()
   (auto-fill-mode 1))
 
 ;;;--------------------------------------------------------------------------
   (auto-fill-mode 1))
 
 ;;;--------------------------------------------------------------------------

-;;; Outline mode.
+;;; Outline and hide/show modes.

 
 (defun mdw-outline-collapse-all ()
   "Completely collapse everything in the entire buffer."
 
 (defun mdw-outline-collapse-all ()
   "Completely collapse everything in the entire buffer."


@@ -2148,6 +2149,8 @@ (defun mdw-outline-collapse-all ()
       (hide-subtree)
       (forward-line))))
 
       (hide-subtree)
       (forward-line))))
 

+(setq hs-hide-comments-when-hiding-all nil)
+

 ;;;--------------------------------------------------------------------------
 ;;; Shell mode.
 
 ;;;--------------------------------------------------------------------------
 ;;; Shell mode.