Subversion Repositories DevTools

Rev

Rev 341 | Rev 351 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 341 Rev 349
Line 546... Line 546...
546 
        $data->setProperty('Label', $tag_label);
 546 
        $data->setProperty('Label', $tag_label);
547 
        $data->setProperty('WipLabel', $opt_wiplabel ) if $opt_wiplabel;
 547 
        $data->setProperty('WipLabel', $opt_wiplabel ) if $opt_wiplabel;
548 
        $data->setProperty('PackageName', $opt_pname);
 548 
        $data->setProperty('PackageName', $opt_pname);
549 
        $data->setProperty('PackageVersion', $opt_pversion);
 549 
        $data->setProperty('PackageVersion', $opt_pversion);
550 
        $data->setProperty('clearcase.branch', $opt_branch);
 550 
        $data->setProperty('clearcase.branch', $opt_branch);
551 
        $data->setProperty('VCS.tag', 'CC::' . $ccpath . '::' . $tag_label);
 551 
        $data->setProperty('VCS.tag', 'CC::/' . $ccpath . '::' . $tag_label);
552 
 
 552 
 
553 
        $data->Dump('InfoFile') if ($opt_verbose);
 553 
        $data->Dump('InfoFile') if ($opt_verbose);
554 
        $data->store( $opt_infofile );
 554 
        $data->store( $opt_infofile );
555 
    }
 555 
    }
556 
}
 556 
}