63 |
|
|
64 |
To save a kbd macro, visit a file of Lisp code such as your `~/.emacs', |
To save a kbd macro, visit a file of Lisp code such as your `~/.emacs', |
65 |
use this command, and then save the file." |
use this command, and then save the file." |
66 |
(interactive "CInsert kbd macro (name): \nP") |
(interactive (list (intern (completing-read "Insert kbd macro (name): " |
67 |
|
obarray |
68 |
|
(lambda (elt) |
69 |
|
(and (fboundp elt) |
70 |
|
(or (stringp (symbol-function elt)) |
71 |
|
(vectorp (symbol-function elt))))) |
72 |
|
t)) |
73 |
|
current-prefix-arg)) |
74 |
(let (definition) |
(let (definition) |
75 |
(if (string= (symbol-name macroname) "") |
(if (string= (symbol-name macroname) "") |
76 |
(progn |
(progn |