 
 (global-set-key (kbd "C-c a") 'org-agenda)
 (global-set-key (kbd "C-c c") 'org-capture)
-;; TODO is there a helm autocomplete I could use?
 (global-set-key (kbd "C-c b") 'org-switchb)
-(global-set-key (kbd "C-c h") 'bh/hide-other)
-(global-set-key (kbd "C-c n") 'bh/toggle-next-task-display)
-
-(defun bh/hide-other ()
-  (interactive)
-  (save-excursion
-    (org-back-to-heading 'invisible-ok)
-    (hide-other)
-    (org-cycle)
-    (org-cycle)
-    (org-cycle)))
-
+(global-set-key (kbd "C-c n") 'pjs-cleanup-buffer)
+(global-set-key (kbd "C-c C-n") 'pjs-cleanup-buffer)
 (global-set-key (kbd "C-c o a") 'bh/show-org-agenda)
 
 (defun bh/show-org-agenda ()


(when (not (eq (server-running-p) 't))
  (server-start))

(global-set-key (kbd "C-c i") 'imenu)
(global-set-key (kbd "C-c C-i") 'imenu)

(global-set-key (kbd "C-c t") 'bh/org-todo)
(global-set-key (kbd "C-c w") 'bh/widen)

(global-set-key (kbd "C-x n r") 'narrow-to-region)

(add-hook 'clojure-mode-hook 'paredit-mode)
(add-hook 'clojure-mode-hook 'eldoc-mode)

(defun pjs-sort-symbols (reverse beg end)
  "Sort symbols in region alphabetically, in REVERSE if negative.
