prettyPrintReports :: String
                   -> SMTPReports 
                   -> String
prettyPrintReports indentation rs = intercalate "\n" $
    map (prettyPrintReport indentation) (reverse $ smtpReports rs)
prettyPrintReports :: String
                   -> SMTPReports 
                   -> String
prettyPrintReports indentation rs = intercalate "\n" $
    map (prettyPrintReport indentation) (reverse $ smtpReports rs)
prettyPrintReports indentation rs = intercalate "\n" $
    map (prettyPrintReport indentation) (reverse $ smtpReports rs)