[Oorexx-svn] SF.net SVN: oorexx:[6251] main/branches/4.1.0/trunk/interpreter/RexxClasses /CoreClasses.orx

[<mie...@us...>]

Revision: 6251
          http://oorexx.svn.sourceforge.net/oorexx/?rev=6251&view=rev
Author:   miesfeld
Date:     2010-10-09 22:00:21 +0000 (Sat, 09 Oct 2010)

Log Message:
-----------
[3047936] Add method to convert a .DateTime object to local time.

Modified Paths:
--------------
    main/branches/4.1.0/trunk/interpreter/RexxClasses/CoreClasses.orx

Modified: main/branches/4.1.0/trunk/interpreter/RexxClasses/CoreClasses.orx
===================================================================
--- main/branches/4.1.0/trunk/interpreter/RexxClasses/CoreClasses.orx	2010-10-09 21:26:33 UTC (rev 6250)
+++ main/branches/4.1.0/trunk/interpreter/RexxClasses/CoreClasses.orx	2010-10-09 22:00:21 UTC (rev 6251)
@@ -2703,6 +2703,11 @@
   -- the target timezone, then create a new object using that offset
   return self~class~new(utcTimeStamp + adjustment, offset)
 
+-- return a .DateTime object converted to local time
+::METHOD toLocalTime
+  use strict arg
+  return self~toTimeZone(time('O')/60000000)  -- convert to the local offset
+
 -- return the time zone offset, as a TimeSpan object
 ::METHOD offset
   expose offset


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.