NAME

PANT::Cvs - PANT support for cvs operations

SYNOPSIS

  use PANT;

  $cvs = Cvs();
  $cvs->Run("cvs update");
  if ($cvs->HasUpdates()) {
    # increment version
    # run a build etc.
  }

ABSTRACT

  This is part of a module to help construct automated build environments.
  This part is for help processing Cvs operations.

DESCRIPTION

This module is part of a set to help run automated builds of a project and to produce a build log. This part is designed to provide support for cvs. Most cvs operations can be simply run as Command's from the main module, but occasionally you want to know if something has changed. For instance you may not want to run an auto build if nothing has changed since last time.

EXPORTS

None

METHODS

new($xml);

Constructor for a test object. Requires an XML::Writer object, which it will use for subsequent log construction. The PANT function Cvs calls this constructor with the current xml stream. So normally you would call it via the accessor.

Run(command)

This command will run the given cvs command, and will collect the output, pass it to the log stream, and analyse it too.

HasUpdate()

This is a boolean function that tells you if the last Run command detected any updates to the archive.

HasLocalMod()

This is a boolean function that tells you if the last Run command detected any local uncommitted updates to the the archive.

HasConflict()

This is a boolean function that tells you if the last Run command detected any conflicts.

SEE ALSO

Makes use of XML::Writer to construct the build log.

AUTHOR

Julian Onions, <julianonions@yahoo.nospam-co.uk>

COPYRIGHT AND LICENSE

Copyright 2005 by Julian Onions

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.