mmsyn7ukr 0.12.0.1 → 0.12.0.2
raw patch · 4 files changed
+7/−4 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- ChangeLog.md +4/−0
- Main.hs +1/−1
- Processing_mmsyn7ukr.hs +1/−2
- mmsyn7ukr.cabal +1/−1
ChangeLog.md view
@@ -180,3 +180,7 @@ ## 0.12.0.1 -- 2020-01-29 * Twelfth version revised A. Some documentation improvements.++## 0.12.0.2 -- 2020-01-29++* Twelfth version revised B. Fixed issue with possible zero input for the sox noise reduction. Now the result is replaced with 0.01. Some documentation improvements.
Main.hs view
@@ -36,5 +36,5 @@ putStr "list-of-produced-sound-representations (if any) -- a list of sound representations, which the program will try to produce while being executed. " putStrLn "The default one (if not specified) is a full range of needed sound representations. " "-v" -> do- putStrLn "mmsyn7ukr version: 0.12.0.0"+ putStrLn "mmsyn7ukr version: 0.12.0.2" _ -> main7ukr args
Processing_mmsyn7ukr.hs view
@@ -3,7 +3,6 @@ -- Copyright : (c) OleksandrZhabenko 2019-2020 -- License : MIT -- Stability : Experimental--- -- Maintainer : olexandr543@yahoo.com -- -- A program and a library that can be used as a simple @@ -275,7 +274,7 @@ s2 <- onException (do let s1 = take 1 actsctrl sr = "0." ++ (filter isDigit . drop 1 $ actsctrl)- s = read sr::Double in return s) (return 0.5)+ s = read sr::Double in if s > 0.0 then return s else return 0.01) (return 0.5) (code, _, _) <- readProcessWithExitCode (fromJust (showE "sox")) ["x.wav", "_x.wav", "noisered", "nx0.wav.b.prof", showFFloat (Just 4) s2 $ show 0] "" if code /= ExitSuccess then do
mmsyn7ukr.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: mmsyn7ukr-version: 0.12.0.1+version: 0.12.0.2 synopsis: A simple basic interface to some SoX functionality or to produce a voice that can be used by mmsyn7h description: A program and a library that can be used as a simple basic interface to some SoX functionality or to produce your voice in Ukrainian (if you pronounce the sounds properly) represented by the separate sounds or something special like soft sign. homepage: https://hackage.haskell.org/package/mmsyn7ukr