forked from pool/perl-TimeDate
Accepting request 28399 from devel:languages:perl
Copy from devel:languages:perl/perl-TimeDate based on submit request 28399 from user coolo OBS-URL: https://build.opensuse.org/request/show/28399 OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-TimeDate?expand=0&rev=7
This commit is contained in:
committed by
Git OBS Bridge
parent
ecd6d85155
commit
9f6f2df419
@@ -1,6 +1,6 @@
|
||||
--- lib/Date/Format.pm
|
||||
+++ lib/Date/Format.pm
|
||||
@@ -85,7 +85,7 @@
|
||||
--- lib/Date/Format.pm.orig 2009-09-19 09:04:02.000000000 -0700
|
||||
+++ lib/Date/Format.pm 2009-09-25 14:33:09.000000000 -0700
|
||||
@@ -83,7 +83,7 @@
|
||||
$tzname = sprintf("%+05d",$tzname)
|
||||
unless($tzname =~ /\D/);
|
||||
|
||||
@@ -9,7 +9,7 @@
|
||||
|
||||
@$me = gmtime($epoch + tz_offset($tzname) - tz_offset());
|
||||
}
|
||||
@@ -217,7 +217,7 @@
|
||||
@@ -215,7 +215,7 @@
|
||||
sub format_M { sprintf("%02d",$_[0]->[1]) }
|
||||
sub format_q { sprintf("%01d",int($_[0]->[4] / 3) + 1) }
|
||||
sub format_s {
|
||||
|
Reference in New Issue
Block a user