Resolving dependencies... Configuring mtl-2.2.1... Configuring network-2.6.3.1... Building mtl-2.2.1... Building network-2.6.3.1... Installed mtl-2.2.1 Configuring random-1.1... Building random-1.1... Configuring utf8-string-1.0.1.1... Installed random-1.1 Building utf8-string-1.0.1.1... Configuring text-1.2.2.1... Installed network-2.6.3.1 Building text-1.2.2.1... Installed utf8-string-1.0.1.1 Installed text-1.2.2.1 Configuring mime-0.4.0.2... Configuring parsec-3.1.11... Building mime-0.4.0.2... Building parsec-3.1.11... Configuring xml-1.3.14... Installed mime-0.4.0.2 Building xml-1.3.14... Installed parsec-3.1.11 Configuring network-uri-2.6.1.0... Building network-uri-2.6.1.0... Installed xml-1.3.14 Installed network-uri-2.6.1.0 Configuring HTTP-4000.3.4... Building HTTP-4000.3.4... Installed HTTP-4000.3.4 Configuring flickr-0.2... Building flickr-0.2... Failed to install flickr-0.2 Build log ( /home/builder/.cabal/logs/flickr-0.2.log ): cabal: Entering directory '/tmp/cabal-tmp-10184/flickr-0.2' Configuring flickr-0.2... Building flickr-0.2... Preprocessing library flickr-0.2... [ 1 of 34] Compiling Util.MIME ( Util/MIME.hs, dist/build/Util/MIME.o ) Util/MIME.hs:13:19: error: • Couldn't match expected type ‘MIMEParam’ with actual type ‘([Char], String)’ • In the expression: ("boundary", bou) In the ‘mimeParams’ field of a record In the expression: Type {mimeType = Multipart FormData, mimeParams = [("boundary", bou)]} Util/MIME.hs:23:49: error: • Couldn't match expected type ‘MIMEParam’ with actual type ‘([Char], [Char])’ • In the expression: ("boundary", boundary) In the ‘mimeParams’ field of a record In the ‘mime_val_type’ field of a record Util/MIME.hs:37:38: error: • Couldn't match type ‘[Char]’ with ‘text-1.2.2.1:Data.Text.Internal.Text’ Expected type: text-1.2.2.1:Data.Text.Internal.Text Actual type: String • In the first argument of ‘Name’, namely ‘nm’ In the expression: Name nm In the ‘dispParams’ field of a record Util/MIME.hs:37:51: error: • Couldn't match type ‘[Char]’ with ‘text-1.2.2.1:Data.Text.Internal.Text’ Expected type: text-1.2.2.1:Data.Text.Internal.Text Actual type: FilePath • In the first argument of ‘Filename’, namely ‘fp’ In the expression: Filename fp In the ‘dispParams’ field of a record Util/MIME.hs:43:46: error: • Couldn't match type ‘[Char]’ with ‘text-1.2.2.1:Data.Text.Internal.Text’ Expected type: TextType Actual type: [Char] • In the first argument of ‘Text’, namely ‘"plain"’ In the ‘mimeType’ field of a record In the ‘mime_val_type’ field of a record Util/MIME.hs:45:37: error: • Couldn't match type ‘[Char]’ with ‘text-1.2.2.1:Data.Text.Internal.Text’ Expected type: Content Actual type: String • In the first argument of ‘Single’, namely ‘ls’ In the ‘mime_val_content’ field of a record In the expression: nullMIMEValue {mime_val_type = Type {mimeType = Text "plain", mimeParams = []}, mime_val_disp = Just file_disp, mime_val_content = Single ls, mime_val_headers = [("Content-Transfer-Encoding", "binary"), ("Content-Length", show (length ls))], mime_val_inc_type = True} Util/MIME.hs:46:32: error: • Couldn't match expected type ‘MIMEParam’ with actual type ‘([Char], [Char])’ • In the expression: ("Content-Transfer-Encoding", "binary") In the ‘mime_val_headers’ field of a record In the expression: nullMIMEValue {mime_val_type = Type {mimeType = Text "plain", mimeParams = []}, mime_val_disp = Just file_disp, mime_val_content = Single ls, mime_val_headers = [("Content-Transfer-Encoding", "binary"), ("Content-Length", show (length ls))], mime_val_inc_type = True} Util/MIME.hs:47:32: error: • Couldn't match expected type ‘MIMEParam’ with actual type ‘([Char], String)’ • In the expression: ("Content-Length", show (length ls)) In the ‘mime_val_headers’ field of a record In the expression: nullMIMEValue {mime_val_type = Type {mimeType = Text "plain", mimeParams = []}, mime_val_disp = Just file_disp, mime_val_content = Single ls, mime_val_headers = [("Content-Transfer-Encoding", "binary"), ("Content-Length", show (length ls))], mime_val_inc_type = True} Util/MIME.hs:63:36: error: • Couldn't match type ‘MIMEParam’ with ‘([Char], [Char])’ Expected type: [([Char], [Char])] Actual type: [MIMEParam] • In the second argument of ‘lookup’, namely ‘(mimeParams (mime_val_type mv))’ In the expression: lookup "boundary" (mimeParams (mime_val_type mv)) In the expression: case lookup "boundary" (mimeParams (mime_val_type mv)) of { Just x -> crnl ++ '-' : '-' : x _ -> m } Util/MIME.hs:68:4: error: • Couldn't match type ‘text-1.2.2.1:Data.Text.Internal.Text’ with ‘[Char]’ Expected type: [(String, String)] Actual type: [([Char], text-1.2.2.1:Data.Text.Internal.Text)] • In the expression: withType $ withDisp (mime_val_headers mv) In the expression: (withType $ withDisp (mime_val_headers mv), (if True || null m then (crnl ++) else (\ x -> m ++ crnl ++ x)) (showMIMEContent marker (mime_val_content mv))) In the expression: let marker = case mimeType (mime_val_type mv) of { Multipart {} -> ... _ -> ... } in (withType $ withDisp (mime_val_headers mv), (if True || null m then (crnl ++) else (\ x -> m ++ crnl ++ x)) (showMIMEContent marker (mime_val_content mv))) Util/MIME.hs:68:15: error: • Couldn't match type ‘[Char]’ with ‘text-1.2.2.1:Data.Text.Internal.Text’ Expected type: [([Char], text-1.2.2.1:Data.Text.Internal.Text)] Actual type: [([Char], String)] • In the second argument of ‘($)’, namely ‘withDisp (mime_val_headers mv)’ In the expression: withType $ withDisp (mime_val_headers mv) In the expression: (withType $ withDisp (mime_val_headers mv), (if True || null m then (crnl ++) else (\ x -> m ++ crnl ++ x)) (showMIMEContent marker (mime_val_content mv))) Util/MIME.hs:68:25: error: • Couldn't match type ‘MIMEParam’ with ‘([Char], String)’ Expected type: [([Char], String)] Actual type: [MIMEParam] • In the first argument of ‘withDisp’, namely ‘(mime_val_headers mv)’ In the second argument of ‘($)’, namely ‘withDisp (mime_val_headers mv)’ In the expression: withType $ withDisp (mime_val_headers mv) Util/MIME.hs:83:38: error: • Couldn't match type ‘text-1.2.2.1:Data.Text.Internal.Text’ with ‘[Char]’ Expected type: String Actual type: Content • In the expression: s In an equation for ‘showMIMEContent’: showMIMEContent _marker (Single s) = s Util/MIME.hs:104:22: error: • Couldn't match type ‘text-1.2.2.1:Data.Text.Internal.Text’ with ‘[Char]’ Expected type: String Actual type: text-1.2.2.1:Data.Text.Internal.Text • In the expression: x In a case alternative: DispOther x -> x In the expression: case dt of { DispInline -> "inline" DispAttachment -> "attachment" DispFormData -> "form-data" DispOther x -> x } Util/MIME.hs:115:23: error: • Couldn't match expected type ‘[Char]’ with actual type ‘text-1.2.2.1:Data.Text.Internal.Text’ • In the first argument of ‘(++)’, namely ‘a’ In the expression: a ++ '=' : show b In a case alternative: OtherParam a b -> a ++ '=' : show b cabal: Leaving directory '/tmp/cabal-tmp-10184/flickr-0.2' cabal: Error: some packages failed to install: flickr-0.2 failed during the building phase. The exception was: ExitFailure 1