/[pub]/test/oldencodeutils/lib/Encode/ISO2022/EightBit.pm
Suika

Diff of /test/oldencodeutils/lib/Encode/ISO2022/EightBit.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by wakaba, Mon Sep 16 02:17:48 2002 UTC revision 1.2 by wakaba, Fri Sep 20 14:01:45 2002 UTC
# Line 275  __PACKAGE__->Define (qw/compound-text ct Line 275  __PACKAGE__->Define (qw/compound-text ct
275  ISO/IEC 2022 based 8-bit encoding used in inter-client  ISO/IEC 2022 based 8-bit encoding used in inter-client
276  communication of X Window System (Alias: ctext (emacsen), x-ctext (emacsen))  communication of X Window System (Alias: ctext (emacsen), x-ctext (emacsen))
277    
278    Strictly, x-ctext, extended compound text (X Compound Text
279    based encoding for unknown ISO/IEC 2022 based encoding) is a
280    different coding system from X Compound Text.  See
281    [mule-jp:7455] <mid:rsqsoa5s2hr.fsf@crane.jaist.ac.jp> and
282    [mule-jp:7457] <mid:rsq4smlky85.fsf@crane.jaist.ac.jp>.
283    
284  =cut  =cut
285    
286  sub __2022__common ($) {  sub __2022__common ($) {
# Line 303  sub __2022__common ($) { Line 309  sub __2022__common ($) {
309    $C->{option}->{reset}->{Ginvoke} = 0;    $C->{option}->{reset}->{Ginvoke} = 0;
310    $C;    $C;
311  }  }
312    sub __2022_decode ($) {
313      my $C = shift->__2022__common;
314      ## Emacsen's x-ctext
315      $C->{G1} = $Encode::ISO2022::CHARSET{G96}->{A};       ## ISO/IEC 8859-1
316      $C;
317    }
318    
319    
320  1;  1;
# Line 312  __END__ Line 324  __END__
324    
325  =head1 LICENSE  =head1 LICENSE
326    
327  Copyright 2002 wakaba <w@suika.fam.cx>  Copyright 2002 Wakaba <w@suika.fam.cx>
328    
329  This library is free software; you can redistribute it  This library is free software; you can redistribute it
330  and/or modify it under the same terms as Perl itself.  and/or modify it under the same terms as Perl itself.

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24