svoid dm_gazelle_newRuleDialog_3(S in) {
  dm_gazelle_newRuleDialog_3(in, "");
}

svoid dm_gazelle_newRuleDialog_3(S in, S comments) {
  S out = dropPrefixTrim("+", lastLine(in));
  final JTextArea taRule = typeWriterTextArea(in + "\n=> " + out);
  final JTextArea taComments = typeWriterTextArea(comments);
  showFormTitled2("New Gazelle Rule",
    Rule := taRule,
    Comments := taComments,
    r {
      Pair<S, Bool> p = dm_gazelle_addRuleWithComment(getText(taRule), getText(taComments));
      infoBox(p.b ? "Rule " + p.a + " added" : "Rule already there: " + p.a);
    });
}