(setq coding-system
(merge-coding-systems coding-system buffer-file-coding-system)))
(setq buffer-file-coding-system coding-system)
-;;; This causes problems in bootstrapping.
-;;; ;; This is in case of an explicit call. Normally, `normal-mode' and
-;;; ;; `set-buffer-major-mode-hook' take care of setting the table.
-;;; (if (fboundp 'ucs-set-table-for-input) ; don't lose when building
-;;; (ucs-set-table-for-input))
+ ;; This is in case of an explicit call. Normally, `normal-mode' and
+ ;; `set-buffer-major-mode-hook' take care of setting the table.
+ (if (fboundp 'ucs-set-table-for-input) ; don't lose when building
+ (ucs-set-table-for-input))
(set-buffer-modified-p t)
(force-mode-line-update))