Trailing whitepace deleted.

[bpt/emacs.git] / lisp / international / characters.el

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 9757c23..a300cde 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -83,7 +83,7 @@
 (define-category ?| "While filling, we can break a line at this character.")
 
 ;; For indentation calculation.
-(define-category ? 
+(define-category ?
   "This character counts as a space for indentation purposes.")
 
 ;; Keep the following for `kinsoku' processing.  See comments in
@@ -557,7 +557,7 @@
     ;; ?K is double width, ?k isn't specified
     (modify-category-entry (decode-char 'ucs c) ?k)
     (modify-category-entry (decode-char 'ucs c) ?j)
-    (modify-category-entry (decode-char 'ucs c) ?\|) 
+    (modify-category-entry (decode-char 'ucs c) ?\|)
     (setq c (1+ c))))
 
 ;; Hiragana block
@@ -566,7 +566,7 @@
     ;; ?H is actually defined to be double width
     (modify-category-entry (decode-char 'ucs c) ?H)
     ;;(modify-category-entry (decode-char 'ucs c) ?j)
-    (modify-category-entry (decode-char 'ucs c) ?\|) 
+    (modify-category-entry (decode-char 'ucs c) ?\|)
     (setq c (1+ c))))
 
 ;; JISX0208
@@ -675,7 +675,7 @@
                  ("\e(1PRS]`\e(B-\e(1d\e(B"        "w"     ?1) ; vowel base
                  ("\e(1QT\e(B-\e(1W[m\e(B" "w"     ?2) ; vowel upper
                  ("\e(1XY\e(B"           "w"     ?3) ; vowel lower
-                 ("\e(1h\e(B-\e(1l\e(B"    "w"     ?4) ; tone mark 
+                 ("\e(1h\e(B-\e(1l\e(B"    "w"     ?4) ; tone mark
                  ("\e(1\\e(B"            "w"     ?9) ; semivowel lower
                  ("\e(1p\e(B-\e(1y\e(B"    "w"     ?6) ; digit
                  ("\e(1Of\e(B"           "_"     ?5) ; symbol
@@ -684,7 +684,7 @@
                  ("\e$,1DPDRDSD]D`\e(B-\e$,1Dd\e(B"        "w"     ?1) ; vowel base
                  ("\e$,1DQDT\e(B-\e$,1DWD[Dm\e(B"  "w"     ?2) ; vowel upper
                  ("\e$,1DXDY\e(B"        "w"     ?3) ; vowel lower
-                 ("\e$,1Dh\e(B-\e$,1Dk\e(B"        "w"     ?4) ; tone mark 
+                 ("\e$,1Dh\e(B-\e$,1Dk\e(B"        "w"     ?4) ; tone mark
                  ("\e$,1D\D]\e(B"        "w"     ?9) ; semivowel lower
                  ("\e$,1Dp\e(B-\e$,1Dy\e(B"        "w"     ?6) ; digit
                  ("\e$,1DODf\e(B"        "_"     ?5) ; symbol
@@ -722,7 +722,7 @@
                  ("\e,TDFPRS`\e(B-\e,Te\e(B"       "w"     ?1) ; vowel base
                  ("\e,TQT\e(B-\e,TWgn\e(B" "w"     ?2) ; vowel upper
                  ("\e,TX\e(B-\e,TZ\e(B"    "w"     ?3) ; vowel lower
-                 ("\e,Th\e(B-\e,Tm\e(B"    "w"     ?4) ; tone mark 
+                 ("\e,Th\e(B-\e,Tm\e(B"    "w"     ?4) ; tone mark
                  ("\e,Tp\e(B-\e,Ty\e(B"    "w"     ?6) ; digit
                  ("\e,TOf_oz{\e(B"       "_"     ?5) ; symbol
                  ;; Unicode equivalents
@@ -730,7 +730,7 @@
                  ("\e$,1C$C&C0C2C3C@\e(B-\e$,1CE\e(B"      "w"     ?1) ; vowel base
                  ("\e$,1C1C4\e(B-\e$,1C7CGCN\e(B"  "w"     ?2) ; vowel upper
                  ("\e$,1C8\e(B-\e$,1C:\e(B"        "w"     ?3) ; vowel lower
-                 ("\e$,1CH\e(B-\e$,1CM\e(B"        "w"     ?4) ; tone mark 
+                 ("\e$,1CH\e(B-\e$,1CM\e(B"        "w"     ?4) ; tone mark
                  ("\e$,1CP\e(B-\e$,1CY\e(B"        "w"     ?6) ; digit
                  ("\e$,1C/CFC?COCZC[\e(B"        "_"     ?5) ; symbol
                  ))
@@ -1054,7 +1054,7 @@
             (and (>= c #x048c) (<= c #x04be))
             (and (>= c #x04d0) (<= c #x04f4)))
         (set-case-syntax-pair
-         (decode-char 'ucs c) (decode-char 'ucs (1+ c)) tbl))   
+         (decode-char 'ucs c) (decode-char 'ucs (1+ c)) tbl))
     (setq c (1+ c)))
   (set-case-syntax-pair ?\e$,1*!\e(B ?\e$,1*"\e(B tbl)
   (set-case-syntax-pair ?\e$,1*#\e(B ?\e$,1*$\e(B tbl)