[fpc-pascal] function now shows bad date (-2 hours)

[Marco van de Voort]

> I have this simple demo (in ubuntu, using fpc 2.2.0, locale is sk_SK.utf8):
> 
> program test;
> uses SysUtils;
> begin
>   writeln(DateTimeToStr(now));
> end.
> 
> When I compile it and run it it print 13:44:
> 
> $ ./test
> 6-4-08 13:44:32
> 
> But the actual date is 15:44:
> 
> $ date
> Ne apr  6 15:44:35 CEST 2008
> 
> What's wrong?

I assume that the problem is that your main clock is set to GMT, so then you
have 1 hour timezone + 1 hour summer time difference.

IOW, you need to correct that result for time differences.