Hello community, here is the log from the commit of package ghc-file-embed for openSUSE:Factory checked in at 2018-08-04 21:53:58 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-file-embed (Old) and /work/SRC/openSUSE:Factory/.ghc-file-embed.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-file-embed" Sat Aug 4 21:53:58 2018 rev:8 rq:627276 version:0.0.11 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-file-embed/ghc-file-embed.changes 2018-07-24 17:18:45.899021270 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-file-embed.new/ghc-file-embed.changes 2018-08-04 21:53:58.973342531 +0200 @@ -1,0 +2,8 @@ +Tue Jul 31 14:10:04 UTC 2018 - [email protected] + +- Update file-embed to version 0.0.11. + ## 0.0.11 + + * embedDirListing [#26](https://github.com/snoyberg/file-embed/pull/26) + +------------------------------------------------------------------- Old: ---- file-embed-0.0.10.1.tar.gz New: ---- file-embed-0.0.11.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-file-embed.spec ++++++ --- /var/tmp/diff_new_pack.jjWzMK/_old 2018-08-04 21:53:59.517343549 +0200 +++ /var/tmp/diff_new_pack.jjWzMK/_new 2018-08-04 21:53:59.517343549 +0200 @@ -19,7 +19,7 @@ %global pkg_name file-embed %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.0.10.1 +Version: 0.0.11 Release: 0 Summary: Use Template Haskell to embed file contents directly License: BSD-2-Clause ++++++ file-embed-0.0.10.1.tar.gz -> file-embed-0.0.11.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/file-embed-0.0.10.1/ChangeLog.md new/file-embed-0.0.11/ChangeLog.md --- old/file-embed-0.0.10.1/ChangeLog.md 2017-09-14 11:42:06.000000000 +0200 +++ new/file-embed-0.0.11/ChangeLog.md 2018-07-29 09:19:51.000000000 +0200 @@ -1,3 +1,7 @@ +## 0.0.11 + +* embedDirListing [#26](https://github.com/snoyberg/file-embed/pull/26) + ## 0.0.10.1 * Minor doc improvements diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/file-embed-0.0.10.1/Data/FileEmbed.hs new/file-embed-0.0.11/Data/FileEmbed.hs --- old/file-embed-0.0.10.1/Data/FileEmbed.hs 2017-09-14 09:58:52.000000000 +0200 +++ new/file-embed-0.0.11/Data/FileEmbed.hs 2018-07-29 09:19:51.000000000 +0200 @@ -21,6 +21,7 @@ embedFile , embedOneFileOf , embedDir + , embedDirListing , getDir -- * Embed as a IsString , embedStringFile @@ -90,7 +91,7 @@ -- > import qualified Data.ByteString -- > -- > myFile :: Data.ByteString.ByteString --- > myFile = $(embedFile' [ "dirName/fileName", "src/dirName/fileName" ]) +-- > myFile = $(embedOneFileOf [ "dirName/fileName", "src/dirName/fileName" ]) embedOneFileOf :: [FilePath] -> Q Exp embedOneFileOf ps = (runIO $ readExistingFile ps) >>= \ ( path, content ) -> do @@ -118,6 +119,18 @@ e <- ListE <$> ((runIO $ fileList fp) >>= mapM (pairToExp fp)) return $ SigE e typ +-- | Embed a directory listing recursively in your source code. +-- +-- > myFiles :: [FilePath] +-- > myFiles = $(embedDirListing "dirName") +-- +-- @since 0.0.11 +embedDirListing :: FilePath -> Q Exp +embedDirListing fp = do + typ <- [t| [FilePath] |] + e <- ListE <$> ((runIO $ fmap fst <$> fileList fp) >>= mapM strToExp) + return $ SigE e typ + -- | Get a directory tree in the IO monad. -- -- This is the workhorse of 'embedDir' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/file-embed-0.0.10.1/README.md new/file-embed-0.0.11/README.md --- old/file-embed-0.0.10.1/README.md 2016-04-21 09:42:57.000000000 +0200 +++ new/file-embed-0.0.11/README.md 2018-07-24 07:28:07.000000000 +0200 @@ -1,4 +1,8 @@ ## file-embed +[](https://travis-ci.org/snoyberg/file-embed) +[](https://ci.appveyor.com/project/snoyberg/file-embed/branch/master) + + Use Template Haskell to read a file or all the files in a directory, and turn them into (path, bytestring) pairs embedded in your haskell code. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/file-embed-0.0.10.1/file-embed.cabal new/file-embed-0.0.11/file-embed.cabal --- old/file-embed-0.0.10.1/file-embed.cabal 2017-09-14 11:42:00.000000000 +0200 +++ new/file-embed-0.0.11/file-embed.cabal 2018-07-29 09:19:51.000000000 +0200 @@ -1,5 +1,5 @@ name: file-embed -version: 0.0.10.1 +version: 0.0.11 license: BSD3 license-file: LICENSE author: Michael Snoyman <[email protected]> diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/file-embed-0.0.10.1/test/main.hs new/file-embed-0.0.11/test/main.hs --- old/file-embed-0.0.10.1/test/main.hs 2016-04-21 09:42:57.000000000 +0200 +++ new/file-embed-0.0.11/test/main.hs 2018-07-24 10:27:36.000000000 +0200 @@ -18,4 +18,4 @@ , ("bar" </> "baz", "baz\r\n") ] let str = $(embedStringFile "test/sample/foo") :: String - str @?= "foo\r\n" + filter (/= '\r') str @?= "foo\n"
