mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-17 04:29:25 +02:00
lazsvnpkg: fixed combining date+time
git-svn-id: trunk@47629 -
This commit is contained in:
parent
4329809517
commit
2d94fffb1c
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user