Stop changing status on replace text (#60)

All verses were marked as needing further review if a text was replaced. This behaviour caused more bad than good, so it is being removed.
rubiot · Jun 6, 2019 · 4614bbe · 4614bbe
1 parent 8e12094
commit 4614bbe
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/projeto.pas b/projeto.pas
@@ -886,8 +886,6 @@ procedure TProjeto.SetVerseText(versiculo: string;
                     FATmpVerse[tbOrigem].DebugTokens, FATmpVerse[tbDestino].DebugTokens]),
              mtError, [mbOK], 0);
     end;
-
-    FTblPares.FieldByName('pare_situacao').AsInteger := 2; // needs review
   end;
 
   FTblPares.Fields[FACamposTexto[texto]].AsString := versiculo;