diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-08-22 16:14:12 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-08-22 16:14:12 -0400 |
| commit | 203148363f459635b1be40b8c6ed376073230dda (patch) | |
| tree | 422df5684fc77663c6a3c7fd601c1eff27b3758b /Git/Queue.hs | |
| parent | 4c73d77b42e97ad740d5731ad73c40a31c0c84f9 (diff) | |
split groups of related functions out of Utility
Diffstat (limited to 'Git/Queue.hs')
| -rw-r--r-- | Git/Queue.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Git/Queue.hs b/Git/Queue.hs index 0016be472..25b9ffad0 100644 --- a/Git/Queue.hs +++ b/Git/Queue.hs @@ -19,15 +19,15 @@ import System.IO import System.Cmd.Utils import Data.String.Utils import Control.Monad (forM_) -import Utility +import Utility.SafeCommand import Git {- An action to perform in a git repository. The file to act on - is not included, and must be able to be appended after the params. -} -data Action = Action { - getSubcommand :: String, - getParams :: [CommandParam] +data Action = Action + { getSubcommand :: String + , getParams :: [CommandParam] } deriving (Show, Eq, Ord) {- A queue of actions to perform (in any order) on a git repository, |