svn classes: added TLogEntry.DateTime property + test

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@759 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/svn/test/fpcunitsvnpkg.lpi

@@ -2,11 +2,13 @@
 <CONFIG>
   <ProjectOptions>
     <PathDelim Value="\"/>
-    <Version Value="5"/>
+    <Version Value="7"/>
     <General>
+      <Flags>
+        <LRSInOutputDirectory Value="False"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
       <MainUnit Value="0"/>
-      <IconPath Value="./"/>
       <TargetFileExt Value=".exe"/>
     </General>
     <VersionInfo>
@@ -56,11 +58,8 @@
     </Units>
   </ProjectOptions>
   <CompilerOptions>
-    <Version Value="5"/>
+    <Version Value="8"/>
     <PathDelim Value="\"/>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
     <Linking>
       <Debugging>
         <GenerateDebugInfo Value="True"/>

components/svn/test/testsvnclasses.pas

@@ -5,7 +5,7 @@ unit TestSvnClasses;
 interface
 
 uses
-  Classes, SysUtils, fpcunit, testregistry,
+  Classes, SysUtils, dateutils, fpcunit, testregistry,
   svnclasses;
 
 type
@@ -116,6 +116,8 @@ begin
       '2007-02-20T10:57:42.928052Z', LogEntry.Date);
     AssertEquals('Wrong log display date',
       '2007-02-20 10:57:42', LogEntry.DisplayDate);
+    AssertEquals('Wrong log datetime',
+      EncodeDateTime(2007,2,20,10,57,42,928), LogEntry.DateTime);
     AssertEquals('Wrong log message',
       'TAChart: added icon, added to make bigide', LogEntry.Message);
   finally