Changeset 16 for trunk/Backends/Subversion

Timestamp:

Jul 15, 2015, 8:32:42 AM (9 years ago)

Author:

chronos

Message:

• Modified: Execute get log and get status silently without dialog.

File:

• trunk/Backends/Subversion/USubversion.pas (modified) (2 diffs)

trunk/Backends/Subversion/USubversion.pas

@@ -142 +142 @@
   NewItem := nil;
   Log.Clear;
+  SilentExecution := True;
   Execute(['log', FileName, '-v']);
+  SilentExecution := False;
   for I := 0 to ExecutionOutput.Count - 1 do begin
     Line := Trim(ExecutionOutput[I]);
@@ -187 +189 @@
 begin
   Status.Clear;
+  SilentExecution := True;
   Execute(['status', '--xml', '-v']);
+  SilentExecution := False;
   S := TStringStream.Create(ExecutionOutput.Text);
   try