diff --git a/TimeDate-deprecated_array_use.patch b/TimeDate-deprecated_array_use.patch
index cfbd396..a9f5fee 100644
--- a/TimeDate-deprecated_array_use.patch
+++ b/TimeDate-deprecated_array_use.patch
@@ -1,6 +1,5 @@
-diff -ruN TimeDate-1.20-orig/lib/Date/Format.pm TimeDate-1.20/lib/Date/Format.pm
---- TimeDate-1.20-orig/lib/Date/Format.pm	2009-12-12 12:30:06.000000000 +0000
-+++ TimeDate-1.20/lib/Date/Format.pm	2010-04-20 21:15:56.049364922 +0000
+--- 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/);
@@ -10,3 +9,12 @@ diff -ruN TimeDate-1.20-orig/lib/Date/Format.pm TimeDate-1.20/lib/Date/Format.pm
  
     @$me = gmtime($epoch + tz_offset($tzname) - tz_offset());
    }
+@@ -215,7 +215,7 @@
+ sub format_M { sprintf("%02d",$_[0]->[1]) }
+ sub format_q { sprintf("%01d",int($_[0]->[4] / 3) + 1) }
+ sub format_s { 
+-   $epoch = timegm(@{$_[0]}[0..5])
++   $epoch = timegm($_[0], $_[1], $_[2], $_[3], $_[4], $_[5] )
+ 	unless defined $epoch;
+    sprintf("%d",$epoch) 
+ }
diff --git a/perl-TimeDate.changes b/perl-TimeDate.changes
index 306f882..65651a2 100644
--- a/perl-TimeDate.changes
+++ b/perl-TimeDate.changes
@@ -1,17 +1,3 @@
--------------------------------------------------------------------
-Tue Apr 20 22:07:57 UTC 2010 - chris@computersalat.de
-
-- fix build
-  o reworked TimeDate-deprecated_array_use.patch (was for timegm)
-    removed obsolete part (timegm was replaced by timelocal)
-- cleanup spec
-  o add missing Url
-- fix deps for perl-macros
-- removed .packlist, perllocal.pod files
-  > noarch package
-- rpmlint
-  o script-without-shebang > 644
-
 -------------------------------------------------------------------
 Mon Apr 19 13:51:59 CEST 2010 - dmueller@suse.de
 
diff --git a/perl-TimeDate.spec b/perl-TimeDate.spec
index 8428945..85aaf89 100644
--- a/perl-TimeDate.spec
+++ b/perl-TimeDate.spec
@@ -25,16 +25,13 @@ Version:        1.20
 Release:        1
 License:        Artistic License ..
 Group:          Development/Libraries/Perl
-Url:            http://search.cpan.org/dist/TimeDate
+AutoReqProv:    on
 Source:         %{cpan_name}-%{version}.tar.gz
 Patch1:         %{cpan_name}-deprecated_array_use.patch
 Patch2:         %{cpan_name}-podfile-patch
-BuildArch:      noarch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 BuildRequires:  perl
-%if 0%{?suse_version} < 1120
 BuildRequires:  perl-macros
-%endif
 Requires:       perl = %{perl_version}
 Provides:       %{cpan_name}
 
@@ -58,12 +55,9 @@ Provides:       %{cpan_name}
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
-%patch1 -p1
+%patch1
 %patch2
 
-# script-without-shebang
-find -type f -exec chmod 0644 {} \;
-
 %build
 perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall"
 %{__make} %{?jobs:-j%jobs}
@@ -73,11 +67,7 @@ perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall"
 
 %install
 %perl_make_install
-# do not perl_process_packlist (noarch)
-# remove .packlist file
-%{__rm} -rf $RPM_BUILD_ROOT%perl_vendorarch
-# remove perllocal.pod file
-%{__rm} -rf $RPM_BUILD_ROOT%perl_archlib
+%perl_process_packlist
 %perl_gen_filelist
 
 %clean
@@ -86,6 +76,6 @@ perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall"
 %files -f %{name}.files
 # normally you only need to check for doc files
 %defattr(-,root,root)
-%doc ChangeLog README SIGNATURE
+%doc ChangeLog README
 
 %changelog