music-util 0.15 → 0.16
raw patch · 2 files changed
+31/−29 lines, 2 files
Files
- music-util.cabal +1/−1
- src/music-util.hs +30/−28
music-util.cabal view
@@ -1,6 +1,6 @@ name: music-util-version: 0.15+version: 0.16 cabal-version: >= 1.10 author: Hans Hoglund maintainer: Hans Hoglund <hans@hanshoglund.se>
src/music-util.hs view
@@ -1,5 +1,5 @@ -{-# LANGUAGE OverloadedStrings, ViewPatterns, CPP #-}+{-# LANGUAGE OverloadedStrings, ViewPatterns, CPP, NoMonomorphismRestriction #-} import Control.Applicative import Control.Exception (SomeException, try)@@ -200,39 +200,41 @@ usage :: Sh () usage = do- echo $ "usage: music-util <command> [<args>]"+ echo $ red "USAGE:" <> " music-util " <> "<command>" <> " " <> "[args]" echo $ ""- echo $ "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"- echo $ "Please note: `music-util` is a utility program for Music Suite"- echo $ "development. If you just want to install the suite, simply type"+ echo $ yellow "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"+ echo $ yellow "Please note: `music-util` is a utility for Music Suite developers."+ echo $ yellow "If you just want to install Music Suite, simply type:" echo $ ""- echo $ " cabal install music-suite"+ echo $ yellow " cabal install music-suite" echo $ ""- echo $ "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"+ echo $ yellow "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" echo $ ""- echo $ "Commands:"- echo $ " repl Start a GHCI session with the development version of the suite"- echo $ " list Show a list all packages in the Music Suite"- echo $ " graph Show a graph all packages in the Music Suite (requires Graphviz)"- echo $ " setup Download all packages and setup sandbox"- echo $ " setup clone Download all packages"- echo $ " setup sandbox Setup the sandbox"- echo $ " grep <expr> [opts] Search in the Music Suite source code"- echo $ " test [opts] Run unit tests"- echo $ " foreach <command> Run a command in each source directory"- echo $ " In <command> you can use MUSIC_PACKAGE in place of the"- echo $ " name of the current package, i.e `foreach echo MUSIC_PACKAGE`"- echo $ " package-path Print a suitable GHC_PACKAGE_PATH value for use with runhaskell etc"- echo $ " document Generate and upload documentation"- echo $ " --no-api Skip creating the API documentation"- echo $ " --no-reference Skip creating the reference documentation"- echo $ " --upload Upload to server"+ echo $ red "COMMANDS:"+ echo $ " repl Start a GHCI session with the development version of the suite"+ echo $ " test [opts] Run unit tests"+ echo $ " grep <expr> [opts] Search in the Music Suite source code"+ echo $ " list Show a list all packages in the Music Suite"+ echo $ " graph Show a graph all packages in the Music Suite (requires Graphviz)"+ echo $ " foreach <command> Run a command in each source directory"+ echo $ " In <command> you can use MUSIC_PACKAGE in place of the"+ echo $ " name of the current package, i.e `foreach echo MUSIC_PACKAGE`" echo $ ""- echo $ "Deprecated commands:"- echo $ " install <package> Reinstall the given package and its dependencies"+ echo $ " setup Download all packages and setup sandbox"+ echo $ " setup clone Download all packages"+ echo $ " setup sandbox Setup the sandbox"+ echo $ " package-path Print a suitable GHC_PACKAGE_PATH value for use with runhaskell etc" echo $ ""- echo $ "Deprecated flags:"- echo $ " document --local (does nothing)"+ echo $ " document Generate and upload documentation"+ echo $ " --no-api Skip creating the API documentation"+ echo $ " --no-reference Skip creating the reference documentation"+ echo $ " --upload Upload to server"+ echo $ ""+ echo $ red "DEPRECATED COMMANDS:"+ echo $ " install <package> Reinstall the given package and its dependencies"+ echo $ ""+ echo $ red "DEPRECATED FLAGS:"+ echo $ " document --local" printVersion :: [String] -> Sh () printVersion _ = do