view lisp/gnus/post.xpm @ 89732:8acde12aba89

(get_translation_table): New function. (translate_chars): Fix the bug of skipping annotation data. (decode_coding): Utilze get_translation_table. (encode_coding): Likewise. (char_encodable_p): Translate char if necessary. (Funencodable_char_position): Likewise. (Ffind_coding_systems_region_internal): Setup translation table for encode in a coding system attribute vector in advance. (Fcheck_coding_systems_region): Likewise. (Fdefine_coding_system_internal): Allow a symbol as translation table. For shift-jis type coding system, allow 4th charset.

/* XPM */
static char *magick[] = {
/* columns rows colors chars-per-pixel */
"24 24 23 1",
"  c Gray0",
". c Gray6",
"X c Gray12",
"o c #2ff22ff22ff2",
"O c #3fff3fff3fff",
"+ c Gray28",
"@ c #53ee53ee53ee",
"# c #5fdf5fdf5fdf",
"$ c #67e767e767e7",
"% c #6fff6fff6fff",
"& c #77f777f777f7",
"* c #7bdb7bdb7bdb",
"= c Gray50",
"- c Gray56",
"; c #9bd69bd69bd6",
": c #9fff9fff9fff",
"> c #a7c7a7c7a7c7",
", c Gray70",
"< c Gray75",
"1 c Gray81",
"2 c #dfffdfffdfff",
"3 c #efffefffefff",
"4 c Gray100",
/* pixels */
",><,><,><,><,><,><,><,><",
">-<>-<>-<>-<>-<>-<>-<>-<",
"<<<<<<<<<<<<<<<<<<<<<<<<",
",><,><,><,>;*O.,><,><,><",
">-<>-<>-<-o&:4O#-<>-<>-<",
"<<<<<<<<@@<31O:o<<<<<<<<",
",><,>;*O1444 X1@><,><,><",
">-<-o&:4444:=<4<#<>-<>-<",
"<<<,+<4444414443&;<<<<<<",
",><,#;4444444444:*,><,><",
">-<>-o44444444444O>-<>-<",
"<<<<<;%44444444441@<<<<<",
",><,><@24444444444@><,><",
">-<>-<-=4444444444<#<>-<",
"<<<<<<,$14444444443&;<<<",
",><,><,#;4444444444:*,><",
">-<>-<>-o4444444444<X>-<",
"<<<<<<<<;%4444444%O$-<<<",
",><,><,><@24444<&;,><,><",
">-<>-<>-<-=42==#-<>-<>-<",
"<<<<<<<<<,$Oo+-<<<<<<<<<",
",><,><,><,><,><,><,><,><",
">-<>-<>-<>-<>-<>-<>-<>-<",
"<<<<<<<<<<<<<<<<<<<<<<<<"
};