126 |
member of that sequence. If this variable is nil, no re-execution occurs." |
member of that sequence. If this variable is nil, no re-execution occurs." |
127 |
:group 'convenience |
:group 'convenience |
128 |
:type 'boolean) |
:type 'boolean) |
129 |
|
|
130 |
;;;;; ****************** HACKS TO THE REST OF EMACS ******************* ;;;;; |
;;;;; ****************** HACKS TO THE REST OF EMACS ******************* ;;;;; |
131 |
|
|
132 |
;; The basic strategy is to use last-command, a variable built in to Emacs. |
;; The basic strategy is to use last-command, a variable built in to Emacs. |
262 |
(setq repeat-last-self-insert |
(setq repeat-last-self-insert |
263 |
(buffer-substring (car range) |
(buffer-substring (car range) |
264 |
(cdr range))) |
(cdr range))) |
265 |
(error (error "%s %s %s" ;Danger, Will Robinson! |
(error (error "%s %s %s" ;Danger, Will Robinson! |
266 |
"repeat can't intuit what you" |
"repeat can't intuit what you" |
267 |
"inserted before auto-fill" |
"inserted before auto-fill" |
268 |
"clobbered it, sorry"))))))) |
"clobbered it, sorry"))))))) |