Hello community,

here is the log from the commit of package ghc-file-embed for openSUSE:Factory 
checked in at 2016-01-28 17:24:30
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-file-embed (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-file-embed.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-file-embed"

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-file-embed/ghc-file-embed.changes    
2015-11-26 17:03:40.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.ghc-file-embed.new/ghc-file-embed.changes       
2016-01-28 17:25:30.000000000 +0100
@@ -1,0 +2,6 @@
+Fri Jan 22 08:46:18 UTC 2016 - mimi...@gmail.com
+
+- update to 0.0.9.1
+* embedStringFile
+
+-------------------------------------------------------------------

Old:
----
  file-embed-0.0.9.tar.gz

New:
----
  file-embed-0.0.9.1.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-file-embed.spec ++++++
--- /var/tmp/diff_new_pack.2xHCuS/_old  2016-01-28 17:25:30.000000000 +0100
+++ /var/tmp/diff_new_pack.2xHCuS/_new  2016-01-28 17:25:30.000000000 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-file-embed
 #
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -21,7 +21,7 @@
 %bcond_without tests
 
 Name:           ghc-file-embed
-Version:        0.0.9
+Version:        0.0.9.1
 Release:        0
 Summary:        Use Template Haskell to embed file contents directly
 License:        BSD-2-Clause

++++++ file-embed-0.0.9.tar.gz -> file-embed-0.0.9.1.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/file-embed-0.0.9/Data/FileEmbed.hs 
new/file-embed-0.0.9.1/Data/FileEmbed.hs
--- old/file-embed-0.0.9/Data/FileEmbed.hs      2015-08-14 06:52:02.000000000 
+0200
+++ new/file-embed-0.0.9.1/Data/FileEmbed.hs    2016-01-20 08:30:52.000000000 
+0100
@@ -3,7 +3,7 @@
 {-# LANGUAGE OverloadedStrings #-}
 -- | This module uses template Haskell. Following is a simplified explanation 
of usage for those unfamiliar with calling Template Haskell functions.
 --
--- The function @embedFile@ in this modules embeds a file into the exceutable
+-- The function @embedFile@ in this modules embeds a file into the executable
 -- that you can use it at runtime. A file is represented as a @ByteString@.
 -- However, as you can see below, the type signature indicates a value of type
 -- @Q Exp@ will be returned. In order to convert this into a @ByteString@, you
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/file-embed-0.0.9/file-embed.cabal 
new/file-embed-0.0.9.1/file-embed.cabal
--- old/file-embed-0.0.9/file-embed.cabal       2015-08-14 06:52:02.000000000 
+0200
+++ new/file-embed-0.0.9.1/file-embed.cabal     2016-01-20 08:30:52.000000000 
+0100
@@ -1,5 +1,5 @@
 name:            file-embed
-version:         0.0.9
+version:         0.0.9.1
 license:         BSD3
 license-file:    LICENSE
 author:          Michael Snoyman <mich...@snoyman.com>
@@ -32,7 +32,6 @@
     hs-source-dirs: test
     build-depends: base
                  , file-embed
-                 , HUnit
                  , filepath
 
 source-repository head
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/file-embed-0.0.9/test/main.hs 
new/file-embed-0.0.9.1/test/main.hs
--- old/file-embed-0.0.9/test/main.hs   2015-08-14 06:52:02.000000000 +0200
+++ new/file-embed-0.0.9.1/test/main.hs 2016-01-20 08:30:52.000000000 +0100
@@ -1,10 +1,15 @@
 {-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE OverloadedStrings #-}
 
+import Control.Monad (unless)
 import Data.FileEmbed
-import Test.HUnit ((@?=))
 import System.FilePath ((</>))
 
+infix 1 @?=
+
+(@?=) :: (Eq a, Show a) => a -> a -> IO ()
+actual @?= expected = unless (actual == expected) (error $ "expected: " ++ 
show expected ++ "\n but got: " ++ show actual)
+
 main :: IO ()
 main = do
     let received = $(embedDir "test/sample")


Reply via email to