279 |
"Make MAP override all normally self-inserting keys to be undefined. |
"Make MAP override all normally self-inserting keys to be undefined. |
280 |
Normally, as an exception, digits and minus-sign are set to make prefix args, |
Normally, as an exception, digits and minus-sign are set to make prefix args, |
281 |
but optional second arg NODIGITS non-nil treats them like other chars." |
but optional second arg NODIGITS non-nil treats them like other chars." |
282 |
(substitute-key-definition 'self-insert-command 'undefined map global-map) |
(define-key map [remap self-insert-command] 'undefined) |
283 |
(or nodigits |
(or nodigits |
284 |
(let (loop) |
(let (loop) |
285 |
(define-key map "-" 'negative-argument) |
(define-key map "-" 'negative-argument) |