6:35 p.m.
changeset: 5530:17bcc2aab111
tag: tip
user: Aidan Kehoe <kehoea(a)parhasard.net>
date: Tue Jun 28 18:34:26 2011 +0100
files: etc/ChangeLog etc/HELLO tests/ChangeLog tests/automated/mule-tests.el
description:
Update the GPLv3 HELLO to use the ISO-IR-196 escape sequences.
etc/ChangeLog addition:
2011-06-28 Aidan Kehoe <kehoea(a)parhasard.net>
* HELLO:
No longer encode various Unicode characters in GNU's specific
ad-hoc character sets, use ISO-IR-196 sequences instead.
tests/ChangeLog addition:
2011-06-28 Aidan Kehoe <kehoea(a)parhasard.net>
* automated/mule-tests.el:
Update the charsets-in-region test to reflect the GPLv3 HELLO
file.
diff -r 3d1f8f0e690f -r 17bcc2aab111 etc/ChangeLog
--- a/etc/ChangeLog Sat Jun 25 14:00:48 2011 +0100
+++ b/etc/ChangeLog Tue Jun 28 18:34:26 2011 +0100
＠＠ -1,3 +1,9 ＠＠
+2011-06-28 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * HELLO:
+ No longer encode various Unicode characters in GNU's specific
+ ad-hoc character sets, use ISO-IR-196 sequences instead.
+
2011-05-20 Jerry James <james(a)xemacs.org>
* tests/external-widget/Makefile (DESTDIR): New variable for all
diff -r 3d1f8f0e690f -r 17bcc2aab111 etc/HELLO
--- a/etc/HELLO Sat Jun 25 14:00:48 2011 +0100
+++ b/etc/HELLO Tue Jun 28 18:34:26 2011 +0100
＠＠ -2,64 +2,64 ＠＠
Non-ASCII examples:
Europe: ,A!(BHola!, Gr,A|_(B Gott, Hyv,Add(B p,Ad(Biv,Add(B, Tere
,Au(Bhtust, Bon,Cu(Bu
- Cze,B6f(B!, Dobr,B}(B den, ,L7T`PRabRcYbU(B!, ,FCei\(B ,Fsar(B,
$,1J2J0J;J0J＠JOJ=J1J0(B
+ Cze,B6f(B!, Dobr,B}(B den, ,L7T`PRabRcYbU(B!, ,FCei\(B ,Fsar(B,
%Gგამარჯობა%＠
Africa: $(3!A!,!>(B
- Middle/Near East: ,Hylem(B, $,1-g.$-s.1.$-g.%(B $,1-y.$.*.#.%(B
- South Asia: $,19h9n9x:-9d:'(B, $,15h5n5x6-5d6'(B,
$,1?(?.?8?M>u?>?0(B, $,1＠H＠N＠X＠m＠5＠^＠P＠"(B, $,1;6;A;#;?;,;G(B,
- $,1AFAzB4AvB=B AqB*(B, $,1<U<C<5<m<5<N<m(B,
$,1=h=n=x>-=U=~=p=B(B,
$(7"7"!#C!;"E"S"G!;"7"2"[!;"D"["#"G!>(B
- South East Asia: $,1\'\f\:\V\4\?\]\:(B, (1JP:R-4U(B,
$,1H9H$HZHYH"H<HLH5HK(B, ,TJGQJ4U$CQ:(B, Ch,1`(Bo b,1U(Bn
+ Middle/Near East: [2],Hylem[0](B, [2],GGdSqdGe[0](B [2],GYdjce[0](B
+ South Asia: %Gનમસ્તે%＠, (5FLWhBa(B, %Gನಮಸ್ಕಾರ%＠, %Gനമസ്കാരം%＠, %Gଶୁଣିବେ%＠,
+ %Gආයුබෝවන්%＠, %Gவணக்கம்%＠, %Gనమస్కారం%＠,
%Gབཀ%＠$(7#C!;%Gཤ%＠"S%Gས%＠!;%Gབད%＠"[!;%Gལ%＠"[%Gགས%＠!>(B
+ South East Asia: %Gជំរាបសួរ%＠, (1JP:R-4U(B, %Gမင်္ဂလာပါ%＠, %Gสวัสดีครับ%＠,
Ch,A`(Bo b,1U(Bn
East Asia: $ADc:C(B, $(0*/=((B, $B$3$s$K$A$O(B, $(C>H3gGO<<?d(B
- Misc: E,C6(Bo,C~(Ban,Cx(Bo ,Cf(Biu,C<(Ba,C}(Bde,
$,2(3(1('('(5(B, $,1x (B p $,1x((B world $,1s"(B hello p $,2!a(B
+ Misc: E$(D+>(Bo$(D+](Ban$(D+:(Bo $(D+,(Biu$(D+H(Ba$(D+f(Bde,
%G⠓⠑⠇⠇⠕%＠, $B"O(B p $B":(B world %G•%＠ hello p %G□%＠
CJK variety: GB($AT*Fx(B,$A?*7"(B), BIG5($(0&x86(B,$(0DeBv(B),
JIS($B855$(B,$B3+H/(B), KSC($(Cj*Q((B,$(CKR[!(B)
- Unicode charset: E$,1 E(Bo$,1 }(Ban$,1 =(Bo $,1 )(Biu$,1 U(Ba$,1!-(Bde,
$,1&s'5'9',(B $,1'C'1'B(B, $,1-),|,u,}(B,
$,1(7(T(`(P(R(a(b(R(c(Y(b(U(B!
+ Unicode charset: E$(D+>(Bo$(D+](Ban$(D+:(Bo $(D+,(Biu$(D+H(Ba$(D+f(Bde,
,FCei\(B ,Fsar(B, [2],Hylem[0](B, ,L7T`PRabRcYbU(B!
LANGUAGE (NATIVE NAME) HELLO
---------------------- -----
-Amharic ($,1O M[MmN{(B) $,1M`MKM](B
-Arabic $,1ro(B($,1-g.$-y-q-h.*.1-i(B) $,1-g.$-s.1.$-g.%(B $,1-y.$.*.#.%(B
-Bengali ($,17,7>6b727>(B) $,17(7.787M6u7>70(B
-Braille $,2(3(1('('(5(B
-Burmese ($,1H9H\H4HZH9HL(B) $,1H9H$HZHYH"H<HLH5HK(B
+Amharic ($(3"c!<!N"^(B) $(3!A!,!>(B
+Arabic [2],H~[0](B([2],GGdYQHjqI[0](B) [2],GGdSqdGe[0](B [2],GYdjce[0](B
+Bengali (%Gবাংলা%＠) %Gনমস্কার%＠
+Braille %G⠓⠑⠇⠇⠕%＠
+Burmese (%Gမြန်မာ%＠) %Gမင်္ဂလာပါ%＠
C printf ("Hello, world!\n");
Czech (,Bh(Be,B9(Btina) Dobr,A}(B den
Danish (dansk) Hej / Goddag / Hall,Ax(Bj
Dutch (Nederlands) Hallo / Dag
Emacs emacs --no-splash -f view-hello-file
-English /$(O+S,0!,D?$(O*y(Bl,0!$(O*h(B/ Hello
+English /,0p!,D?%Gɡ%＠(Bl,0!L(B/ Hello
Esperanto Saluton (E,C6(Bo,C~(Ban,Cx(Bo ,Cf(Biu,C<(Ba,C}(Bde)
Estonian (eesti keel) Tere p,Ad(Bevast / Tere ,Au(Bhtust
Finnish (suomi) Hei / Hyv,Add(B p,Ad(Biv,Add(B
French (fran,Ag(Bais) Bonjour / Salut
-Georgian ($,1JEJ0J＠J7J5J4J:J8(B) $,1J2J0J;J0J＠JOJ=J1J0(B
+Georgian (%Gქართველი%＠) %Gგამარჯობა%＠
German (Deutsch) Guten Tag / Gr,A|_(B Gott
Greek (,Fekkgmij\(B) ,FCei\(B ,Fsar(B
-Gujarati ($,19W:!9\9p9~9d: (B) $,19h9n9x:-9d:'(B
-Hebrew $,1ro(B($,1-",q-(,y-*(B) ,Hylem(B
+Gujarati (%Gગુજરાતી%＠) %Gનમસ્તે%＠
+Hebrew [2],H~[0](B([2],Hraxiz[0](B) [2],Hylem[0](B
Hungarian (magyar) Sz,Bi(Bp j,Bs(B napot!
-Hindi ($,15y55B5f6 (B) $,15h5n5x6-5d6'(B / $,15h5n5x6-5U5~5p(B $,16D(B
+Hindi ((5X["D\(B) (5FLWhBa(B / (5FLWh3ZO(B (5j(B
Italian (italiano) Ciao / Buon giorno
Javanese (Jawa) System.out.println("Sugeng siang!");
-Kannada ($,1>u?(?M?(?!(B) $,1?(?.?8?M>u?>?0(B
-Khmer ($,1\7\V\?\V\!\r\8\b\:(B) $,1\'\f\:\V\4\?\]\:(B
+Kannada (%Gಕನ್ನಡ%＠) %Gನಮಸ್ಕಾರ%＠
+Khmer (%Gភាសាខ្មែរ%＠) %Gជំរាបសួរ%＠
Lao ((1>RJRERG(B) (1JP:R-4U(B / (1"mcKib*!4U(B
-Malayalam ($,1＠N＠R＠O＠^＠S＠"(B) $,1＠H＠N＠X＠m＠5＠^＠P＠"(B
+Malayalam (%Gമലയാളം%＠) %Gനമസ്കാരം%＠
Maltese (il-Malti) Bon,Cu(Bu / Sa,C11(Ba
-Mathematics $,1x (B p $,1x((B world $,1s"(B hello p $,2!a(B
+Mathematics $B"O(B p $B":(B world %G•%＠ hello p %G□%＠
Nederlands, Vlaams Hallo / Dag
Norwegian (norsk) Hei / God dag
-Oriya ($,1:s;\;?:f(B) $,1;6;A;#;?;,;G(B
+Oriya (%Gଓଡ଼ିଆ%＠) %Gଶୁଣିବେ%＠
Polish (j,Bj(Bzyk polski) Dzie,Bq(B dobry! / Cze,B6f(B!
-Russian (,L`caaZXY(B) ,L7T`P$(O+Z,LRabRcYbU(B!
-Sinhala ($,1B#B2ABB$A}(B) $,1AFAzB4AvB=B AqB*(B
+Russian (,L`caaZXY(B) ,L7T`P%Ǵ%＠RabRcYbU(B!
+Sinhala (%Gසිංහල%＠) %Gආයුබෝවන්%＠
Slovak (sloven,Bh(Bina) Dobr,A}(B de,Br(B
Slovenian (sloven,B9h(Bina) Pozdravljeni!
Spanish (espa,Aq(Bol) ,A!(BHola!
Swedish (p,Ae(B svenska) Hej / Goddag / Hall,Ae(B
-Tamil ($,1<D<N<_<T<m(B) $,1<U<C<5<m<5<N<m(B
-Telugu ($,1=d>&=r>!=W>!(B) $,1=h=n=x>-=U=~=p=B(B
+Tamil (%Gதமிழ்%＠) %Gவணக்கம்%＠
+Telugu (%Gతెలుగు%＠) %Gనమస్కారం%＠
Thai (,T＠RIRd7B(B) ,TJGQJ4U$CQ:(B / ,TJGQJ4U$hP(B
-Tibetan
($(7"7"]"2!;"G#!"2!;(B) $(7"7"!#C!;"E"S"G!;"7"2"[!;"D"["#"G!>(B
-Tigrigna ($,1NUP-MmN{(B) $,1MpMKM[NU(B
+Tibetan
(%Gབ%＠$(7"]%Gད%＠!;%Gས%＠#!%Gད%＠!;(B) %Gབཀ%＠$(7#C!;%Gཤ%＠"S%Gས%＠!;%Gབད%＠"[!;%Gལ%＠"[%Gགས%＠!>(B
+Tigrigna ($(3"8#r!N"^(B) $(3!Q!,!<"8(B
Turkish (T,A|(Brk,Ag(Be) Merhaba
Ukrainian (,LcZ`Pw]alZP(B) ,L2vbPn(B
Vietnamese (ti,1*(Bng Vi,1.(Bt) Ch,A`(Bo b,1U(Bn
diff -r 3d1f8f0e690f -r 17bcc2aab111 tests/ChangeLog
--- a/tests/ChangeLog Sat Jun 25 14:00:48 2011 +0100
+++ b/tests/ChangeLog Tue Jun 28 18:34:26 2011 +0100
＠＠ -1,3 +1,9 ＠＠
+2011-06-28 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * automated/mule-tests.el:
+ Update the charsets-in-region test to reflect the GPLv3 HELLO
+ file.
+
2011-05-20 Jerry James <james(a)xemacs.org>
* tooltalk/Makefile (DESTDIR): New variable for all Makefiles, unused
diff -r 3d1f8f0e690f -r 17bcc2aab111 tests/automated/mule-tests.el
--- a/tests/automated/mule-tests.el Sat Jun 25 14:00:48 2011 +0100
+++ b/tests/automated/mule-tests.el Tue Jun 28 18:34:26 2011 +0100
＠＠ -572,22 +572,28 ＠＠
;; Test charset-in-* functions
;;---------------------------------------------------------------
(with-temp-buffer
- (insert-file-contents (locate-data-file "HELLO"))
(let ((sorted-charsets-in-HELLO
- '(arabic-iso8859-6 ascii chinese-big5-1 chinese-gb2312
- cyrillic-iso8859-5 ethiopic greek-iso8859-7
- hebrew-iso8859-8 japanese-jisx0208 japanese-jisx0212
- katakana-jisx0201 korean-ksc5601 latin-iso8859-1
- latin-iso8859-2 vietnamese-viscii-lower)))
+ '(arabic-iso8859-6 ascii chinese-big5-1 chinese-gb2312
+ cyrillic-iso8859-5 ethiopic greek-iso8859-7 hebrew-iso8859-8
+ indian-is13194 ipa japanese-jisx0208 japanese-jisx0212
+ katakana-jisx0201 korean-ksc5601 lao latin-iso8859-1
+ latin-iso8859-2 latin-iso8859-3 latin-iso8859-4 thai-tis620
+ tibetan vietnamese-viscii-lower))
+ (coding-system-for-read 'iso-2022-7))
+ (insert-file-contents (locate-data-file "HELLO"))
(Assert (equal
;; The sort is to make the algorithm of charsets-in-region
;; irrelevant.
- (sort (charsets-in-region (point-min) (point-max))
+ (sort (remove* "^jit-ucs-charset-" (charsets-in-region (point-min)
+ (point-max))
+:test 'string-match :key 'symbol-name)
#'string<)
sorted-charsets-in-HELLO))
(Assert (equal
- (sort (charsets-in-string (buffer-substring (point-min)
- (point-max)))
+ (sort (remove* "^jit-ucs-charset-" (charsets-in-string
+ (buffer-substring (point-min)
+ (point-max)))
+:test 'string-match :key 'symbol-name)
#'string<)
sorted-charsets-in-HELLO))))
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches