paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-08 11:16:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazsvnpkg: fixed combining date+time

Browse Source 
git-svn-id: branches/fixes_1_4@47630 -
This commit is contained in:
mattias 2015-02-07 12:06:27 +00:00
parent 74f9e29f05
commit 30cb5eed7b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazsvnpkg/svnclasses.pas
View File

@ -261,7 +261,7 @@ begin
n := StrToInt(Copy(ADateTime, 15, 2));
s := StrToInt(Copy(ADateTime, 18, 2));
Result := EncodeDate(y,m,d) + EncodeTime(h,n,s,0);
Result := ComposeDateTime( EncodeDate(y,m,d), EncodeTime(h,n,s,0));
end;
function SortPathAscending(const Item1, Item2: TSVNStatusItem): Integer;