The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Cvs::Result::Commit - Result class for cvs commit command

SYNOPSIS

  my $commit = $cvs->commit
    ( { recursive => 0, message => 'bar', },
      'changed.txt' );

  my $old = $commit->old_revision;
  my $new = $commit->new_revision;

DESCRIPTION

Returns the old and new revisions of a previously checked-in file.

METHODS

old_revision

Returns the old revision of the file checked in. Will return undef if no change in version occurred.

new_revision

Returns the new revision of the file checked in. Will return undef if no change in version occurred.

SEE ALSO

Cvs::Command::Commit, Cvs, cvs(1).

AUTHOR

Steven Cotton <cotton@cpan.org>

LICENCE

This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version.

This library 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 Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

COPYRIGHT

Copyright (C) 2003 - Olivier Poitrey