;; case when checking for `mode' in set-auto-mode,
;; so we must do that here as well.
;; That is inconsistent, but we're stuck with it.
- ;; The same can be said for `coding' and `char-trans'
- ;; in set-auto-coding.
+ ;; The same can be said for `coding' in set-auto-coding.
(or (and (equal (downcase (symbol-name key)) "mode")
(setq mode-specified t))
(equal (downcase (symbol-name key)) "coding")
- (equal (downcase (symbol-name key)) "char-trans")
(condition-case nil
(push (cons (if (eq key 'eval)
'eval
(if mode-only
(if (eq var 'mode)
(setq result t))
- (unless (or (eq var 'coding) (eq var 'char-trans))
+ (unless (eq var 'coding)
(condition-case nil
(push (cons (if (eq var 'eval)
'eval