- #!/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 chan...ges to this version. « | 17 years ago | |
//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 &nbs...p; 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. « |
22 years ago | |
#1 | 2873 | Barrie Slaymaker | Add MainBranchIdDB and a dump util. | 22 years ago |