summary refs log tree commit diff stats
path: root/tag-emacs
diff options
context:
space:
mode:
authorAlan Pearce2015-08-13 22:40:08 +0200
committerAlan Pearce2015-08-13 22:40:08 +0200
commit08f6ecdbeda886afef83cb87ddd3f447a0359927 (patch)
treea95b76c7cc69f21f251151c0bb5da3915768669d /tag-emacs
parent29c18056ff285ac44850cf7bbfc56c7572e37d3d (diff)
downloaddotfiles-08f6ecdbeda886afef83cb87ddd3f447a0359927.tar.lz
dotfiles-08f6ecdbeda886afef83cb87ddd3f447a0359927.tar.zst
dotfiles-08f6ecdbeda886afef83cb87ddd3f447a0359927.zip
Emacs: Remove old imenu-init jump functions
Diffstat (limited to 'tag-emacs')
-rw-r--r--tag-emacs/emacs.d/init.org30
1 files changed, 0 insertions, 30 deletions
diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index 4fe6165..cd3ec4d 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -1119,36 +1119,6 @@ Option/alt, then Control.
            ("M-!" . shell-execute)))
 #+END_SRC
 
-Some stuff for getting around my =init.el=.  Now that I’m using
-=org-mode=, I’ll probably need to write something else, or fiddle with
-org’s navigation commands.
-
-#+BEGIN_SRC emacs-lisp
-(defun imenu-elisp-sections ()
-  (setq imenu-prev-index-position-function nil)
-  (add-to-list 'imenu-generic-expression '("Sections" "^;;;; \\(.+\\)$" 1) t)
-  (add-to-list 'imenu-generic-expression '("Packages" "^(req-package\\s-+\\(\\(\\sw\\|\\s_\\)+\\)$" 1) t))
-
-(defun init-narrow-to-section ()
-  (interactive)
-  (save-excursion
-    (beginning-of-line)
-    (unless (looking-at "^;;;;")
-      (re-search-backward "^;;;;" nil t))
-    (push-mark)
-    (forward-line)
-    (re-search-forward "^;;;;" nil t)
-    (forward-line -1)
-    (narrow-to-region (region-beginning) (region-end))))
-
-(defun init-imenu (p)
-  (interactive "P")
-  (find-file-existing *init-file*)
-  (widen)
-  (helm-imenu)
-  (if p (init-narrow-to-section)))
-
-(add-hook 'emacs-lisp-mode-hook 'imenu-elisp-sections)
 #+END_SRC
 
 * Minibuffer