packages feed

b9 0.5.47 → 0.5.48

raw patch · 2 files changed

+8/−1 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

+ B9.Content.Generator: FromStrictBinary :: ByteString -> Content
+ B9.Content.Generator: packBinaryContent :: [Word8] -> Content

Files

b9.cabal view
@@ -1,5 +1,5 @@ name:                b9-version:             0.5.47+version:             0.5.48  synopsis:            A tool and library for building virtual machine images. 
src/lib/B9/Content/Generator.hs view
@@ -20,6 +20,7 @@ import           B9.Content.StringTemplate import           B9.Content.YamlObject import qualified Data.ByteString.Char8 as B+import qualified Data.ByteString as BStrict  import           Test.QuickCheck import           B9.QCUtil@@ -32,8 +33,13 @@     | FromString String     | FromTextFile SourceFile     | FromURL String+    | FromStrictBinary BStrict.ByteString     deriving (Read,Show,Typeable,Eq,Data,Generic) +-- | Pack bytes into a 'Content' such that a binary file will generated.+packBinaryContent :: [Word8] -> Content+packBinaryContent = FromStrictBinary . BStrict.pack+ instance Hashable Content instance Binary Content instance NFData Content@@ -50,6 +56,7 @@   render (RenderYaml ast) = encodeSyntax <$> fromAST ast   render (FromTextFile s) = readTemplateFile s   render (FromString str) = return (B.pack str)+  render (FromStrictBinary b) = return b   render (FromURL url) = lift $ do      dbgL $ "Downloading: " ++ url      (exitcode,out,err) <- liftIO $ readProcessWithExitCode "curl" [url] ""