add cool hise show to .emacs

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@13128 d0543943-73ff-0310-b7d9-9358b9ac24b2
2009-04-23 04:04:36 +00:00 · 2009-04-23 04:04:36 +00:00 · 5770dbebbd
parent fd6c821f6e
commit 5770dbebbd
1 changed files with 9 additions and 0 deletions
--- a/support-d/.emacs
+++ b/support-d/.emacs
@ -27,6 +27,15 @@



+(add-hook 'c-mode-common-hook
+  (lambda()
+    (local-set-key (kbd "C-c <right>") 'hs-show-block)
+    (local-set-key (kbd "C-c <left>")  'hs-hide-block)
+    (local-set-key (kbd "C-c <up>")    'hs-hide-all)
+    (local-set-key (kbd "C-c <down>")  'hs-show-all)
+    (hs-minor-mode t)))
+
+
 ;; replace C-s with C-\ in a much more general way so that C-\ can be typed
 ;; for every instance of C-s. It is at such a low level that emacs even thinks
 ;; that you typed a C-s.  replace C-s with C-\  ,  globally