Hush warnings.
Patch by kareila.
diffs (40 lines):
diff -r 0a3ff6232c78 -r 5df591a35dac cgi-bin/LJ/S2.pm
--- a/cgi-bin/LJ/S2.pm Tue Dec 28 19:40:54 2010 +0800
+++ b/cgi-bin/LJ/S2.pm Tue Dec 28 20:49:07 2010 +0800
@@ -1773,14 +1773,17 @@ sub DateTime_tz
sub DateTime_parts
{
- my @parts = split(/\s+/, shift);
+ my $datestr = defined $_[0] ? $_[0] : '';
+ my @parts = split /\s+/, $datestr;
+
my $dt = { '_type' => 'DateTime' };
- $dt->{'year'} = $parts[0]+0;
- $dt->{'month'} = $parts[1]+0;
- $dt->{'day'} = $parts[2]+0;
- $dt->{'hour'} = $parts[3]+0;
- $dt->{'min'} = $parts[4]+0;
- $dt->{'sec'} = $parts[5]+0;
+ $dt->{year} = defined $parts[0] ? $parts[0] + 0 : 0;
+ $dt->{month} = defined $parts[1] ? $parts[1] + 0 : 0;
+ $dt->{day} = defined $parts[2] ? $parts[2] + 0 : 0;
+ $dt->{hour} = defined $parts[3] ? $parts[3] + 0 : 0;
+ $dt->{min} = defined $parts[4] ? $parts[4] + 0 : 0;
+ $dt->{sec} = defined $parts[5] ? $parts[5] + 0 : 0;
+
# the parts string comes from MySQL which has range 0-6,
# but internally and to S2 we use 1-7.
$dt->{'_dayofweek'} = $parts[6] + 1 if defined $parts[6];
diff -r 0a3ff6232c78 -r 5df591a35dac htdocs/preview/entry.bml
--- a/htdocs/preview/entry.bml Tue Dec 28 19:40:54 2010 +0800
+++ b/htdocs/preview/entry.bml Tue Dec 28 20:49:07 2010 +0800
@@ -308,8 +308,6 @@ _c?>
$p->{'entry'} = $s2entry;
- my $userlite_journal = LJ::S2::UserLite($u);
-
$p->{'comments'} = [];
$p->{'viewing_thread'} = 0;
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog
