Hello community,
here is the log from the commit of package hlint for openSUSE:Factory checked
in at 2015-06-02 10:06:18
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/hlint (Old)
and /work/SRC/openSUSE:Factory/.hlint.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "hlint"
Changes:
--------
--- /work/SRC/openSUSE:Factory/hlint/hlint.changes 2015-05-21
08:38:34.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.hlint.new/hlint.changes 2015-06-02
10:06:19.000000000 +0200
@@ -1,0 +2,8 @@
+Sun May 31 20:20:29 UTC 2015 - mimi...@gmail.com
+
+- update to 1.9.21
+* ignore a BOM if it exists
+* don't find files starting with . when searching directories
+* Suggest concat even if the [] is written ""
+
+-------------------------------------------------------------------
Old:
----
hlint-1.9.20.tar.gz
New:
----
hlint-1.9.21.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ hlint.spec ++++++
--- /var/tmp/diff_new_pack.SaoFhr/_old 2015-06-02 10:06:20.000000000 +0200
+++ /var/tmp/diff_new_pack.SaoFhr/_new 2015-06-02 10:06:20.000000000 +0200
@@ -20,7 +20,7 @@
# no useful debuginfo for Haskell packages without C sources
%global debug_package %{nil}
Name: hlint
-Version: 1.9.20
+Version: 1.9.21
Release: 0
Summary: Source code suggestions
License: BSD-3-Clause
++++++ hlint-1.9.20.tar.gz -> hlint-1.9.21.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/hlint-1.9.20/CHANGES.txt new/hlint-1.9.21/CHANGES.txt
--- old/hlint-1.9.20/CHANGES.txt 2015-04-21 12:27:15.000000000 +0200
+++ new/hlint-1.9.21/CHANGES.txt 2015-05-26 11:47:36.000000000 +0200
@@ -1,5 +1,9 @@
Changelog for HLint
+1.9.21
+ #130, ignore a BOM if it exists
+ #128, don't find files starting with . when searching directories
+ Suggest concat even if the [] is written ""
1.9.20
#122, fix the zipWith/repeat hint
1.9.19
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/hlint-1.9.20/data/Default.hs
new/hlint-1.9.21/data/Default.hs
--- old/hlint-1.9.20/data/Default.hs 2015-04-21 12:27:15.000000000 +0200
+++ new/hlint-1.9.21/data/Default.hs 2015-05-26 11:47:36.000000000 +0200
@@ -108,7 +108,9 @@
-- error = take (length x - 1) x ==> init x -- not true for x == []
error = isPrefixOf (reverse x) (reverse y) ==> isSuffixOf x y
error = foldr (++) [] ==> concat
+error = foldr (++) "" ==> concat
error = foldl (++) [] ==> concat where note = IncreasesLaziness
+error = foldl (++) "" ==> concat where note = IncreasesLaziness
error = foldl f (head x) (tail x) ==> foldl1 f x
error = foldr f (last x) (init x) ==> foldr1 f x
error = span (not . p) ==> break p
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/hlint-1.9.20/hlint.cabal new/hlint-1.9.21/hlint.cabal
--- old/hlint-1.9.20/hlint.cabal 2015-04-21 12:27:15.000000000 +0200
+++ new/hlint-1.9.21/hlint.cabal 2015-05-26 11:47:36.000000000 +0200
@@ -1,7 +1,7 @@
cabal-version: >= 1.6
build-type: Simple
name: hlint
-version: 1.9.20
+version: 1.9.21
license: BSD3
license-file: LICENSE
category: Development
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/hlint-1.9.20/src/CmdLine.hs
new/hlint-1.9.21/src/CmdLine.hs
--- old/hlint-1.9.20/src/CmdLine.hs 2015-04-21 12:27:15.000000000 +0200
+++ new/hlint-1.9.21/src/CmdLine.hs 2015-05-26 11:47:36.000000000 +0200
@@ -210,9 +210,10 @@
getFile (p:ath) exts file = do
isDir <- doesDirectoryExist $ p <\> file
if isDir then do
- let avoid x = let y = takeFileName x in "_" `isPrefixOf` y || ("."
`isPrefixOf` y && not (all (== '.') y))
- xs <- listFilesInside (return . not . avoid) $ p <\> file
- return [x | x <- xs, drop 1 (takeExtension x) `elem` exts]
+ let avoidDir x = let y = takeFileName x in "_" `isPrefixOf` y || ("."
`isPrefixOf` y && not (all (== '.') y))
+ avoidFile x = let y = takeFileName x in "." `isPrefixOf` y
+ xs <- listFilesInside (return . not . avoidDir) $ p <\> file
+ return [x | x <- xs, drop 1 (takeExtension x) `elem` exts, not $
avoidFile x]
else do
isFil <- doesFileExist $ p <\> file
if isFil then return [p <\> file]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/hlint-1.9.20/src/HSE/All.hs
new/hlint-1.9.21/src/HSE/All.hs
--- old/hlint-1.9.20/src/HSE/All.hs 2015-04-21 12:27:15.000000000 +0200
+++ new/hlint-1.9.21/src/HSE/All.hs 2015-05-26 11:47:36.000000000 +0200
@@ -67,6 +67,7 @@
parseModuleEx :: ParseFlags -> FilePath -> Maybe String -> IO (Either
ParseError (Module SrcSpanInfo, [Comment]))
parseModuleEx flags file str = do
str <- maybe (readFileEncoding (encoding flags) file) return str
+ str <- return $ fromMaybe str $ stripPrefix "\65279" str -- remove the
BOM if it exists, see #130
ppstr <- runCpp (cppFlags flags) file str
case parseFileContentsWithComments (mode flags) ppstr of
ParseOk (x, cs) -> return $ Right (applyFixity fixity x, cs)
