diff options
| author | Dave Love | 2001-02-12 18:46:02 +0000 |
|---|---|---|
| committer | Dave Love | 2001-02-12 18:46:02 +0000 |
| commit | 19be0f52b1ffbd1e5ae3ec7a31854c809b38cf82 (patch) | |
| tree | 1d24bf86b6e44ca295c50ed9589f29e497217d62 | |
| parent | 4c813282bfc2ef686926bb6a9c764d9fc4f11752 (diff) | |
| download | emacs-19be0f52b1ffbd1e5ae3ec7a31854c809b38cf82.tar.gz emacs-19be0f52b1ffbd1e5ae3ec7a31854c809b38cf82.zip | |
Undo coding change, which screwed up somehow.
| -rw-r--r-- | lisp/international/latin1-disp.el | 764 |
1 files changed, 382 insertions, 382 deletions
diff --git a/lisp/international/latin1-disp.el b/lisp/international/latin1-disp.el index 0bcf85cd01c..49678cc9518 100644 --- a/lisp/international/latin1-disp.el +++ b/lisp/international/latin1-disp.el | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | ;;; latin1-disp.el --- display tables for other ISO 8859 on Latin-1 terminals -*- coding: iso-2022-7bit -*- | 1 | ;;; latin1-disp.el --- display tables for other ISO 8859 on Latin-1 terminals -*- coding: emacs-mule -*- |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 2000 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 2000 Free Software Foundation, Inc. |
| 4 | 4 | ||
| @@ -208,66 +208,66 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 208 | (mapc | 208 | (mapc |
| 209 | (lambda (l) | 209 | (lambda (l) |
| 210 | (apply 'latin1-display-char l)) | 210 | (apply 'latin1-display-char l)) |
| 211 | '((?,BF(B "'C" "C'") | 211 | '((?と "'C" "C'") |
| 212 | (?,BP(B "'D" "/D") | 212 | (?ひ "'D" "/D") |
| 213 | (?,B&(B "'S" "S'") | 213 | (?え "'S" "S'") |
| 214 | (?,Bf(B "'c" "c'") | 214 | (?よ "'c" "c'") |
| 215 | (?,Bp(B "'d" "/d") | 215 | (?を "'d" "/d") |
| 216 | (?,BE(B "'L" "L'") | 216 | (?で "'L" "L'") |
| 217 | (?,Bq(B "'n" "n'") | 217 | (?ん "'n" "n'") |
| 218 | (?,BQ(B "'N" "N'") | 218 | (?び "'N" "N'") |
| 219 | (?,B`(B "'r" "r'") | 219 | (?も "'r" "r'") |
| 220 | (?,B@(B "'R" "R'") | 220 | (?ぢ "'R" "R'") |
| 221 | (?,B6(B "'s" "s'") | 221 | (?じ "'s" "s'") |
| 222 | (?,B<(B "'z" "z'") | 222 | (?ぞ "'z" "z'") |
| 223 | (?,B,(B "'Z" "Z'") | 223 | (?ぎ "'Z" "Z'") |
| 224 | (?,B!(B "`A" "A;") | 224 | (?ぃ "`A" "A;") |
| 225 | (?,BJ(B "`E" "E;") | 225 | (?ぬ "`E" "E;") |
| 226 | (?,B#(B "`L" "/L") | 226 | (?ぅ "`L" "/L") |
| 227 | (?,B*(B "`S" ",S") | 227 | (?が "`S" ",S") |
| 228 | (?,B^(B "`T" ",T") | 228 | (?む "`T" ",T") |
| 229 | (?,B/(B "`Z" "Z^.") | 229 | (?け "`Z" "Z^.") |
| 230 | (?,B1(B "`a" "a;") | 230 | (?こ "`a" "a;") |
| 231 | (?,B3(B "`l" "/l") | 231 | (?さ "`l" "/l") |
| 232 | (?,Bj(B "`e" "e;") | 232 | (?れ "`e" "e;") |
| 233 | (?,B:(B "`s" ",s") | 233 | (?ぜ "`s" ",s") |
| 234 | (?,B~(B "`t" ",t") | 234 | (? "`t" ",t") |
| 235 | (?,B?(B "`z" "z^.") | 235 | (?ち "`z" "z^.") |
| 236 | (?,B(B "`." "'.") | 236 | (? "`." "'.") |
| 237 | (?,BC(B "~A" "A(") | 237 | (?づ "~A" "A(") |
| 238 | (?,BH(B "~C" "C<") | 238 | (?な "~C" "C<") |
| 239 | (?,BO(B "~D" "D<") | 239 | (?ぱ "~D" "D<") |
| 240 | (?,BL(B "~E" "E<") | 240 | (?の "~E" "E<") |
| 241 | (?,Bl(B "~e" "e<") | 241 | (?ゎ "~e" "e<") |
| 242 | (?,B%(B "~L" "L<") | 242 | (?ぇ "~L" "L<") |
| 243 | (?,BR(B "~N" "N<") | 243 | (?ぴ "~N" "N<") |
| 244 | (?,BU(B "~O" "O''") | 244 | (?ぷ "~O" "O''") |
| 245 | (?,BX(B "~R" "R<") | 245 | (?ぺ "~R" "R<") |
| 246 | (?,B)(B "~S" "S<") | 246 | (?か "~S" "S<") |
| 247 | (?,B+(B "~T" "T<") | 247 | (?き "~T" "T<") |
| 248 | (?,B[(B "~U" "U''") | 248 | (?ぽ "~U" "U''") |
| 249 | (?,B.(B "~Z" "Z<") | 249 | (?ぐ "~Z" "Z<") |
| 250 | (?,Bc(B "~a" "a(}") | 250 | (?ゅ "~a" "a(}") |
| 251 | (?,Bh(B "~c" "c<") | 251 | (?り "~c" "c<") |
| 252 | (?,Bo(B "~d" "d<") | 252 | (?ゑ "~d" "d<") |
| 253 | (?,B5(B "~l" "l<") | 253 | (?し "~l" "l<") |
| 254 | (?,Br(B "~n" "n<") | 254 | (? "~n" "n<") |
| 255 | (?,Bu(B "~o" "o''") | 255 | (? "~o" "o''") |
| 256 | (?,Bx(B "~r" "r<") | 256 | (? "~r" "r<") |
| 257 | (?,B9(B "~s" "s<") | 257 | (?せ "~s" "s<") |
| 258 | (?,B;(B "~t" "t<") | 258 | (?そ "~t" "t<") |
| 259 | (?,B{(B "~u" "u''") | 259 | (? "~u" "u''") |
| 260 | (?,B>(B "~z" "z<") | 260 | (?だ "~z" "z<") |
| 261 | (?,B7(B "~v" "'<") ; ?,B"(B in latin-pre | 261 | (?す "~v" "'<") ; ?い in latin-pre |
| 262 | (?,B"(B "~~" "'(") | 262 | (?い "~~" "'(") |
| 263 | (?,By(B "uu" "u^0") | 263 | (? "uu" "u^0") |
| 264 | (?,BY(B "UU" "U^0") | 264 | (?ほ "UU" "U^0") |
| 265 | (?,BD(B "\"A") | 265 | (?て "\"A") |
| 266 | (?,Bd(B "\"a") | 266 | (?ゆ "\"a") |
| 267 | (?,BK(B "\"E" "E:") | 267 | (?ね "\"E" "E:") |
| 268 | (?,Bk(B "\"e") | 268 | (?ろ "\"e") |
| 269 | (?,B=(B "''" "'") | 269 | (?た "''" "'") |
| 270 | (?,B7(B "'<") ; Lynx's rendering of caron | 270 | (?す "'<") ; Lynx's rendering of caron |
| 271 | )))) | 271 | )))) |
| 272 | 272 | ||
| 273 | ((eq set 'latin-3) | 273 | ((eq set 'latin-3) |
| @@ -277,34 +277,34 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 277 | (mapc | 277 | (mapc |
| 278 | (lambda (l) | 278 | (lambda (l) |
| 279 | (apply 'latin1-display-char l)) | 279 | (apply 'latin1-display-char l)) |
| 280 | '((?,C!(B "/H") | 280 | '((?Γ "/H") |
| 281 | (?,C"(B "~`" "'(") | 281 | (?Δ "~`" "'(") |
| 282 | (?,C&(B "^H" "H^") | 282 | (?Θ "^H" "H^") |
| 283 | (?,C6(B "^h" "h^") | 283 | (?Ω "^h" "h^") |
| 284 | (?,C)(B ".I" "I^.") | 284 | (?Λ ".I" "I^.") |
| 285 | (?,C*(B ",S") | 285 | (?Μ ",S") |
| 286 | (?,C+(B "~G" "G(") | 286 | (?Ν "~G" "G(") |
| 287 | (?,C,(B "^J" "J^") | 287 | (?Ξ "^J" "J^") |
| 288 | (?,C/(B ".Z" "Z^.") | 288 | (?Ρ ".Z" "Z^.") |
| 289 | (?,C1(B "/h") | 289 | (?Τ "/h") |
| 290 | (?,C9(B ".i" "i^.") | 290 | (?ケ ".i" "i^.") |
| 291 | (?,C:(B ",s") | 291 | (?コ ",s") |
| 292 | (?,C;(B "~g" "g(") | 292 | (?サ "~g" "g(") |
| 293 | (?,C<(B "^j" "j^") | 293 | (?シ "^j" "j^") |
| 294 | (?,C?(B ".Z" "z^.") | 294 | (?α ".Z" "z^.") |
| 295 | (?,CE(B ".c" "C^.") | 295 | (?η ".c" "C^.") |
| 296 | (?,CF(B "^C" "C^") | 296 | (?θ "^C" "C^") |
| 297 | (?,CU(B ".G" "G^.") | 297 | (?ψ ".G" "G^.") |
| 298 | (?,CX(B "^G" "G^") | 298 | (?リ "^G" "G^") |
| 299 | (?,C](B "~U" "U(") | 299 | (?ン "~U" "U(") |
| 300 | (?,C^(B "^S" "S^") | 300 | (?゙ "^S" "S^") |
| 301 | (?,Ce(B ".C" "c^.") | 301 | (? ".C" "c^.") |
| 302 | (?,Cf(B "^c" "c^") | 302 | (? "^c" "c^") |
| 303 | (?,Cu(B ".g" "g^.") | 303 | (? ".g" "g^.") |
| 304 | (?,Cx(B "^g" "g^") | 304 | (? "^g" "g^") |
| 305 | (?,C}(B "~u" "u(") | 305 | (? "~u" "u(") |
| 306 | (?,C~(B "^s" "s^") | 306 | (? "^s" "s^") |
| 307 | (?,C(B "/." "^."))))) | 307 | (? "/." "^."))))) |
| 308 | 308 | ||
| 309 | ((eq set 'latin-4) | 309 | ((eq set 'latin-4) |
| 310 | (when (or force | 310 | (when (or force |
| @@ -313,55 +313,55 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 313 | (mapc | 313 | (mapc |
| 314 | (lambda (l) | 314 | (lambda (l) |
| 315 | (apply 'latin1-display-char l)) | 315 | (apply 'latin1-display-char l)) |
| 316 | '((?,D!(B "A," "A;") | 316 | '((?┌ "A," "A;") |
| 317 | (?,D"(B "k/" "kk") | 317 | (?┐ "k/" "kk") |
| 318 | (?,D#(B "R," ",R") | 318 | (?┘ "R," ",R") |
| 319 | (?,D%(B "I~" "?I") | 319 | (?├ "I~" "?I") |
| 320 | (?,D&(B "L," ",L") | 320 | (?┬ "L," ",L") |
| 321 | (?,D)(B "S~" "S<") | 321 | (?┼ "S~" "S<") |
| 322 | (?,D*(B "E-") | 322 | (?━ "E-") |
| 323 | (?,D+(B "G," ",G") | 323 | (?┃ "G," ",G") |
| 324 | (?,D,(B "T/" "/T") | 324 | (?┏ "T/" "/T") |
| 325 | (?,D.(B "Z~" "Z<") | 325 | (?┛ "Z~" "Z<") |
| 326 | (?,D1(B "a," "a;") | 326 | (?┳ "a," "a;") |
| 327 | (?,D2(B "';") | 327 | (?┫ "';") |
| 328 | (?,D3(B "r," ",r") | 328 | (?┻ "r," ",r") |
| 329 | (?,D5(B "i~" "~i") | 329 | (?┠ "i~" "~i") |
| 330 | (?,D6(B "l," ",l") | 330 | (?┯ "l," ",l") |
| 331 | (?,D7(B "'<") | 331 | (?┨ "'<") |
| 332 | (?,D9(B "s~" "s<") | 332 | (?┿ "s~" "s<") |
| 333 | (?,D:(B "e-") | 333 | (?┝ "e-") |
| 334 | (?,D;(B "g," ",g") | 334 | (?┰ "g," ",g") |
| 335 | (?,D<(B "t/" "/t") | 335 | (?┥ "t/" "/t") |
| 336 | (?,D=(B "N/" "NG") | 336 | (?┸ "N/" "NG") |
| 337 | (?,D>(B "z~" "z<") | 337 | (?╂ "z~" "z<") |
| 338 | (?,D?(B "n/" "ng") | 338 | (?ソ "n/" "ng") |
| 339 | (?,D@(B "A-") | 339 | (?タ "A-") |
| 340 | (?,DG(B "I," "I;") | 340 | (?ヌ "I," "I;") |
| 341 | (?,DH(B "C~" "C<") | 341 | (?ネ "C~" "C<") |
| 342 | (?,DJ(B "E," "E;") | 342 | (?ハ "E," "E;") |
| 343 | (?,DL(B "E." "E^.") | 343 | (?フ "E." "E^.") |
| 344 | (?,DO(B "I-") | 344 | (?マ "I-") |
| 345 | (?,DQ(B "N," ",N") | 345 | (?ム "N," ",N") |
| 346 | (?,DR(B "O-") | 346 | (?メ "O-") |
| 347 | (?,DS(B "K," ",K") | 347 | (?モ "K," ",K") |
| 348 | (?,DY(B "U," "U;") | 348 | (?ル "U," "U;") |
| 349 | (?,D](B "U~" "~U") | 349 | (?ン "U~" "~U") |
| 350 | (?,D^(B "U-") | 350 | (?゙ "U-") |
| 351 | (?,D`(B "a-") | 351 | (? "a-") |
| 352 | (?,Dg(B "i," "i;") | 352 | (? "i," "i;") |
| 353 | (?,Dh(B "c~" "c<") | 353 | (? "c~" "c<") |
| 354 | (?,Dj(B "e," "e;") | 354 | (? "e," "e;") |
| 355 | (?,Dl(B "e." "e^.") | 355 | (? "e." "e^.") |
| 356 | (?,Do(B "i-") | 356 | (? "i-") |
| 357 | (?,Dp(B "d/" "/d") | 357 | (? "d/" "/d") |
| 358 | (?,Dq(B "n," ",n") | 358 | (? "n," ",n") |
| 359 | (?,Dr(B "o-") | 359 | (? "o-") |
| 360 | (?,Ds(B "k," ",k") | 360 | (? "k," ",k") |
| 361 | (?,Dy(B "u," "u;") | 361 | (? "u," "u;") |
| 362 | (?,D}(B "u~" "~u") | 362 | (? "u~" "~u") |
| 363 | (?,D~(B "u-") | 363 | (? "u-") |
| 364 | (?,D(B "^."))))) | 364 | (? "^."))))) |
| 365 | 365 | ||
| 366 | ((eq set 'latin-5) | 366 | ((eq set 'latin-5) |
| 367 | (when (or force | 367 | (when (or force |
| @@ -370,15 +370,15 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 370 | (mapc | 370 | (mapc |
| 371 | (lambda (l) | 371 | (lambda (l) |
| 372 | (apply 'latin1-display-char l)) | 372 | (apply 'latin1-display-char l)) |
| 373 | '((?,Mp(B "~g" "g(") | 373 | '((?昨 "~g" "g(") |
| 374 | (?,MP(B "~G" "G(") | 374 | (?災 "~G" "G(") |
| 375 | (?,M](B ".I" "I^.") | 375 | (?在 ".I" "I^.") |
| 376 | (?,M~(B ",s") | 376 | (? ",s") |
| 377 | (?,M^(B ",S") | 377 | (?材 ",S") |
| 378 | (?,Mj(B "^e" "e<") ; from latin-post | 378 | (?碕 "^e" "e<") ; from latin-post |
| 379 | (?,Ml(B ".e" "e^.") | 379 | (?作 ".e" "e^.") |
| 380 | (?,Mo(B "\"i" "i-") ; from latin-post | 380 | (?搾 "\"i" "i-") ; from latin-post |
| 381 | (?,M}(B ".i" "i."))))) | 381 | (? ".i" "i."))))) |
| 382 | 382 | ||
| 383 | ((eq set 'latin-8) | 383 | ((eq set 'latin-8) |
| 384 | (when (or force | 384 | (when (or force |
| @@ -387,37 +387,37 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 387 | (mapc | 387 | (mapc |
| 388 | (lambda (l) | 388 | (lambda (l) |
| 389 | (apply 'latin1-display-char l)) | 389 | (apply 'latin1-display-char l)) |
| 390 | '((?,_!(B ".B" "B`") | 390 | '((?升 ".B" "B`") |
| 391 | (?,_"(B ".b" "b`") | 391 | (?召 ".b" "b`") |
| 392 | (?,_%(B ".c" "c`") | 392 | (?唱 ".c" "c`") |
| 393 | (?,_$(B ".C" "C`") | 393 | (?商 ".C" "C`") |
| 394 | (?,_&(B ".D" "D`") | 394 | (?嘗 ".D" "D`") |
| 395 | (?,_+(B ".d" "d`") | 395 | (?将 ".d" "d`") |
| 396 | (?,_8(B "`w") | 396 | (?昇 "`w") |
| 397 | (?,_((B "`W") | 397 | (?妾 "`W") |
| 398 | (?,_:(B "'w" "w'") | 398 | (?昭 "'w" "w'") |
| 399 | (?,_*(B "'W" "W'") | 399 | (?宵 "'W" "W'") |
| 400 | (?,_<(B "`y") | 400 | (?松 "`y") |
| 401 | (?,_,(B "`Y") | 401 | (?小 "`Y") |
| 402 | (?,_1(B ".f" "f`") | 402 | (?廠 ".f" "f`") |
| 403 | (?,_0(B ".F" "F`") | 403 | (?床 ".F" "F`") |
| 404 | (?,_3(B ".g" "g`") | 404 | (?承 ".g" "g`") |
| 405 | (?,_2(B ".G" "G`") | 405 | (?彰 ".G" "G`") |
| 406 | (?,_5(B ".m" "m`") | 406 | (?招 ".m" "m`") |
| 407 | (?,_4(B ".M" "M`") | 407 | (?抄 ".M" "M`") |
| 408 | (?,_9(B ".p" "p`") | 408 | (?昌 ".p" "p`") |
| 409 | (?,_7(B ".P" "P`") | 409 | (?捷 ".P" "P`") |
| 410 | (?,_?(B ".s" "s`") | 410 | (?樵 ".s" "s`") |
| 411 | (?,_;(B ".S" "S`") | 411 | (?晶 ".S" "S`") |
| 412 | (?,_>(B "\"w") | 412 | (?樟 "\"w") |
| 413 | (?,_=(B "\"W") | 413 | (?梢 "\"W") |
| 414 | (?,_p(B "^w" "w^") | 414 | (?条 "^w" "w^") |
| 415 | (?,_P(B "^W" "W^") | 415 | (?紹 "^W" "W^") |
| 416 | (?,_w(B ".t" "t`") | 416 | (?譲 ".t" "t`") |
| 417 | (?,_W(B ".T" "T`") | 417 | (?訟 ".T" "T`") |
| 418 | (?,_~(B "^y" "y^") | 418 | (? "^y" "y^") |
| 419 | (?,_^(B "^Y" "Y^") | 419 | (?鉦 "^Y" "Y^") |
| 420 | (?,_/(B "\"Y"))))) | 420 | (?庄 "\"Y"))))) |
| 421 | 421 | ||
| 422 | ((eq set 'latin-9) | 422 | ((eq set 'latin-9) |
| 423 | (when (or force | 423 | (when (or force |
| @@ -426,14 +426,14 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 426 | (mapc | 426 | (mapc |
| 427 | (lambda (l) | 427 | (lambda (l) |
| 428 | (apply 'latin1-display-char l)) | 428 | (apply 'latin1-display-char l)) |
| 429 | '((?,b((B "~s" "s<") | 429 | '((?耳 "~s" "s<") |
| 430 | (?,b&(B "~S" "S<") | 430 | (?示 "~S" "S<") |
| 431 | (?,b$(B "Euro" "E=") | 431 | (?痔 "Euro" "E=") |
| 432 | (?,b8(B "~z" "z<") | 432 | (?失 "~z" "z<") |
| 433 | (?,b4(B "~Z" "Z<") | 433 | (?雫 "~Z" "Z<") |
| 434 | (?,b>(B "\"Y") | 434 | (?疾 "\"Y") |
| 435 | (?,b=(B "oe") | 435 | (?漆 "oe") |
| 436 | (?,b<(B "OE"))))) | 436 | (?湿 "OE"))))) |
| 437 | 437 | ||
| 438 | ((eq set 'greek) | 438 | ((eq set 'greek) |
| 439 | (when (or force | 439 | (when (or force |
| @@ -441,82 +441,82 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 441 | (mapc | 441 | (mapc |
| 442 | (lambda (l) | 442 | (lambda (l) |
| 443 | (apply 'latin1-display-char l)) | 443 | (apply 'latin1-display-char l)) |
| 444 | '((?,F!(B "9'") | 444 | '((?。 "9'") |
| 445 | (?,F"(B "'9") | 445 | (?「 "'9") |
| 446 | (?,F/(B "-M") | 446 | (?ッ "-M") |
| 447 | (?,F5(B "'%") | 447 | (?オ "'%") |
| 448 | (?,F6(B "'A") | 448 | (?カ "'A") |
| 449 | (?,F8(B "'E") | 449 | (?ク "'E") |
| 450 | (?,F9(B "'H") | 450 | (?ケ "'H") |
| 451 | (?,F:(B "'I") | 451 | (?コ "'I") |
| 452 | (?,F<(B "'O") | 452 | (?シ "'O") |
| 453 | (?,F>(B "'Y") | 453 | (?セ "'Y") |
| 454 | (?,F?(B "W%") | 454 | (?ソ "W%") |
| 455 | (?,F@(B "i3") | 455 | (?タ "i3") |
| 456 | (?,FC(B "G*") | 456 | (?テ "G*") |
| 457 | (?,FD(B "D*") | 457 | (?ト "D*") |
| 458 | (?,FH(B "TH") | 458 | (?ネ "TH") |
| 459 | (?,FK(B "L*") | 459 | (?ヒ "L*") |
| 460 | (?,FN(B "C*") | 460 | (?ホ "C*") |
| 461 | (?,FP(B "P*") | 461 | (?ミ "P*") |
| 462 | (?,FS(B "S*") | 462 | (?モ "S*") |
| 463 | (?,FV(B "F*") | 463 | (?ヨ "F*") |
| 464 | (?,FX(B "Q*") | 464 | (?リ "Q*") |
| 465 | (?,FY(B "W*") | 465 | (?ル "W*") |
| 466 | (?,FZ(B "\"I") | 466 | (?レ "\"I") |
| 467 | (?,F[(B "\"Y") | 467 | (?ロ "\"Y") |
| 468 | (?,F\(B "a%") | 468 | (?ワ "a%") |
| 469 | (?,F](B "e%") | 469 | (?ン "e%") |
| 470 | (?,F^(B "y%") | 470 | (?゙ "y%") |
| 471 | (?,F_(B "i%") | 471 | (?゚ "i%") |
| 472 | (?,F`(B "u3") | 472 | (? "u3") |
| 473 | (?,Fa(B "a*") | 473 | (? "a*") |
| 474 | (?,Fb(B "b*") | 474 | (? "b*") |
| 475 | (?,Fc(B "g*") | 475 | (? "g*") |
| 476 | (?,Fd(B "d*") | 476 | (? "d*") |
| 477 | (?,Fe(B "e*") | 477 | (? "e*") |
| 478 | (?,Ff(B "z*") | 478 | (? "z*") |
| 479 | (?,Fg(B "y*") | 479 | (? "y*") |
| 480 | (?,Fh(B "h*") | 480 | (? "h*") |
| 481 | (?,Fi(B "i*") | 481 | (? "i*") |
| 482 | (?,Fj(B "k") | 482 | (? "k") |
| 483 | (?,Fk(B "l*") | 483 | (? "l*") |
| 484 | (?,Fl(B "m*") | 484 | (? "m*") |
| 485 | (?,Fm(B "n*") | 485 | (? "n*") |
| 486 | (?,Fn(B "c*") | 486 | (? "c*") |
| 487 | (?,Fp(B "p*") | 487 | (? "p*") |
| 488 | (?,Fq(B "r*") | 488 | (? "r*") |
| 489 | (?,Fr(B "*s") | 489 | (? "*s") |
| 490 | (?,Fs(B "s*") | 490 | (? "s*") |
| 491 | (?,Ft(B "t*") | 491 | (? "t*") |
| 492 | (?,Fu(B "u") | 492 | (? "u") |
| 493 | (?,Fv(B "f*") | 493 | (? "f*") |
| 494 | (?,Fw(B "x*") | 494 | (? "x*") |
| 495 | (?,Fx(B "q*") | 495 | (? "q*") |
| 496 | (?,Fy(B "w*") | 496 | (? "w*") |
| 497 | (?,Fz(B "\"i") | 497 | (? "\"i") |
| 498 | (?,F{(B "\"u") | 498 | (? "\"u") |
| 499 | (?,F|(B "'o") | 499 | (? "'o") |
| 500 | (?,F}(B "'u") | 500 | (? "'u") |
| 501 | (?,F~(B "'w"))) | 501 | (? "'w"))) |
| 502 | (mapc | 502 | (mapc |
| 503 | (lambda (l) | 503 | (lambda (l) |
| 504 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) | 504 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) |
| 505 | '((?,FA(B "A") | 505 | '((?チ "A") |
| 506 | (?,FB(B "B") | 506 | (?ツ "B") |
| 507 | (?,FE(B "E") | 507 | (?ナ "E") |
| 508 | (?,FF(B "Z") | 508 | (?ニ "Z") |
| 509 | (?,FG(B "H") | 509 | (?ヌ "H") |
| 510 | (?,FI(B "I") | 510 | (?ノ "I") |
| 511 | (?,FJ(B "J") | 511 | (?ハ "J") |
| 512 | (?,FL(B "M") | 512 | (?フ "M") |
| 513 | (?,FM(B "N") | 513 | (?ヘ "N") |
| 514 | (?,FO(B "O") | 514 | (?マ "O") |
| 515 | (?,FQ(B "P") | 515 | (?ム "P") |
| 516 | (?,FT(B "T") | 516 | (?ヤ "T") |
| 517 | (?,FU(B "Y") | 517 | (?ユ "Y") |
| 518 | (?,FW(B "X") | 518 | (?ラ "X") |
| 519 | (?,Fo(B "o"))))) | 519 | (? "o"))))) |
| 520 | 520 | ||
| 521 | ((eq set 'hebrew) | 521 | ((eq set 'hebrew) |
| 522 | (when (or force | 522 | (when (or force |
| @@ -533,34 +533,34 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 533 | (mapc | 533 | (mapc |
| 534 | (lambda (l) | 534 | (lambda (l) |
| 535 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) | 535 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) |
| 536 | '((?,H_(B "=2") | 536 | '((?衣 "=2") |
| 537 | (?,H`(B "A+") | 537 | (?謂 "A+") |
| 538 | (?,Ha(B "B+") | 538 | (?違 "B+") |
| 539 | (?,Hb(B "G+") | 539 | (?遺 "G+") |
| 540 | (?,Hc(B "D+") | 540 | (?医 "D+") |
| 541 | (?,Hd(B "H+") | 541 | (?井 "H+") |
| 542 | (?,He(B "W+") | 542 | (?亥 "W+") |
| 543 | (?,Hf(B "Z+") | 543 | (?域 "Z+") |
| 544 | (?,Hg(B "X+") | 544 | (?育 "X+") |
| 545 | (?,Hh(B "Tj") | 545 | (?郁 "Tj") |
| 546 | (?,Hi(B "J+") | 546 | (?磯 "J+") |
| 547 | (?,Hj(B "K%") | 547 | (?一 "K%") |
| 548 | (?,Hk(B "K+") | 548 | (?壱 "K+") |
| 549 | (?,Hl(B "L+") | 549 | (?溢 "L+") |
| 550 | (?,Hm(B "M%") | 550 | (?逸 "M%") |
| 551 | (?,Hn(B "M+") | 551 | (?稲 "M+") |
| 552 | (?,Ho(B "N%") | 552 | (?茨 "N%") |
| 553 | (?,Hp(B "N+") | 553 | (?芋 "N+") |
| 554 | (?,Hq(B "S+") | 554 | (?鰯 "S+") |
| 555 | (?,Hr(B "E+") | 555 | (?允 "E+") |
| 556 | (?,Hs(B "P%") | 556 | (?印 "P%") |
| 557 | (?,Ht(B "P+") | 557 | (?咽 "P+") |
| 558 | (?,Hu(B "Zj") | 558 | (?員 "Zj") |
| 559 | (?,Hv(B "ZJ") | 559 | (?因 "ZJ") |
| 560 | (?,Hw(B "Q+") | 560 | (?姻 "Q+") |
| 561 | (?,Hx(B "R+") | 561 | (?引 "R+") |
| 562 | (?,Hy(B "Sh") | 562 | (?飲 "Sh") |
| 563 | (?,Hz(B "T+"))))) | 563 | (?淫 "T+"))))) |
| 564 | 564 | ||
| 565 | ((eq set 'cyrillic) | 565 | ((eq set 'cyrillic) |
| 566 | (setq set 'cyrillic-iso) | 566 | (setq set 'cyrillic-iso) |
| @@ -569,104 +569,104 @@ is. If FORCE is non-nil, set up the display regardless." | |||
| 569 | (mapc | 569 | (mapc |
| 570 | (lambda (l) | 570 | (lambda (l) |
| 571 | (apply 'latin1-display-char l)) | 571 | (apply 'latin1-display-char l)) |
| 572 | '((?,L"(B "Dj") | 572 | '((?犬 "Dj") |
| 573 | (?,L#(B "Gj") | 573 | (?献 "Gj") |
| 574 | (?,L$(B "IE") | 574 | (?研 "IE") |
| 575 | (?,L)(B "Lj") | 575 | (?見 "Lj") |
| 576 | (?,L*(B "Nj") | 576 | (?謙 "Nj") |
| 577 | (?,L+(B "Ts") | 577 | (?賢 "Ts") |
| 578 | (?,L,(B "Kj") | 578 | (?軒 "Kj") |
| 579 | (?,L.(B "V%") | 579 | (?鍵 "V%") |
| 580 | (?,L/(B "Dzh") | 580 | (?険 "Dzh") |
| 581 | (?,L1(B "B=") | 581 | (?験 "B=") |
| 582 | (?,L3(B "") | 582 | (?元 "") |
| 583 | (?,L4(B "D") | 583 | (?原 "D") |
| 584 | (?,L6(B "Z%") | 584 | (?幻 "Z%") |
| 585 | (?,L7(B "3") | 585 | (?弦 "3") |
| 586 | (?,L8(B "U") | 586 | (?減 "U") |
| 587 | (?,L9(B "J=") | 587 | (?源 "J=") |
| 588 | (?,L;(B "L=") | 588 | (?現 "L=") |
| 589 | (?,L?(B "P=") | 589 | (?諺 "P=") |
| 590 | (?,LC(B "Y") | 590 | (?古 "Y") |
| 591 | (?,LD(B "") | 591 | (?呼 "") |
| 592 | (?,LF(B "C=") | 592 | (?姑 "C=") |
| 593 | (?,LG(B "C%") | 593 | (?孤 "C%") |
| 594 | (?,LH(B "S%") | 594 | (?己 "S%") |
| 595 | (?,LI(B "Sc") | 595 | (?庫 "Sc") |
| 596 | (?,LJ(B "=\"") | 596 | (?弧 "=\"") |
| 597 | (?,LK(B "Y=") | 597 | (?戸 "Y=") |
| 598 | (?,LL(B "%\"") | 598 | (?故 "%\"") |
| 599 | (?,LM(B "Ee") | 599 | (?枯 "Ee") |
| 600 | (?,LN(B "Yu") | 600 | (?湖 "Yu") |
| 601 | (?,LO(B "Ya") | 601 | (?狐 "Ya") |
| 602 | (?,LQ(B "b") | 602 | (?袴 "b") |
| 603 | (?,LR(B "v=") | 603 | (?股 "v=") |
| 604 | (?,LS(B "g=") | 604 | (?胡 "g=") |
| 605 | (?,LT(B "g") | 605 | (?菰 "g") |
| 606 | (?,LV(B "z%") | 606 | (?誇 "z%") |
| 607 | (?,LW(B "z=") | 607 | (?跨 "z=") |
| 608 | (?,LX(B "u") | 608 | (?鈷 "u") |
| 609 | (?,LY(B "j=") | 609 | (?雇 "j=") |
| 610 | (?,LZ(B "k") | 610 | (?顧 "k") |
| 611 | (?,L[(B "l=") | 611 | (?鼓 "l=") |
| 612 | (?,L\(B "m=") | 612 | (?五 "m=") |
| 613 | (?,L](B "n=") | 613 | (?互 "n=") |
| 614 | (?,L_(B "n") | 614 | (?午 "n") |
| 615 | (?,L`(B "p") | 615 | (?呉 "p") |
| 616 | (?,Lb(B "t=") | 616 | (?娯 "t=") |
| 617 | (?,Ld(B "f=") | 617 | (?御 "f=") |
| 618 | (?,Lf(B "c=") | 618 | (?梧 "c=") |
| 619 | (?,Lg(B "c%") | 619 | (?檎 "c%") |
| 620 | (?,Lh(B "s%") | 620 | (?瑚 "s%") |
| 621 | (?,Li(B "sc") | 621 | (?碁 "sc") |
| 622 | (?,Lj(B "='") | 622 | (?語 "='") |
| 623 | (?,Lk(B "y=") | 623 | (?誤 "y=") |
| 624 | (?,Ll(B "%'") | 624 | (?護 "%'") |
| 625 | (?,Lm(B "ee") | 625 | (?醐 "ee") |
| 626 | (?,Ln(B "yu") | 626 | (?乞 "yu") |
| 627 | (?,Lo(B "ya") | 627 | (?鯉 "ya") |
| 628 | (?,Lp(B "N0") | 628 | (?交 "N0") |
| 629 | (?,Lr(B "dj") | 629 | (?侯 "dj") |
| 630 | (?,Ls(B "gj") | 630 | (?候 "gj") |
| 631 | (?,Lt(B "ie") | 631 | (?倖 "ie") |
| 632 | (?,Ly(B "lj") | 632 | (?勾 "lj") |
| 633 | (?,Lz(B "nj") | 633 | (?厚 "nj") |
| 634 | (?,L{(B "ts") | 634 | (?口 "ts") |
| 635 | (?,L|(B "kj") | 635 | (?向 "kj") |
| 636 | (?,L~(B "v%") | 636 | (? "v%") |
| 637 | (?,L(B "dzh"))) | 637 | (? "dzh"))) |
| 638 | (mapc | 638 | (mapc |
| 639 | (lambda (l) | 639 | (lambda (l) |
| 640 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) | 640 | (aset standard-display-table (car l) (string-to-vector (cadr l)))) |
| 641 | '((?,L!(B ",AK(B") | 641 | '((?牽 "⇒") |
| 642 | (?,L%(B "S") | 642 | (?硯 "S") |
| 643 | (?,L&(B "I") | 643 | (?絹 "I") |
| 644 | (?,L'(B ",AO(B") | 644 | (?県 "マ") |
| 645 | (?,L((B "J") | 645 | (?肩 "J") |
| 646 | (?,Lq(B ",Ak(B") | 646 | (?佼 "") |
| 647 | (?,L}(B ",A'(B") | 647 | (? "〒") |
| 648 | (?,L-(B "-") | 648 | (?遣 "-") |
| 649 | (?,L0(B "A") | 649 | (?顕 "A") |
| 650 | (?,L2(B "B") | 650 | (?鹸 "B") |
| 651 | (?,L5(B "E") | 651 | (?厳 "E") |
| 652 | (?,L:(B "K") | 652 | (?玄 "K") |
| 653 | (?,L<(B "M") | 653 | (?絃 "M") |
| 654 | (?,L=(B "H") | 654 | (?舷 "H") |
| 655 | (?,L>(B "O") | 655 | (?言 "O") |
| 656 | (?,L@(B "P") | 656 | (?限 "P") |
| 657 | (?,LA(B "C") | 657 | (?乎 "C") |
| 658 | (?,LB(B "T") | 658 | (?個 "T") |
| 659 | (?,LE(B "X") | 659 | (?固 "X") |
| 660 | (?,LP(B "a") | 660 | (?糊 "a") |
| 661 | (?,LU(B "e") | 661 | (?虎 "e") |
| 662 | (?,L^(B "o") | 662 | (?伍 "o") |
| 663 | (?,La(B "c") | 663 | (?吾 "c") |
| 664 | (?,Lc(B "y") | 664 | (?後 "y") |
| 665 | (?,Le(B "x") | 665 | (?悟 "x") |
| 666 | (?,Lu(B "s") | 666 | (?光 "s") |
| 667 | (?,Lv(B "i") | 667 | (?公 "i") |
| 668 | (?,Lw(B ",Ao(B") | 668 | (?功 "") |
| 669 | (?,Lx(B "j"))))) | 669 | (?効 "j"))))) |
| 670 | 670 | ||
| 671 | (t (error "Unsupported character set: %S" set))) | 671 | (t (error "Unsupported character set: %S" set))) |
| 672 | 672 | ||