summaryrefslogtreecommitdiffstats
path: root/windows/neo-vars/src/source/makecompose.ahk
diff options
context:
space:
mode:
authormösi <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>2009-02-20 11:09:29 +0000
committermösi <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>2009-02-20 11:09:29 +0000
commit23475691bbee440f7a84a02f4d038718025b7019 (patch)
tree54e25f76599c64014af7169b5c810a44cd241088 /windows/neo-vars/src/source/makecompose.ahk
parent97b7ec45041a4f6a61801a14a641bce2f764b2ec (diff)
Die Compose-Sequenzen sind jetzt in eine eigene Funktion ausgelagert. Das eröffnet neue Möglichkeiten in Bezug auf die Wahlfreiheit, die fertigen Sequenzen zu verwenden, oder sie beim Start dynamisch erzeugen zu lassen (das ist aber noch nicht implementiert).
git-svn-id: https://svn.neo-layout.org@1675 b9310e46-f624-0410-8ea1-cfbb3a30dc96
Diffstat (limited to '')
-rw-r--r--windows/neo-vars/src/source/makecompose.ahk13
1 files changed, 8 insertions, 5 deletions
diff --git a/windows/neo-vars/src/source/makecompose.ahk b/windows/neo-vars/src/source/makecompose.ahk
index 544e583..eb4c95b 100644
--- a/windows/neo-vars/src/source/makecompose.ahk
+++ b/windows/neo-vars/src/source/makecompose.ahk
@@ -1907,7 +1907,7 @@ EncodeUnicodeFile(FFrom,FTo) {
if (ReplaceLeft != "") {
if (CM%modkeys% != 1) {
CM%modkeys% := 1
- Composita := Composita . "CM" modkeys . ":=1`r`n"
+ Composita := Composita . " CM" modkeys . ":=1`r`n"
}
}
else
@@ -1921,11 +1921,11 @@ EncodeUnicodeFile(FFrom,FTo) {
}
if (modkeys != "") {
ressymb := EncodeUni(ReplaceRight)
- Composita .= "CD" . modkeys . ":=""" . ressymb . """`r`n"
+ Composita .= " CD" . modkeys . ":=""" . ressymb . """`r`n"
if (StrLen(ressymb)==5)
- Composita .= "CRC" . ressymb . ".="" " . modkeys . """`r`n"
+ Composita .= " CRC" . ressymb . ".="" " . modkeys . """`r`n"
} else {
- Composita .= "; illegal " . Xkbsym . " in " . A_LoopField . "`r`n"
+ Composita .= " `; illegal " . Xkbsym . " in " . A_LoopField . "`r`n"
Miss := Miss + 1
}
}
@@ -1945,7 +1945,7 @@ CompRevision = %1%
OutputFile = %2%
FileDelete,%OutputFile%
-FileAppend,CompRevision := "%CompRevision%"`r`n, %OutputFile%
+FileAppend,CompRevision := "%CompRevision%"`r`n`r`nLoadDefaultCompose() {`r`n global`r`n`r`n, %OutputFile% ; }
loop %Numpars% {
if (A_Index < 3)
@@ -1953,6 +1953,9 @@ loop %Numpars% {
EncodeUnicodeFile(%A_Index%, OutputFile)
}
+; {
+FileAppend,},%OutputFile%
+
; MsgBox % EncodeUni(DecodeUni("U20ACU0041U0070"))
; MsgBox % ConvertXkbsym("KP_5") . ConvertXkbsym("a") \ No newline at end of file