TheCommands.hs

{-
 - Copyright (C) 2010 Joachim Breitner
 - 
 - This program is free software; you can redistribute it and/or modify
 - it under the terms of the GNU General Public License as published by
 - the Free Software Foundation; either version 2, or (at your option)
 - any later version.
 - 
 - This program is distributed in the hope that it will be useful,
 - but WITHOUT ANY WARRANTY; without even the implied warranty of
 - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 - GNU General Public License for more details.
 - 
 - You should have received a copy of the GNU General Public License
 - along with this program; see the file COPYING.  If not, write to
 - the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 - Boston, MA 02110-1301, USA.
 -}
module IPatch.TheCommands where

import Darcs.Commands ( CommandControl(CommandData, GroupName) )

import IPatch.Apply ( apply )
import IPatch.Split ( split )

commandControlList :: [CommandControl]
commandControlList =
    [ GroupName "Changing files"
    , CommandData apply
    , GroupName "Changing patches"
    , CommandData split
    ]