steeloverseer 0.1.0.1 → 0.1.0.2
raw patch · 3 files changed
+30/−3 lines, 3 filesdep ~basedep ~fsnotifydep ~text
Dependency ranges changed: base, fsnotify, text
Files
- src/ANSIColors.hs +26/−0
- src/Main.hs +1/−1
- steeloverseer.cabal +3/−2
+ src/ANSIColors.hs view
@@ -0,0 +1,26 @@+module ANSIColors where++data ANSIColor = ANSIBlack | ANSIRed | ANSIGreen | ANSIYellow | ANSIBlue | ANSIMagenta | ANSICyan | ANSIWhite | ANSINone+ deriving (Ord, Eq)++instance Show ANSIColor where+ show ANSINone = "\27[0m" + show c = "\27[" ++ show cn ++ "m"+ where cn = 30 + colorNum c ++colorNum :: ANSIColor -> Int+colorNum c = length $ takeWhile (/= c) ansibow ++ansibow :: [ANSIColor]+ansibow = [ ANSIBlack+ , ANSIRed+ , ANSIGreen+ , ANSIYellow+ , ANSIBlue+ , ANSIMagenta+ , ANSICyan+ , ANSIWhite + ]++colorString :: ANSIColor -> String -> String+colorString c s = show c ++ s ++ show ANSINone
src/Main.hs view
@@ -45,7 +45,7 @@ header = "Usage: sos [v] -c command -e file_extension" version :: String-version = intercalate "\n" [ "\nSteel Overseer 0.1.0.1"+version = intercalate "\n" [ "\nSteel Overseer 0.1.0.2" , " by Schell Scivally" , "" ]
steeloverseer.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: steeloverseer-version: 0.1.0.1+version: 0.1.0.2 synopsis: A tool that runs a list of commands after files change on disk. description: A command line tool that responds to changes in certain files by running specific commands. Similar to the codemonitor project but simpler and@@ -13,6 +13,7 @@ maintainer: efsubenovex@gmail.com stability: alpha bug-reports: https://github.com/schell/steeloverseer/issues+homepage: https://github.com/schell/steeloverseer copyright: Schell Scivally 2013 category: Development build-type: Simple@@ -26,7 +27,7 @@ ghc-options: -Wall -threaded hs-source-dirs: src main-is: Main.hs- other-modules: SOS+ other-modules: SOS, ANSIColors build-depends: base >=4.5 && < 5, fsnotify >=0.0.11, system-filepath >=0.4.7,