[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master de33de1: Add sexp navigation commands to elisp-mode
From: |
Lars Ingebrigtsen |
Subject: |
master de33de1: Add sexp navigation commands to elisp-mode |
Date: |
Sat, 27 Feb 2021 09:58:29 -0500 (EST) |
branch: master
commit de33de1a660283f45a10acfaedef20c460553dbd
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Add sexp navigation commands to elisp-mode
* lisp/progmodes/elisp-mode.el (emacs-lisp-mode-menu): Add some
navigation commands (bug#24774).
---
lisp/progmodes/elisp-mode.el | 21 +++++++++++++++------
1 file changed, 15 insertions(+), 6 deletions(-)
diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index 70aa66c..048f657 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -88,7 +88,16 @@ All commands in `lisp-mode-shared-map' are inherited by this
map.")
["Instrument Function for Debugging" edebug-defun
:help "Evaluate the top level form point is in, stepping through with
Edebug"
:keys "C-u C-M-x"]
- ["Linting"
+ ("Navigation"
+ ["Forward Sexp" forward-sexp
+ :help "Go to the next s-expression"]
+ ["Backward Sexp" backward-sexp
+ :help "Go to the previous s-expression"]
+ ["Beginning Of Defun" beginning-of-defun
+ :help "Go to the start of the current function definition"]
+ ["Up List" up-list
+ :help "Go one level up and forward"])
+ ("Linting"
["Lint Defun" elint-defun
:help "Lint the function at point"]
["Lint Buffer" elint-current-buffer
@@ -96,8 +105,8 @@ All commands in `lisp-mode-shared-map' are inherited by this
map.")
["Lint File..." elint-file
:help "Lint a file"]
["Lint Directory..." elint-directory
- :help "Lint a directory"]]
- ["Profiling"
+ :help "Lint a directory"])
+ ("Profiling"
;; Maybe this should be in a separate submenu from the ELP stuff?
["Start Native Profiler..." profiler-start
:help "Start recording profiling information"]
@@ -124,8 +133,8 @@ All commands in `lisp-mode-shared-map' are inherited by
this map.")
["Remove Instrumentation for All Functions" elp-restore-all
:help "Restore the original definitions of all functions being profiled"]
["Remove Instrumentation for Function..." elp-restore-function
- :help "Restore an instrumented function to its original definition"]]
- ["Tracing"
+ :help "Restore an instrumented function to its original definition"])
+ ("Tracing"
["Trace Function..." trace-function
:help "Trace the function given as an argument"]
["Trace Function Quietly..." trace-function-background
@@ -134,7 +143,7 @@ All commands in `lisp-mode-shared-map' are inherited by
this map.")
["Untrace All" untrace-all
:help "Untrace all currently traced functions"]
["Untrace Function..." untrace-function
- :help "Untrace function, and possibly activate all remaining advice"]]
+ :help "Untrace function, and possibly activate all remaining advice"])
["Construct Regexp" re-builder
:help "Construct a regexp interactively"]
["Check Documentation Strings" checkdoc
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master de33de1: Add sexp navigation commands to elisp-mode,
Lars Ingebrigtsen <=