changeset 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 4aa45a7a62e8
children b87f3ba0e1d7
files lisp/international/characters.el
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/characters.el	Tue Nov 11 02:56:56 1997 +0000
+++ b/lisp/international/characters.el	Tue Nov 11 03:24:18 1997 +0000
@@ -79,6 +79,9 @@
 ;; For filling.
 (define-category ?| "While filling, we can break a line at this character.")
 
+;; For indentation calculation.
+(define-category ?\  "This character counts as a space for indentation purposes.")
+
 ;; Keep the followings for `kinsoku' processing.  See comments in
 ;; kinsoku.el.
 (define-category ?> "A character which can't be placed at beginning of line.")
@@ -279,6 +282,12 @@
 (modify-category-entry (make-char 'latin-iso8859-4) ?l)
 (modify-category-entry (make-char 'latin-iso8859-9) ?l)
 
+(modify-category-entry (make-char 'latin-iso8859-1 160) ?\ )
+(modify-category-entry (make-char 'latin-iso8859-2 160) ?\ )
+(modify-category-entry (make-char 'latin-iso8859-3 160) ?\ )
+(modify-category-entry (make-char 'latin-iso8859-4 160) ?\ )
+(modify-category-entry (make-char 'latin-iso8859-9 160) ?\ )
+
 ;; Greek character set (ISO-8859-7)
 
 (modify-category-entry (make-char 'greek-iso8859-7) ?g)