[Rt-commit] r18666 - in rt/3.999/trunk: .

[sartak at bestpractical.com]

Author: sartak
Date: Wed Mar  4 17:22:31 2009
New Revision: 18666

Modified:
   rt/3.999/trunk/   (props changed)
   rt/3.999/trunk/lib/RT/DateTime.pm

Log:
 r80907 at onn:  sartak | 2009-03-04 17:22:26 -0500
 Allow time_zone in $date->iso (removing date and time)


Modified: rt/3.999/trunk/lib/RT/DateTime.pm
==============================================================================
--- rt/3.999/trunk/lib/RT/DateTime.pm	(original)
+++ rt/3.999/trunk/lib/RT/DateTime.pm	Wed Mar  4 17:22:31 2009
@@ -65,23 +65,20 @@
 sub iso {
     my $self = shift;
     my %args = (
-        date => 1,
-        time => 1,
+        time_zone => undef,
         @_,
     );
 
-    if ($args{time} && $args{date}) {
-        return join ' ', $self->ymd('-'), $self->hms(':');
-    }
-    elsif ($args{date}) {
-        return $self->ymd('-');
-    }
-    elsif ($args{time}) {
-        return $self->hms(':');
+    my $clone;
+    if ($args{time_zone}) {
+        $clone = $self->clone;
+        $clone->set_time_zone($args{time_zone});
     }
     else {
-        return '';
+        $clone = $self;
     }
+
+    return join ' ', $clone->ymd('-'), $clone->hms(':');
 }
 
 1;