Add copy-func-prototype defun
This commit is contained in:
parent
786aff4067
commit
9d9f289b26
11
init.el
11
init.el
@ -215,3 +215,14 @@
|
|||||||
(interactive)
|
(interactive)
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(kill-line 1))
|
(kill-line 1))
|
||||||
|
|
||||||
|
(defun copy-func-prototype ()
|
||||||
|
"Copy the current function's prototype to the kill-ring"
|
||||||
|
|
||||||
|
(interactive)
|
||||||
|
|
||||||
|
(save-excursion (beginning-of-defun)
|
||||||
|
(setq protocopy-begin (point))
|
||||||
|
(forward-list)
|
||||||
|
(setq protocopy-end (point))
|
||||||
|
(kill-ring-save protocopy-begin protocopy-end)))
|
||||||
|
Loading…
Reference in New Issue
Block a user