diff --git a/components/svn/svnclasses.pas b/components/svn/svnclasses.pas index e2dc8a54c..c7ea69e66 100644 --- a/components/svn/svnclasses.pas +++ b/components/svn/svnclasses.pas @@ -683,11 +683,13 @@ var begin Output := TMemoryStream.Create; try - Files := ''; - for i := 0 to FileNames.Count-1 do - Files := Files + ' ' + FileNames[i]; - ExecuteSvnCommand('proplist -v' + Files, Output); - Output.Position := 0; + if FileNames.Count>0 then begin + Files := ''; + for i := 0 to FileNames.Count-1 do + Files := Files + ' ' + FileNames[i]; + ExecuteSvnCommand('proplist -v' + Files, Output); + Output.Position := 0; + end; LoadFromStream(Output); for i := 0 to FileNames.Count -1 do begin if FFiles.FindIndexOf(FileNames[i])<0 then begin