Ignore:
Timestamp:
Apr 14, 2008, 2:07:36 AM (12 years ago)
Author:
bruno
Message:
  • Adds pb_cms_up and use it
  • Prepare a projects directory to host all projects using pb
File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/lib/ProjectBuilder/Base.pm

    r358 r383  
    3232
    3333our @ISA = qw(Exporter);
    34 our @EXPORT = qw(pb_env_init pb_conf_read pb_conf_read_if pb_conf_get pb_conf_get_if pb_cms_init pb_mkdir_p pb_system pb_rm_rf pb_get_filters pb_filter_file pb_filter_file_pb pb_filter_file_inplace pb_cms_export pb_cms_log pb_cms_isdiff pb_cms_copy pb_cms_checkout pb_get_date pb_log pb_log_init pb_get_pkg pb_cms_get_pkg pb_get_uri pb_cms_get_uri $debug $LOG);
     34our @EXPORT = qw(pb_env_init pb_conf_read pb_conf_read_if pb_conf_get pb_conf_get_if pb_cms_init pb_mkdir_p pb_system pb_rm_rf pb_get_filters pb_filter_file pb_filter_file_pb pb_filter_file_inplace pb_cms_export pb_cms_log pb_cms_isdiff pb_cms_copy pb_cms_checkout pb_cms_up pb_cms_checkin pb_get_date pb_log pb_log_init pb_get_pkg pb_cms_get_pkg pb_get_uri pb_cms_get_uri $debug $LOG);
    3535
    3636sub pb_env_init {
     
    13261326}
    13271327
    1328 sub pb_cms_checkin {
     1328sub pb_cms_up {
    13291329my $scheme = shift;
    13301330my $dir = shift;
    13311331
    1332 my $ver = basename($dir);
    13331332if ($scheme =~ /^svn/) {
    1334     pb_system("svn ci -m \"Updated to $ver\" $dir","Checking in $dir");
    13351333    pb_system("svn up $dir","Updating $dir");
    13361334} elsif ($scheme eq "flat") {
     
    13391337    die "cms $scheme unknown";
    13401338}
     1339}
     1340
     1341sub pb_cms_checkin {
     1342my $scheme = shift;
     1343my $dir = shift;
     1344
     1345my $ver = basename($dir);
     1346if ($scheme =~ /^svn/) {
     1347    pb_system("svn ci -m \"updated to $ver\" $dir","Checking in $dir");
     1348} elsif ($scheme eq "flat") {
     1349} elsif ($scheme =~ /^cvs/) {
     1350} else {
     1351    die "cms $scheme unknown";
     1352}
     1353pb_cms_up($scheme,$dir);
    13411354}
    13421355
Note: See TracChangeset for help on using the changeset viewer.