1 -- Copyright (C) 2003 David Roundy
    2 --
    3 -- This program is free software; you can redistribute it and/or modify
    4 -- it under the terms of the GNU General Public License as published by
    5 -- the Free Software Foundation; either version 2, or (at your option)
    6 -- any later version.
    7 --
    8 -- This program is distributed in the hope that it will be useful,
    9 -- but WITHOUT ANY WARRANTY; without even the implied warranty of
   10 -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   11 -- GNU General Public License for more details.
   12 --
   13 -- You should have received a copy of the GNU General Public License
   14 -- along with this program; see the file COPYING.  If not, write to
   15 -- the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
   16 -- Boston, MA 02110-1301, USA.
   17 
   18 {-# LANGUAGE CPP #-}
   19 module Darcs.TheCommands ( command_control_list ) where
   20 
   21 import Darcs.Commands.Add ( add )
   22 import Darcs.Commands.AmendRecord ( amendrecord )
   23 import Darcs.Commands.Annotate ( annotate )
   24 import Darcs.Commands.Apply ( apply )
   25 import Darcs.Commands.Changes ( changes )
   26 import Darcs.Commands.Check ( check )
   27 import Darcs.Commands.Convert ( convert )
   28 import Darcs.Commands.Diff
   29 import Darcs.Commands.Dist ( dist )
   30 import Darcs.Commands.Get ( get, clone )
   31 import Darcs.Commands.GZCRCs ( gzcrcs )
   32 import Darcs.Commands.Init ( initialize )
   33 import Darcs.Commands.Show ( show_command, list, query )
   34 import Darcs.Commands.MarkConflicts ( markconflicts, resolve )
   35 import Darcs.Commands.Move ( move, mv )
   36 import Darcs.Commands.Optimize ( optimize )
   37 import Darcs.Commands.Pull ( pull )
   38 import Darcs.Commands.Push ( push )
   39 import Darcs.Commands.Put ( put )
   40 import Darcs.Commands.Record ( record, commit )
   41 import Darcs.Commands.Remove ( remove, rm, unadd )
   42 import Darcs.Commands.Repair ( repair )
   43 import Darcs.Commands.Replace ( replace )
   44 import Darcs.Commands.Revert ( revert )
   45 import Darcs.Commands.Rollback ( rollback )
   46 import Darcs.Commands.Send ( send )
   47 import Darcs.Commands.SetPref ( setpref )
   48 import Darcs.Commands.Tag ( tag )
   49 import Darcs.Commands.TrackDown ( trackdown )
   50 import Darcs.Commands.TransferMode ( transfer_mode )
   51 import Darcs.Commands.Unrecord ( unrecord, unpull, obliterate )
   52 import Darcs.Commands.Unrevert ( unrevert )
   53 import Darcs.Commands.WhatsNew ( whatsnew )
   54 import Darcs.Commands ( CommandControl(Command_data,Hidden_command,Group_name) )
   55 
   56 -- | The commands that darcs knows about (e.g. whatsnew, record),
   57 --   organized into thematic groups.  Note that hidden commands
   58 --   are also listed here.
   59 command_control_list :: [CommandControl]
   60 command_control_list = [Group_name "Changing and querying the working copy:",
   61                 Command_data add,
   62                 Command_data remove, Hidden_command unadd, Hidden_command rm,
   63                 Command_data move, Hidden_command mv,
   64                 Command_data replace,
   65                 Command_data revert,
   66                 Command_data unrevert,
   67                 Command_data whatsnew,
   68                 Group_name "Copying changes between the working copy and the repository:",
   69                 Command_data record, Hidden_command commit,
   70                 Command_data unrecord,
   71                 Command_data amendrecord,
   72                 Command_data markconflicts, Hidden_command resolve,
   73                 Group_name "Direct modification of the repository:",
   74                 Command_data tag,
   75                 Command_data setpref,
   76                 Group_name "Querying the repository:",
   77                 Command_data diff_command,
   78                 Command_data changes,
   79                 Command_data annotate,
   80                 Command_data dist,
   81                 Command_data trackdown,
   82                 Command_data show_command, Hidden_command list, Hidden_command query,
   83                 Hidden_command transfer_mode,
   84                 Group_name "Copying patches between repositories with working copy update:",
   85                 Command_data pull,
   86                 Command_data obliterate, Hidden_command unpull,
   87                 Command_data rollback,
   88                 Command_data push,
   89                 Command_data send,
   90                 Command_data apply,
   91                 Command_data get, Hidden_command clone,
   92                 Command_data put,
   93                 Group_name "Administrating repositories:",
   94                 Command_data initialize,
   95                 Command_data optimize,
   96                 Command_data check,
   97                 Command_data repair,
   98                 Command_data convert
   99                 ,Hidden_command gzcrcs
  100                ]