define-skeleton is an autoloaded macro defined in skeleton.el.gz.
Signature
(define-skeleton COMMAND DOCUMENTATION &rest SKELETON)
Documentation
Define a user-configurable COMMAND that enters a statement skeleton.
DOCUMENTATION is that of the command.
SKELETON is as defined under skeleton-insert.
References
define-skeleton is unused in skeleton.el.gz.
Find all references Functions used by define-skeleton
Debugging
Enable edebug Enable tracing
Disassemble Forget
Source Code
/usr/share/emacs/29.4/lisp/skeleton.el.gz
(defmacro define-skeleton (command documentation &rest skeleton)
"Define a user-configurable COMMAND that enters a statement skeleton.
DOCUMENTATION is that of the command.
SKELETON is as defined under `skeleton-insert'."
(declare (doc-string 2) (debug (&define name stringp skeleton-edebug-spec))
(indent defun))
(if skeleton-debug
(set command skeleton))
`(progn
(put ',command 'no-self-insert t)
(defun ,command (&optional str arg)
,(concat documentation
(if (string-match "\n\\'" documentation)
"" "\n")
"\n"
"This is a skeleton command (see `skeleton-insert').
Normally the skeleton text is inserted at point, with nothing \"inside\".
If there is a highlighted region, the skeleton text is wrapped
around the region text.
A prefix argument ARG says to wrap the skeleton around the next ARG words.
A prefix argument of -1 says to wrap around region, even if not highlighted.
A prefix argument of zero says to wrap around zero words---that is, nothing.
This is a way of overriding the use of a highlighted region.")
(interactive "*P\nP")
(atomic-change-group
(skeleton-proxy-new ',skeleton str arg)))))
Symbol Properties
doc-string-elt
2
edebug-form-spec
(&define name stringp skeleton-edebug-spec)
function-history
("/usr/share/emacs/29.4/lisp/skeleton.elc"
(autoload "skeleton"
("loaddefs.elc" . 1127246)
nil t))
lisp-indent-function
defun