Subversion Repositories DevTools

Rev

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

Rev 391 Rev 1347
Line 222... Line 222...
222 
    }
 222 
    }
223 
    else
 223 
    else
224 
    {
 224 
    {
225 
        Message ("Package path : $svnPackageName");
 225 
        Message ("Package path : $svnPackageName");
226 
        Message ("Label        : $opt_label");
 226 
        Message ("Label        : $opt_label");
227 
        Message ("RM Reference : $svnRmRef");
 - 
 
228 
        Message ("VCS Tag      : SVN::$svnRmRef");
 227 
        Message ("VCS Tag      : SVN::$svnRmRef");
229 
    }
 228 
    }
230 
 
 229 
 
231 
    Warning ("Test Mode: Not Version Control System changes made") if ( $opt_test );
 230 
    Warning ("Test Mode: Not Version Control System changes made") if ( $opt_test );
232 
}
 231 
}
Line 588... Line 587...
588 
    }
 587 
    }
589 
    else
 588 
    else
590 
    {
 589 
    {
591 
        #
 590 
        #
592 
        #   Package exists
 591 
        #   Package exists
593 
        #   Hard bit: Need to merge the existign trunk with this version
 592 
        #   Hard bit: Need to merge the existing trunk with this version
594 
        #             and label the entire lot
 593 
        #             and label the entire lot
595 
        #   We already have a program to do that.
 594 
        #   We already have a program to do that.
596 
        #
 595 
        #
597 
        my $workdir = "$dest_root/SvnImport";
 596 
        my $workdir = "$dest_root/SvnImport";
598 
        my $datafile = "$dest_root/svnData.txt";
 597 
        my $datafile = "$dest_root/svnData.txt";