lsfrom 0.1.1 → 0.1.1.1

raw patch · 6 files changed

+21/−5 lines, 6 filesdep ~simple-cmd

Dependency ranges changed: simple-cmd

Files

• ChangeLog.md +4/−0
• lsfrom.cabal +5/−4
• test/files/A +0/−0
• test/files/B +0/−0
• test/files/C +0/−0
• test/tests.hs +12/−1

@@ -1,5 +1,9 @@ # Release history for lsfrom +## 0.1.1.1 (2022-04-24)+- add missing test files+- fix testsuite for lts 12 and earlier+ ## 0.1.1 (2022-04-24) - use `ls -A` - improve documentation

@@ -1,5 +1,5 @@ name:                lsfrom-version:             0.1.1+version:             0.1.1.1 synopsis:            List directory files starting from a specific name description:             `lsfrom` lists the contents of a directory starting from@@ -20,6 +20,9 @@ cabal-version:       1.18 extra-doc-files:     ChangeLog.md                      README.md+extra-source-files:  test/files/A+                     test/files/B+                     test/files/C  source-repository head   type:                git@@ -59,7 +62,5 @@   build-depends: base >= 4 && < 5                , directory >= 1.2.3.0                , filepath-               , simple-cmd+               , simple-cmd >= 0.1.1   build-tools:   lsfrom-  if impl(ghc < 8.0)-    buildable:     False

@@ -1,9 +1,11 @@+{-# LANGUAGE CPP #-}+ import Control.Monad import SimpleCmd import System.Directory  lsfrom :: (FilePath, String, [String]) -> IO ()-lsfrom (dir, arg,expect) = do+lsfrom (dir, arg, expect) = do   out <- withCurrentDirectory dir $          cmdLines "lsfrom" [arg]   unless (out == expect) $ do@@ -22,3 +24,12 @@ main = do   mapM_ lsfrom tests   putStrLn $ show (length tests) ++ " tests run"++#if !MIN_VERSION_simple_cmd(0,1,4)+error' :: String -> a+#if MIN_VERSION_base(4,9,0)+error' = errorWithoutStackTrace+#else+error' = error+#endif+#endif