comparison lisp/international/characters.el @ 20247:7cb27e61a1d5

New category ` '. Enable for non-breaking space in Latin-N.
author Karl Heuer <kwzh@gnu.org>
date Tue, 11 Nov 1997 03:24:18 +0000
parents f7ab34ae92bb
children 179dbdbc3882
comparison
equal deleted inserted replaced
20246:4aa45a7a62e8 20247:7cb27e61a1d5
76 (define-category ?8 "vowel-signs") 76 (define-category ?8 "vowel-signs")
77 (define-category ?9 "semivowel lower") 77 (define-category ?9 "semivowel lower")
78 78
79 ;; For filling. 79 ;; For filling.
80 (define-category ?| "While filling, we can break a line at this character.") 80 (define-category ?| "While filling, we can break a line at this character.")
81
82 ;; For indentation calculation.
83 (define-category ?\ "This character counts as a space for indentation purposes.")
81 84
82 ;; Keep the followings for `kinsoku' processing. See comments in 85 ;; Keep the followings for `kinsoku' processing. See comments in
83 ;; kinsoku.el. 86 ;; kinsoku.el.
84 (define-category ?> "A character which can't be placed at beginning of line.") 87 (define-category ?> "A character which can't be placed at beginning of line.")
85 (define-category ?< "A character which can't be placed at end of line.") 88 (define-category ?< "A character which can't be placed at end of line.")
277 (modify-category-entry (make-char 'latin-iso8859-2) ?l) 280 (modify-category-entry (make-char 'latin-iso8859-2) ?l)
278 (modify-category-entry (make-char 'latin-iso8859-3) ?l) 281 (modify-category-entry (make-char 'latin-iso8859-3) ?l)
279 (modify-category-entry (make-char 'latin-iso8859-4) ?l) 282 (modify-category-entry (make-char 'latin-iso8859-4) ?l)
280 (modify-category-entry (make-char 'latin-iso8859-9) ?l) 283 (modify-category-entry (make-char 'latin-iso8859-9) ?l)
281 284
285 (modify-category-entry (make-char 'latin-iso8859-1 160) ?\ )
286 (modify-category-entry (make-char 'latin-iso8859-2 160) ?\ )
287 (modify-category-entry (make-char 'latin-iso8859-3 160) ?\ )
288 (modify-category-entry (make-char 'latin-iso8859-4 160) ?\ )
289 (modify-category-entry (make-char 'latin-iso8859-9 160) ?\ )
290
282 ;; Greek character set (ISO-8859-7) 291 ;; Greek character set (ISO-8859-7)
283 292
284 (modify-category-entry (make-char 'greek-iso8859-7) ?g) 293 (modify-category-entry (make-char 'greek-iso8859-7) ?g)
285 294
286 (let ((c 182)) 295 (let ((c 182))