;; that we will not need to keep permanently.
(garbage-collect)
\f
-;; Make all multibyte characters self-insert.
-(let ((l (generic-character-list))
- (table (nth 1 global-map)))
- (while l
- (aset table (car l) 'self-insert-command)
- (setq l (cdr l))))
(setq help-event-list '(help f1))