# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 967068627 0
# Node ID 00918609ef4a591b630550a9b55f9ffb6971b22e
# Parent  a3cc18f182173bf4338bb1d1a1266bb99752e358
("latin-1-prefix"): Change ~s to give ,A'(B and
add ~p for ,A6(B.

diff -r a3cc18f18217 -r 00918609ef4a leim/quail/latin-pre.el
--- a/leim/quail/latin-pre.el	Wed Aug 23 22:04:13 2000 +0000
+++ b/leim/quail/latin-pre.el	Wed Aug 23 22:10:27 2000 +0000
@@ -51,7 +51,7 @@
    cedilla   |   ~    | ~c -> ,Ag(B
     misc     | \" ~ /  | \"s -> ,A_(B  ~d -> ,Ap(B  ~t -> ,A~(B  /a -> ,Ae(B  /e -> ,Af(B  /o -> ,Ax(B
    symbol    |   ~    | ~> -> ,A;(B  ~< -> ,A+(B  ~! -> ,A!(B  ~? -> ,A?(B  ~~ -> ,A8(B
-             |   ~    | ~p -> ,A'(B  ~x -> ,A$(B  ~. -> ,A7(B  ~$ -> ,A#(B  ~u -> ,A5(B  
+             |   ~    | ~s -> ,A'(B  ~x -> ,A$(B  ~. -> ,A7(B  ~$ -> ,A#(B  ~u -> ,A5(B  ~p -> ,A6(B
    symbol    |  _ /   | _o -> ,A:(B  _a -> ,A*(B  // -> ,A0(B  /\\ -> ,AW(B  _y -> ,A%(B
              |  _ /   | _: -> ,Aw(B  /c -> ,A"(B  /2 -> ,A=(B  /4 -> ,A<(B  /3 -> ,A>(B
    symbol    |   ^    | ^r -> ,A.(B  ^c -> ,A)(B  ^2 -> ,A2(B  ^3 -> ,A3(B
@@ -147,7 +147,8 @@
  ("/2" ?,A=(B)
  ("/4" ?,A<(B)
  ("/3" ?,A>(B)
- ("~p" ?,A'(B)
+ ("~s" ?,A'(B)
+ ("~p" ?,A6(B)
  ("~x" ?,A$(B)
  ("~." ?,A7(B)
  ("~$" ?,A#(B)