Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-zip-archive for openSUSE:Factory
checked in at 2024-04-21 20:29:38
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-zip-archive (Old)
and /work/SRC/openSUSE:Factory/.ghc-zip-archive.new.26366 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-zip-archive"
Sun Apr 21 20:29:38 2024 rev:24 rq:1169526 version:0.4.3.2
Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-zip-archive/ghc-zip-archive.changes
2024-03-20 21:16:41.067189807 +0100
+++
/work/SRC/openSUSE:Factory/.ghc-zip-archive.new.26366/ghc-zip-archive.changes
2024-04-21 20:30:54.033892236 +0200
@@ -1,0 +2,10 @@
+Tue Apr 9 16:45:10 UTC 2024 - Peter Simons <[email protected]>
+
+- Update zip-archive to version 0.4.3.2.
+ zip-archive 0.4.3.2
+
+ * readEntry: Fix computation of modification time (#67).
+ It should be a UNIX time (seconds since UNIX epoch), but
+ computed relative to the local time zone, not UTC.
+
+-------------------------------------------------------------------
Old:
----
zip-archive-0.4.3.1.tar.gz
New:
----
zip-archive-0.4.3.2.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-zip-archive.spec ++++++
--- /var/tmp/diff_new_pack.Vd6Nwh/_old 2024-04-21 20:30:54.553911326 +0200
+++ /var/tmp/diff_new_pack.Vd6Nwh/_new 2024-04-21 20:30:54.557911473 +0200
@@ -20,7 +20,7 @@
%global pkgver %{pkg_name}-%{version}
%bcond_with tests
Name: ghc-%{pkg_name}
-Version: 0.4.3.1
+Version: 0.4.3.2
Release: 0
Summary: Library for creating and modifying zip archives
License: BSD-3-Clause
++++++ zip-archive-0.4.3.1.tar.gz -> zip-archive-0.4.3.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/zip-archive-0.4.3.1/changelog
new/zip-archive-0.4.3.2/changelog
--- old/zip-archive-0.4.3.1/changelog 2001-09-09 03:46:40.000000000 +0200
+++ new/zip-archive-0.4.3.2/changelog 2001-09-09 03:46:40.000000000 +0200
@@ -1,3 +1,9 @@
+zip-archive 0.4.3.2
+
+ * readEntry: Fix computation of modification time (#67).
+ It should be a UNIX time (seconds since UNIX epoch), but
+ computed relative to the local time zone, not UTC.
+
zip-archive 0.4.3.1
* Use streaming decompress to identify extent of compressed data (#66).
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/zip-archive-0.4.3.1/src/Codec/Archive/Zip.hs
new/zip-archive-0.4.3.2/src/Codec/Archive/Zip.hs
--- old/zip-archive-0.4.3.1/src/Codec/Archive/Zip.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/zip-archive-0.4.3.2/src/Codec/Archive/Zip.hs 2001-09-09
03:46:40.000000000 +0200
@@ -72,8 +72,9 @@
import Data.Time.Calendar ( toGregorian, fromGregorian )
import Data.Time.Clock ( UTCTime(..) )
+import Data.Time.LocalTime ( TimeZone(..), TimeOfDay(..), timeToTimeOfDay,
+ getTimeZone )
import Data.Time.Clock.POSIX ( posixSecondsToUTCTime, utcTimeToPOSIXSeconds )
-import Data.Time.LocalTime ( TimeOfDay(..), timeToTimeOfDay )
import Data.Bits ( shiftL, shiftR, (.&.), (.|.), xor, testBit )
import Data.Binary
import Data.Binary.Get
@@ -85,7 +86,7 @@
import System.FilePath
import System.Directory
(doesDirectoryExist, getDirectoryContents,
- createDirectoryIfMissing, getModificationTime)
+ createDirectoryIfMissing, getModificationTime,)
import Control.Monad ( when, unless, zipWithM_ )
import qualified Control.Exception as E
import System.IO ( stderr, hPutStrLn )
@@ -315,7 +316,11 @@
return B.empty
else
B.fromStrict <$> S.readFile path
- modEpochTime <- (floor . utcTimeToPOSIXSeconds) <$> getModificationTime path
+ modTime <- getModificationTime path
+ tzone <- getTimeZone modTime
+ let modEpochTime = -- UNIX time computed relative to LOCAL time zone! (#67)
+ floor (utcTimeToPOSIXSeconds modTime) +
+ fromIntegral (timeZoneMinutes tzone * 60)
let entry = toEntry path' modEpochTime contents
entryE <-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/zip-archive-0.4.3.1/zip-archive.cabal
new/zip-archive-0.4.3.2/zip-archive.cabal
--- old/zip-archive-0.4.3.1/zip-archive.cabal 2001-09-09 03:46:40.000000000
+0200
+++ new/zip-archive-0.4.3.2/zip-archive.cabal 2001-09-09 03:46:40.000000000
+0200
@@ -1,5 +1,5 @@
Name: zip-archive
-Version: 0.4.3.1
+Version: 0.4.3.2
Cabal-Version: 2.0
Build-type: Simple
Synopsis: Library for creating and modifying zip archives.
