Sprachumschaltung von DE nach EN über Menü möglich gemacht

2026-07-15 15:11:02 +02:00
parent 0fe14c5454
commit 9458382965
10 changed files with 115 additions and 21 deletions
@@ -85,11 +85,11 @@
  (if defa
    (progn
      (initget 1 "Yes No  Yes")
-      (= (getkword (strcat "\n" prompt-text " Y/N <Y>: ")) "No")
+      (= (getkword (strcat "\n" prompt-text (ssg-text "ques-yn-default-yes"))) "No")
    )
    (progn
      (initget 1 "Yes No  No")
-      (= (getkword (strcat "\n" prompt-text " Y/N <N>: ")) "Yes")
+      (= (getkword (strcat "\n" prompt-text (ssg-text "ques-yn-default-no"))) "Yes")
    )
  )
 )
@@ -536,8 +536,8 @@
  (if (not (new_dialog dialog-name dat))
    (progn (alert "Dialog konnte nicht geladen werden.") (exit))
  )
-  (if init-fn (init-fn))
-  (action_tile "accept" "(if accept-fn (accept-fn)) (done_dialog 1)")
+  (if init-fn (apply init-fn nil))
+  (action_tile "accept" "(if accept-fn (apply accept-fn nil)) (done_dialog 1)")
  (action_tile "cancel" "(done_dialog 0)")
  (start_dialog)
  (unload_dialog dat)