]> code.delx.au - gnu-emacs/commitdiff
Merge from emacs--devo--0
authorMiles Bader <miles@gnu.org>
Sat, 29 Dec 2007 02:39:17 +0000 (02:39 +0000)
committerMiles Bader <miles@gnu.org>
Sat, 29 Dec 2007 02:39:17 +0000 (02:39 +0000)
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-306

18 files changed:
1  2 
leim/quail/latin-alt.el
lisp/ChangeLog
lisp/cus-start.el
lisp/faces.el
lisp/font-lock.el
lisp/gnus/mml.el
lisp/info.el
lisp/international/mule-cmds.el
lisp/progmodes/sh-script.el
lisp/simple.el
lisp/startup.el
lisp/term/x-win.el
lisp/textmodes/fill.el
lisp/textmodes/ispell.el
src/fileio.c
src/process.c
src/w32fns.c
src/xdisp.c

index 70034f44a6394aea682c9ece6fb6613483d2edb7,30b3598fcbaa3e2a721c36e9f681ddd708a974a7..b0da98d6449eeacc7c2dbdd32ff5f2b712db4af4
@@@ -39,19 -50,19 +50,19 @@@ special (so you can use that to enter 
  
               | postfix | examples
   ------------+---------+----------
 -  acute      |    '    | a' -> \e,Aa\e(B
 -  grave      |    `    | a` -> \e,A`\e(B
 -  circumflex |    ^    | a^ -> \e,Ab\e(B
 -  diaeresis  |    \"    | a\" -> \e,Ad\e(B
 -  tilde      |    ~    | a~ -> \e,Ac\e(B
 -  cedilla    |    /    | c/ -> \e,Ag\e(B
 -  nordic     |    /    | d/ -> \e,Ap\e(B   t/ -> \e,A~\e(B   a/ -> \e,Ae\e(B   e/ -> \e,Af\e(B   o/ -> \e,Ax\e(B
 -  others     |   /<>   | s/ -> \e,A_\e(B   ?/ -> \e,A?\e(B   !/ -> \e,A!\e(B
 -             | various | << -> \e,A+\e(B   >> -> \e,A;\e(B   o_ -> \e,A:\e(B   a_ -> \e,A*\e(B
 +  acute      |    '    | a' -> á
 +  grave      |    `    | a` -> à
 +  circumflex |    ^    | a^ -> â
 +  diaeresis  |    \"    | a\" -> ä
 +  tilde      |    ~    | a~ -> ã
 +  cedilla    |    /    | c/ -> ç
 +  nordic     |    /    | d/ -> ð   t/ -> þ   a/ -> å   e/ -> æ   o/ -> ø
 +  others     |   /<>   | s/ -> ß   ?/ -> ¿   !/ -> ¡
 +             | various | << -> «   >> -> »   o_ -> º   a_ -> ª
  
- It would be natural to use comma for cedillas, but that would be
- inconvenient in practice because commas are needed very often after a
- letter.
+ It seems natural to use comma for cedillas, but that is
+ inconvenient in practice because commas are needed very
often after a letter.
  
  Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  " nil t nil nil nil nil nil nil nil nil t)
@@@ -202,21 -215,21 +215,21 @@@ comma and period are not special (use 
  
               | postfix | examples
   ------------+---------+----------
 -  acute      |    '    | a' -> \e,Ba\e(B
 -  ogonek     |    `    | a` -> \e,B1\e(B
 -  diaeresis  |    \"    | a\" -> \e,Bd\e(B
 -  circumflex |    ^    | a^ -> \e,Bb\e(B
 -  breve      |    ~    | a~ -> \e,Bc\e(B
 -  cedilla    |    `    | c` -> \e,Bg\e(B
 -  caron      |    ~    | c~ -> \e,Bh\e(B
 -  dbl. acute |    :    | o: -> \e,Bu\e(B
 -  ring       |    `    | u` -> \e,By\e(B
 -  dot        |    `    | z` -> \e,B?\e(B
 -  stroke     |    /    | d/ -> \e,Bp\e(B
 -  others     |    /    | s/ -> \e,B_\e(B
 +  acute      |    '    | a' -> á
 +  ogonek     |    `    | a` -> ą
 +  diaeresis  |    \"    | a\" -> ä
 +  circumflex |    ^    | a^ -> â
 +  breve      |    ~    | a~ -> ă
 +  cedilla    |    `    | c` -> ç
 +  caron      |    ~    | c~ -> č
 +  dbl. acute |    :    | o: -> ő
 +  ring       |    `    | u` -> ů
 +  dot        |    `    | z` -> ż
 +  stroke     |    /    | d/ -> đ
 +  others     |    /    | s/ -> ß
  
- It would be natural to use period and comma for dots/rings and
- cedillas/ogoneks, but that would inconvenient in practice, because
+ It seems natural to use period and comma for dots/rings and
+ cedillas/ogoneks, but that is inconvenient in practice, because
  periods and commas are needed very often after a letter.
  
  Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
@@@ -564,21 -583,21 +583,21 @@@ special (use ~ instead)
  
               | postfix | examples
   ------------+---------+----------
 -  acute      |    '    | a' -> \e,Da\e(B
 -  circumflex |    ^    | a^ -> \e,Db\e(B
 -  diaeresis  |    \"    | a\" -> \e,Dd\e(B
 -  ogonek     |    `    | a` -> \e,D1\e(B
 -  macron     |    -    | a- -> \e,D`\e(B
 -  tilde      |    ~    | a~ -> \e,Dc\e(B
 -  caron      |    ~    | c~ -> \e,Dh\e(B
 -  dot        |    ~    | e~ -> \e,Dl\e(B
 -  cedilla    |    `    | k` -> \e,Ds\e(B   g` -> \e,D;\e(B
 -  stroke     |    /    | d/ -> \e,Dp\e(B
 -  nordic     |    /    | a/ -> \e,De\e(B   e/ -> \e,Df\e(B   o/ -> \e,Dx\e(B
 -  others     |    /    | s/ -> \e,D_\e(B   n/ -> \e,D?\e(B   k/ -> \e,D"\e(B
 +  acute      |    '    | a' -> á
 +  circumflex |    ^    | a^ -> â
 +  diaeresis  |    \"    | a\" -> ä
 +  ogonek     |    `    | a` -> ą
 +  macron     |    -    | a- -> ā
 +  tilde      |    ~    | a~ -> ã
 +  caron      |    ~    | c~ -> č
 +  dot        |    ~    | e~ -> ė
 +  cedilla    |    `    | k` -> ķ   g` -> ģ
 +  stroke     |    /    | d/ -> đ
 +  nordic     |    /    | a/ -> å   e/ -> æ   o/ -> ø
 +  others     |    /    | s/ -> ß   n/ -> ŋ   k/ -> ĸ
  
- It would be natural to use period and comma for dots and
- cedillas/ogoneks, but that would inconvenient in practice, because
+ It seems natural to use period and comma for dots and
+ cedillas/ogoneks, but that is inconvenient in practice, because
  periods and commas are needed very often after a letter.
  
  Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
@@@ -758,19 -780,19 +780,19 @@@ special (use / instead)
  
               | postfix | examples
   ------------+---------+----------
 -  acute      |    '    | a' -> \e,Ma\e(B
 -  grave      |    `    | a` -> \e,M`\e(B
 -  circumflex |    ^    | a^ -> \e,Mb\e(B
 -  diaeresis  |    \"    | a\" -> \e,Md\e(B
 -  tilde      |    ~    | a~ -> \e,Mc\e(B
 -  breve      |    ~    | g~ -> \e,Mp\e(B
 -  cedilla    |    `    | c` -> \e,Mg\e(B
 -  dot        |    /    | i/ -> \e,M}\e(B   I/ -> \e,M]\e(B
 -  nordic     |    /    | a/ -> \e,Me\e(B   e/ -> \e,Mf\e(B   o/ -> \e,Mx\e(B
 -  others     |    /    | s/ -> \e,M_\e(B
 +  acute      |    '    | a' -> á
 +  grave      |    `    | a` -> à
 +  circumflex |    ^    | a^ -> â
 +  diaeresis  |    \"    | a\" -> ä
 +  tilde      |    ~    | a~ -> ã
 +  breve      |    ~    | g~ -> ğ
 +  cedilla    |    `    | c` -> ç
 +  dot        |    /    | i/ -> ı   I/ -> İ
 +  nordic     |    /    | a/ -> å   e/ -> æ   o/ -> ø
 +  others     |    /    | s/ -> ß
  
- It would be natural to use period and comma for dots and cedillas, but
- that would inconvenient in practice, because periods and commas are
+ It seems natural to use period and comma for dots and cedillas, but
+ that is inconvenient in practice, because periods and commas are
  needed very often after a letter.
  
  Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
@@@ -1259,173 -1076,94 +1076,28 @@@ Doubling the postfix separates the lett
   ("a__" ["a_"])
   )
  
- (quail-define-package
-  "norwegian-alt-postfix" "Latin-1" "NO<" t
-  "Norwegian (Norsk) input method (rule: AE->Æ, OE->Ø, AA->Å, E'->É)
- Doubling the postfix separates the letter and postfix: e.g. aee -> ae
- "
-  nil t nil nil nil nil nil nil nil nil t)
- (quail-define-rules
-  ("AE" ?Æ)
-  ("ae" ?æ)
-  ("OE" ?Ø)
-  ("oe" ?ø)
-  ("AA" ?Å)
-  ("aa" ?å)
-  ("E'" ?É)
-  ("e'" ?é)
-  ("AEE" ["AE"])
-  ("aee" ["ae"])
-  ("OEE" ["OE"])
-  ("oee" ["oe"])
-  ("AAA" ["AA"])
-  ("aaa" ["aa"])
-  ("E''" ["E'"])
-  ("e''" ["e'"])
-  )
- (quail-define-package
-  "scandinavian-alt-postfix" "Latin-1" "SC<" t
-  "Scandinavian input method with postfix modifiers
- Supported languages are Swedish, Norwegian, Danish, and Finnish.
- ae -> æ
- oe -> ø
- aa -> å
- a\" -> ä
- o\" -> ö
- e' -> é
- Doubling the postfix separates the letter and postfix:
- aee -> ae   o\"\" -> o\"   etc.
- " nil t nil nil nil nil nil nil nil nil t)
- (quail-define-rules
-  ("AE" ?Æ)
-  ("ae" ?æ)
-  ("OE" ?Ø)
-  ("oe" ?ø)
-  ("AA" ?Å)
-  ("aa" ?å)
-  ("A\"" ?Ä)
-  ("a\"" ?ä)
-  ("O\"" ?Ö)
-  ("o\"" ?ö)
-  ("E'" ?É)
-  ("e'" ?é)
-  ("AEE" ["AE"])
-  ("aee" ["ae"])
-  ("OEE" ["OE"])
-  ("oee" ["oe"])
-  ("AAA" ["AA"])
-  ("aaa" ["aa"])
-  ("A\"\"" ["A\""])
-  ("a\"\"" ["a\""])
-  ("O\"\"" ["O\""])
-  ("o\"\"" ["o\""])
-  ("E''" ["E'"])
-  ("e''" ["e'"])
-  )
- (quail-define-package
-  "spanish-alt-postfix" "Spanish" "ES<" t
-  "Spanish (Español) input method with postfix modifiers
- A' -> Á
- E' -> É
- I' -> Í
- O' -> Ó
- U' -> Ú
- N~ -> Ñ
- !/ -> ¡
- ?/ -> ¿
- Doubling the postfix separates the letter and postfix:
- a'' -> a'   n~~ -> n~, etc.
- " nil t nil nil nil nil nil nil nil nil t)
- (quail-define-rules
-  ("A'" ?Á)
-  ("a'" ?á)
-  ("E'" ?É)
-  ("e'" ?é)
-  ("I'" ?Í)
-  ("i'" ?í)
-  ("O'" ?Ó)
-  ("o'" ?ó)
-  ("U'" ?Ú)
-  ("u'" ?ú)
-  ("N~" ?Ñ)
-  ("n~" ?ñ)
-  ("?/" ?¿)
-  ("!/" ?¡)
-  ("A''" ["A'"])
-  ("a''" ["a'"])
-  ("E''" ["E'"])
-  ("e''" ["e'"])
-  ("I''" ["I'"])
-  ("i''" ["i'"])
-  ("O''" ["O'"])
-  ("o''" ["o'"])
-  ("U''" ["U'"])
-  ("u''" ["u'"])
-  ("N~~" ["N~"])
-  ("n~~" ["n~"])
-  ("?//" ["?/"])
-  ("!//" ["!/"])
-  )
- (quail-define-package
-  "swedish-alt-postfix" "Latin-1" "SV<" t
-  "Swedish (Svenska) input method (rule: AA -> Å, AE -> Ä, OE -> Ö, E' -> É)
- Doubling the postfix separates the letter and postfix: e.g. aee -> ae
- " nil t nil nil nil nil nil nil nil nil t)
- (quail-define-rules
-  ("AA" ?Å)
-  ("aa" ?å)
-  ("AE" ?Ä)
-  ("ae" ?ä)
-  ("OE" ?Ö)
-  ("oe" ?ö)
-  ("E'" ?É)
-  ("e'" ?é)
-  ("AAA" ["AA"])
-  ("aaa" ["aa"])
-  ("AEE" ["AE"])
-  ("aee" ["ae"])
-  ("OEE" ["OE"])
-  ("oee" ["oe"])
-  ("E''" ["E'"])
-  ("e''" ["e'"])
-  )
  
  (quail-define-package
 - "turkish-latin-3-alt-postfix" "Turkish" "TR3<<" t
 - "Turkish (T\e,A|\e(Brk\e,Ag\e(Be) input method with postfix modifiers.
 -This input method differs from `turkish-latin-3-postfix' in that
 -comma is not special (use ` instead).
 -
 -This is for those who use Latin-3 (ISO-8859-3) for Turkish.  If you
 -use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
 -
 -Note for I, \e,C9\e(B, \e,C)\e(B, i.
 -
 -A^ -> \e,CB\e(B
 -C` -> \e,CG\e(B
 -G^ -> \e,C+\e(B
 -I  -> I
 -i  -> \e,C9\e(B
 -I/ -> \e,C)\e(B
 -i/ -> i
 -O\" -> \e,CV\e(B
 -S` -> \e,C*\e(B
 -U\" -> \e,C\\e(B
 -U^ -> \e,C[\e(B
 -
 -Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
 -" nil t nil nil nil nil nil nil nil nil t)
 -
 -(quail-define-rules
 - ("A^" ?\e,CB\e(B)
 - ("a^" ?\e,Cb\e(B)
 - ("C`" ?\e,CG\e(B)
 - ("c`" ?\e,Cg\e(B)
 - ("G^" ?\e,C+\e(B)
 - ("g^" ?\e,C;\e(B)
 - ("I/" ?\e,C)\e(B)
 - ("i" ?\e,C9\e(B)
 - ("i/" ?i)
 - ("O\"" ?\e,CV\e(B)
 - ("o\"" ?\e,Cv\e(B)
 - ("S`" ?\e,C*\e(B)
 - ("s`" ?\e,C:\e(B)
 - ("U\"" ?\e,C\\e(B)
 - ("u\"" ?\e,C|\e(B)
 - ("U^" ?\e,C[\e(B)
 - ("u^" ?\e,C{\e(B)
 -
 - ("A^^" ["A^"])
 - ("a^^" ["a^"])
 - ("C``" ["C`"])
 - ("c``" ["c`"])
 - ("G^^" ["G^"])
 - ("g^^" ["g^"])
 - ("I//" ["I/"])
 - ("i" ["i"])
 - ("i//" ["i/"])
 - ("O\"\"" ["O\""])
 - ("o\"\"" ["o\""])
 - ("S``" ["S`"])
 - ("s``" ["s`"])
 - ("U\"\"" ["U\""])
 - ("u\"\"" ["u\""])
 - ("U^^" ["U^"])
 - ("u^^" ["u^"])
 - )
 -
 -(quail-define-package
 - "turkish-alt-postfix" "Turkish" "TR\e,A+\e(B" t
 - "Turkish (T\e,A|\e(Brk\e,Ag\e(Be) input method with postfix modifiers.
 + "turkish-alt-postfix" "Turkish" "TR«" t
 + "Turkish (Türkçe) input method with postfix modifiers.
+ This input method differs from `turkish-postfix' in that
+ comma is not special (use ` instead).
  
 -This is for those who use Latin-5 (ISO-8859-9) for Turkish.  If you
 -use Latin-3 (ISO-8859-3), you should use
 -\"turkish-latin-3-alt-postfix\" instead.
 +turkish-latin-3-alt-postfix is an obsolete alias for turkish-alt-postfix.
  
 -Note for I, \e,M}\e(B, \e,M]\e(B, i.
 +Note for I, ı, İ, i.
  
 -A^ -> \e,MB\e(B
 -C` -> \e,MG\e(B
 -G^ -> \e,MP\e(B
 +A^ -> Â
 +C` -> Ç
 +G^ -> Ğ
  I  -> I
 -i  -> \e,M}\e(B
 -I/ -> \e,M]\e(B
 +i  -> ı
 +I/ -> İ
  i/ -> i
 -O\" -> \e,MV\e(B
 -S` -> \e,M^\e(B
 -U\" -> \e,M\\e(B
 -U^ -> \e,M[\e(B
 +O\" -> Ö
 +S` -> Ş
 +U\" -> Ü
 +U^ -> Û
  
  Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
  " nil t nil nil nil nil nil nil nil nil t)
diff --cc lisp/ChangeLog
Simple merge
Simple merge
diff --cc lisp/faces.el
Simple merge
Simple merge
Simple merge
diff --cc lisp/info.el
Simple merge
Simple merge
Simple merge
diff --cc lisp/simple.el
Simple merge
diff --cc lisp/startup.el
Simple merge
Simple merge
index 0516a4ab8a54537270a342611c972eaea4681fd3,54e45d6b28f7a5b04703d01ad306b2d5cc274906..6badf8f51e18a76bb733a3dbf4cc07dc39be6146
@@@ -405,11 -391,17 +405,11 @@@ Don't move back past the buffer positio
  This function is called when we are going to break the current line
  after or before a non-ASCII character.  If the charset of the
  character has the property `fill-find-break-point-function', this
- function calls the property value as a function with one arg LINEBEG.
+ function calls the property value as a function with one arg LIMIT.
  If the charset has no such property, do nothing."
 -  (let* ((ch (following-char))
 -       (charset (char-charset ch))
 -       func)
 -    (if (eq charset 'ascii)
 -      (setq ch (preceding-char)
 -            charset (char-charset ch)))
 -    (if (charsetp charset)
 -      (setq func
 -            (get-charset-property charset 'fill-find-break-point-function)))
 +  (let ((func (or
 +             (aref fill-find-break-point-function-table (following-char))
 +             (aref fill-find-break-point-function-table (preceding-char)))))
      (if (and func (fboundp func))
        (funcall func limit))))
  
Simple merge
diff --cc src/fileio.c
Simple merge
diff --cc src/process.c
Simple merge
diff --cc src/w32fns.c
Simple merge
diff --cc src/xdisp.c
Simple merge