comparison lisp/international/utf-8.el @ 47409:63f5cc467cea

(utf-8-fragment-on-decoding): Fix last change.
author Dave Love <fx@gnu.org>
date Wed, 11 Sep 2002 20:57:50 +0000
parents d46bcfbfdda0
children 6d4430dfeafc
comparison
equal deleted inserted replaced
47408:2239db3433ca 47409:63f5cc467cea
141 Setting this variable outside customize has no effect." 141 Setting this variable outside customize has no effect."
142 :set (lambda (s v) 142 :set (lambda (s v)
143 (setq utf-8-translation-table-for-decode 143 (setq utf-8-translation-table-for-decode
144 (if v 144 (if v
145 utf-8-fragmentation-table 145 utf-8-fragmentation-table
146 (make-char-table))) 146 (make-translation-table)))
147 (define-translation-table 'utf-8-translation-table-for-decode 147 (define-translation-table 'utf-8-translation-table-for-decode
148 utf-8-translation-table-for-decode) 148 utf-8-translation-table-for-decode)
149 (set-default s v)) 149 (set-default s v))
150 :version "21.4" 150 :version "21.4"
151 :type 'boolean 151 :type 'boolean