[OT] Re: Voting for forum posts

[Ali Çehreli]

On 4/2/21 3:07 AM, Walter Bright wrote:

 > I finally settled on placing the cursor over a
 > character, and hitting ^X-U. It will scroll through related symbols.

I use a similar idea in *regular* :) Emacs for only the Turkish subset 
of Unicode.

Because Turkish alphabet is based on the Latin alphabet, I came up with 
the idea of typing a key twice to produce its Turkish relation. Copying 
from my .emacs file:

gg -> ğ
II -> İ
ii -> ı
etc.

And there are escape sequences when I really want e.g. gg instead of ğ, 
and there are escapes for espaces. :)

("gg/" ["gg"])
("gg//" ["ğ/"])
("gg/g" ["gğ"])

You can tell by the sound of my keyboard whether I'm typing an English 
text or a Turkish text. :)

Ali

P.S. Here is the entire definition of the input method I named 
'turkish-ali'. (Used with M-x set-input-method)

(require 'quail)

(quail-define-package
"turkish-ali" "UTF-8" "TRa<" t
"Turkish input method by Ali

<key descriptions go here>

" nil t nil nil nil nil nil nil nil nil t)

(quail-define-rules
("A^" ?Â)
("a^" ?â)
("CC" ?Ç)
("cc" ?ç)
("GG" ?Ğ)
("gg" ?ğ)
("II" ?İ)
("ii" ?ı)
("I^" ?Î)
("i^" ?î)
("OO" ?Ö)
("oo" ?ö)
("SS" ?Ş)
("ss" ?ş)
("UU" ?Ü)
("uu" ?ü)
("U^" ?Û)
("u^" ?û)

("A^/" ["A^"])
("A^//" ["Â/"])
("a^/" ["a^"])
("a^//" ["â/"])
("CC/" ["CC"])
("CC//" ["Ç/"])
("CC/C" ["CÇ"])
("cc/" ["cc"])
("cc//" ["ç/"])
("cc/c" ["cç"])
("GG/" ["GG"])
("GG//" ["Ğ/"])
("GG/G" ["GĞ"])
("gg/" ["gg"])
("gg//" ["ğ/"])
("gg/g" ["gğ"])
("II/" ["II"])
("II//" ["İ/"])
("II/I" ["Iİ"])
("ii/" ["ii"])
("ii//" ["ı/"])
("i^/" ["i^"])
("i^//" ["î/"])
("OO/" ["OO"])
("OO//" ["Ö/"])
("OO/O" ["OÖ"])
("oo/" ["oo"])
("oo//" ["ö/"])
("oo/o" ["oö"])
("SS/" ["SS"])
("SS//" ["Ş/"])
("SS/S" ["SŞ"])
("ss/" ["ss"])
("ss//" ["ş/"])
("ss/s" ["sş"])
("UU/" ["UU"])
("UU//" ["Ü/"])
("UU/U" ["UÜ"])
("uu/" ["uu"])
("uu//" ["ü/"])
("uu/u" ["uü"])
("U^/" ["U^"])
("U^//" ["Û/"])
("u^/" ["u^"])
("u^//" ["û/"])

)