From 6c77caad00d0bf7b3538f4916836f7c08e5a5f81 Mon Sep 17 00:00:00 2001 From: vsnijders Date: Tue, 23 Dec 2008 13:20:28 +0000 Subject: [PATCH] fpsvnsync: fixed using revision in svn copy command git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@641 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- applications/fpsvnsync/fpsvnsync.lpi | 11 +++++------ applications/fpsvnsync/fpsvnsync.lpr | 2 +- 2 files changed, 6 insertions(+), 7 deletions(-) diff --git a/applications/fpsvnsync/fpsvnsync.lpi b/applications/fpsvnsync/fpsvnsync.lpi index ac25155b1..72beb8f83 100644 --- a/applications/fpsvnsync/fpsvnsync.lpi +++ b/applications/fpsvnsync/fpsvnsync.lpi @@ -2,11 +2,13 @@ - + + + + - @@ -41,11 +43,8 @@ - + - - - diff --git a/applications/fpsvnsync/fpsvnsync.lpr b/applications/fpsvnsync/fpsvnsync.lpr index ee89e3d60..c5b8fa35e 100644 --- a/applications/fpsvnsync/fpsvnsync.lpr +++ b/applications/fpsvnsync/fpsvnsync.lpr @@ -163,7 +163,7 @@ var if LogPath.Action in [caModify, caAdd] then begin SourceFile := FSourceWC + LogPath.Path; if LogPath.CopyFromPath<>'' then begin - Command := format('copy -r%d "%s%s" "%s"', + Command := format('copy "%1:s%2:s"@%0:d "%3:s"', [LogPath.CopyFromRevision, DestRoot, LogPath.CopyFromPath, DestFile]); writeln('svn '+ Command);