add functions to access the VC_TREE data structure.:

This commit is contained in:
kestes%walrus.com 2002-12-10 19:49:27 +00:00
Родитель c2c5e2c6cf
Коммит cca7f87c8e
1 изменённых файлов: 38 добавлений и 2 удалений

Просмотреть файл

@ -29,8 +29,8 @@
# issue to work out.
# $Revision: 1.17 $
# $Date: 2002-05-10 21:21:07 $
# $Revision: 1.18 $
# $Date: 2002-12-10 19:49:27 $
# $Author: kestes%walrus.com $
# $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/default_conf/TreeData.pm,v $
# $Name: $
@ -206,6 +206,42 @@ $VERSION = '#tinder_version#';
);
sub TreeName2Root {
my ($treename) = @_;
my $root = $VC_TREE{$treename}{'root'};
return $root;
}
sub TreeName2Module {
my ($treename) = @_;
my $module = $VC_TREE{$treename}{'module'};
return $module;
}
sub TreeName2Branch {
my ($treename) = @_;
my $branch = $VC_TREE{$treename}{'branch'};
return $branch;
}
sub TreeName2DirPattern {
my ($treename) = @_;
my $dir_pattern = $VC_TREE{$treename}{'dir_pattern'};
return $dir_pattern;
}
sub TreeName2is_bonsai_default {
}
# We group trees into sets so that individual managers can get a page
# of all the projects they manage. This is a mapping from managers
# email address to the set of projects they are interested in. This