[Jifty-commit] r1218 - in jifty/trunk: lib/Jifty

jifty-commit at lists.jifty.org jifty-commit at lists.jifty.org
Thu Jun 8 17:47:30 EDT 2006


Author: alexmv
Date: Thu Jun  8 17:47:16 2006
New Revision: 1218

Modified:
   jifty/trunk/   (props changed)
   jifty/trunk/lib/Jifty/DateTime.pm

Log:
 r13727 at zoq-fot-pik:  chmrr | 2006-06-08 17:14:22 -0400
  * Perltidy


Modified: jifty/trunk/lib/Jifty/DateTime.pm
==============================================================================
--- jifty/trunk/lib/Jifty/DateTime.pm	(original)
+++ jifty/trunk/lib/Jifty/DateTime.pm	Thu Jun  8 17:47:16 2006
@@ -1,7 +1,7 @@
 use warnings;
 use strict;
-package Jifty::DateTime;
 
+package Jifty::DateTime;
 
 =head1 NAME
 
@@ -21,65 +21,69 @@
 
 =head2 new ARGS
 
-See L<DateTime/new>.  After calling that method, set this object's timezone
-to the current user's time zone, if the current user has a method called C<time_zone>.
+See L<DateTime/new>.  After calling that method, set this object's
+timezone to the current user's time zone, if the current user has a
+method called C<time_zone>.
 
 =cut
 
 sub new {
-  my $class = shift;
-  my %args  = (@_);
-  my $self  = $class->SUPER::new(%args);
-
-  # unless the user has explicitly said they want a floating time,
-  # we want to convert to the end-user's timezone
-  # This is complicated by the fact that DateTime auto-appends
-  $self->_get_current_user();
-  if ( $self->current_user->user_object
-        and  $self->current_user->user_object->can('time_zone')
+    my $class = shift;
+    my %args  = (@_);
+    my $self  = $class->SUPER::new(%args);
+
+    # Unless the user has explicitly said they want a floating time,
+    # we want to convert to the end-user's timezone.  This is
+    # complicated by the fact that DateTime auto-appends
+    $self->_get_current_user();
+    if (    $self->current_user->user_object
+        and $self->current_user->user_object->can('time_zone')
         and $self->current_user->user_object->time_zone )
-  {
-    $self->set_time_zone("UTC");
-    $self->set_time_zone( $self->current_user->user_object->time_zone );
+    {
+        $self->set_time_zone("UTC");
+        $self->set_time_zone( $self->current_user->user_object->time_zone );
 
-  }
-  return $self;
+    }
+    return $self;
 }
 
 =head2 new_from_string STRING
 
-Take some user defined string like "tomorrow" and turn it into a C<Jifty::Datetime> object.  If the string appears to be a _date_, keep it in the floating timezone, otherwise, set it to the current user's timezone.
-
+Take some user defined string like "tomorrow" and turn it into a
+C<Jifty::Datetime> object.  If the string appears to be a _date_, keep
+it in the floating timezone, otherwise, set it to the current user's
+timezone.
 
 =cut
 
 sub new_from_string {
-  my $class  = shift;
-  my $string = shift;
-  my $now;
-  { local $ENV{'TZ'} = "GMT"; 
-    $now = Date::Manip::UnixDate( $string, "%o" );
-  }
-  return undef unless $now;
-  my $self = $class->from_epoch( epoch => $now, time_zone => 'gmt' );
-  $self->_get_current_user();
-  if (  $self->current_user->user_object
-    and $self->current_user->user_object->can('time_zone')
-    and $self->current_user->user_object->time_zone )
-  {
-
-    # If the DateTime we've been handed appears to actually be at a "time"
-    # then we want to make sure we get it to be that time in the local
-    # timezone
-    #
-    # If we had only a date, then we want to switch it to the user's
-    # timezone without adjusting the "time", as that could make 2006-12-01
-    #  into 2006-11-30
-    $self->set_time_zone("floating")
-      unless ( $self->hour or $self->minute or $self->second );
-    $self->set_time_zone( $self->current_user->user_object->time_zone );
-  }
-  return $self;
+    my $class  = shift;
+    my $string = shift;
+    my $now;
+    {
+        local $ENV{'TZ'} = "GMT";
+        $now = Date::Manip::UnixDate( $string, "%o" );
+    }
+    return undef unless $now;
+    my $self = $class->from_epoch( epoch => $now, time_zone => 'gmt' );
+    $self->_get_current_user();
+    if (    $self->current_user->user_object
+        and $self->current_user->user_object->can('time_zone')
+        and $self->current_user->user_object->time_zone )
+    {
+
+        # If the DateTime we've been handed appears to actually be at
+        # a "time" then we want to make sure we get it to be that time
+        # in the local timezone
+        #
+        # If we had only a date, then we want to switch it to the
+        # user's timezone without adjusting the "time", as that could
+        # make 2006-12-01 into 2006-11-30
+        $self->set_time_zone("floating")
+            unless ( $self->hour or $self->minute or $self->second );
+        $self->set_time_zone( $self->current_user->user_object->time_zone );
+    }
+    return $self;
 }
 
 1;


More information about the Jifty-commit mailing list