!7

module ObserveTextInputForms > DynPrintLog {
  start {
    dm_vmBus_onMessages_directArg(ll('inputtingText, 'inputtingText_OK), voidfunc(fS _msg, fO[] arg) {
      final Map threadInfo = cast arg[0];
      fS msg = cast arg[1];
      final JTextField tf = cast arg[2];
      fS text = gtt(tf);
      switch to q();
      print("Inputting text " + (eq(_msg, 'inputtingText_OK) ? "done" : "") + ": " + msg);
      print("Current value: " + text);
      print("Module: " + dm_moduleName(mapGet(threadInfo, 'dm_currentModule_value)));
    });
  }
}