VCS::PVCS::Attributes - Attributes class for for VCS::PVCS
use VCS::PVCS::Project;
$proj = new VCS::PVCS::Project("ProjectName");
$members = $proj->members(".*");
foreach $f (@$members){
$attrs = $f->getAttributes();
print $attrs->Archive; # Archive name
print $attrs->Workfile; # Workfile name
print $attrs->Owner; # Owner of archive
print $attrs->Archive_created; # Date archive created
print $attrs->Last_trunk_rev; # Most recent trunk rev
print $attrs->Locks; # current locks on all versions
print $attrs->Groups; # current groups assoc with this archive
print $attrs->Rev_count; # number of revisions
print $attrs->Attributes; # attributes
print $attrs->Version_labels; # version labels on this archive
print $attrs->Description; # checkin description
print $attrs->history; # history and comments
}
This class is intended for use as an companion to the VCS::PVCS::* classes. The Archive objects inherits Attribute methods, and augment them.
print $attrs->getAttributes(1);
repopulate the attibutes object
print $attrs->Archive; # Archive name
print $attrs->Workfile; # Workfile name
print $attrs->Owner; # Owner of archive
print $attrs->Archive_created; # Date archive created
print $attrs->Last_trunk_rev; # Most recent trunk rev
print $attrs->Locks; # current locks on all versions
print $attrs->Groups; # current groups assoc with this archive
print $attrs->Rev_count; # number of revisions
print $attrs->Attributes; # attributes
print $attrs->Version_labels; # version labels on this archive
print $attrs->Description; # checkin description
print $attrs->history; # history and comments
The PVCS module is Copyright (c) 1998 Bill Middleton. All rights reserved.
You may distribute under the terms of either the GNU General Public License or the Artistic License, as specified in the Perl README file.
Bill Middleton, wjm@metronet.com
The VCS::PVCS modules are free software.
THEY COME WITHOUT WARRANTY OF ANY KIND.
Commercial support agreements for Perl can be arranged via The Perl Clinic. See http://www.perl.co.uk/tpc for more details.
