#!/usr/local/bin/perl -w
use strict;
use VCP::Debug qw( :debug );
BEGIN { enable_debug ".*"; }
use VCP::MainBranchIdDB;
my $db = VCP::MainBranchIdDB->new( @ARGV ? ( StoreLoc => shift ) : () );
$db->open_existing_db;
$db->dump( \*STDOUT );
$db->close_db;
| # | Change | User | Description | Committed | |
|---|---|---|---|---|---|
| #1 | 6119 | Dimitry Andric | Create branch from //public/revml, changelist 5088, since I originally started making changes to this version. | ||
| //guest/perforce_software/revml/bin/dump_main_branch_id | |||||
| #2 | 2959 | John Fetkovich |
added dump method to lib/VCP/DB_File/sdbm.pm to dump keys => values from a sdbm file. removed similar code from bin/dump_head_revs, bin/dump_rev_map and bin/dump_main_branch_id and called this method instead. also made parse_files_and_revids_from_head_revs_db sub in TestUtils to use in test suites instead of parse_files_and_revids_from_p4_files et. al. |
||
| #1 | 2873 | Barrie Slaymaker | Add MainBranchIdDB and a dump util. | ||