REPL: support setting sl and tl by :set (fix #451)

soimort · Sep 30, 2022 · a5e0166 · a5e0166
1 parent 3dcc122
commit a5e0166
Showing 1 changed file with 12 additions and 1 deletion.
diff --git a/include/REPL.awk b/include/REPL.awk
@@ -68,7 +68,7 @@ function prompt(    i, p, temp) {
     # %s : source languages, separated by "+"
     # 's' is the format-control character for string
 
-    # %S : source languages (English names), seperated by "+"
+    # %S : source languages (English names), separated by "+"
     if (p ~ /%S/) {
         temp = getName(Option["sls"][1])
         for (i = 2; i <= length(Option["sls"]); i++)
@@ -144,6 +144,15 @@ function repl(line,    command, group, name, i, value, words) {
         name = words[2]
         value = words[3]
         Option[name] = value
+        # :set sl and :set tl should work as intended
+        # TODO: support multiple language codes
+        if (name == "sl") {
+            delete Option["sls"]
+            Option["sls"][1] = Option["sl"]
+        } else if (name == "tl") {
+            delete Option["tl"]
+            Option["tl"][1] = value
+        }
     } else if (command ~ /^:show$/) {
         name = words[2]
         print prettify("welcome-submessage", toString(Option[name], 1, 0, 1))
@@ -155,6 +164,8 @@ function repl(line,    command, group, name, i, value, words) {
         value = words[2]
         Option["engine"] = value
         initHttpService()
+    } else if (command ~ /^:reset$/) {
+        # TODO: reset source and target languages, etc.
     } else {
         match(command, /^[{(\[]?((@?[[:alpha:]][[:alpha:]][[:alpha:]]?(-[[:alpha:]][[:alpha:]][[:alpha:]]?[[:alpha:]]?)?\+)*(@?[[:alpha:]][[:alpha:]][[:alpha:]]?(-[[:alpha:]][[:alpha:]][[:alpha:]]?[[:alpha:]]?)?)?)?(:|=)((@?[[:alpha:]][[:alpha:]][[:alpha:]]?(-[[:alpha:]][[:alpha:]][[:alpha:]]?[[:alpha:]]?)?\+)*(@?[[:alpha:]][[:alpha:]][[:alpha:]]?(-[[:alpha:]][[:alpha:]][[:alpha:]]?[[:alpha:]]?)?)?)[})\]]?$/, group)
         if (RSTART) {