~svn/ubuntu/raring/subversion/ppa

« back to all changes in this revision

Viewing changes to contrib/client-side/svn-log.pl

  • Committer: Bazaar Package Importer
  • Author(s): Adam Conrad
  • Date: 2005-12-05 01:26:14 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20051205012614-qom4xfypgtsqc2xq
Tags: 1.2.3dfsg1-3ubuntu1
Merge with the final Debian release of 1.2.3dfsg1-3, bringing in
fixes to the clean target, better documentation of the libdb4.3
upgrade and build fixes to work with swig1.3_1.3.27.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!/usr/bin/perl
 
2
# Generate a nice log format for the Subversion repository.
 
3
  
 
4
use strict;
 
5
   
 
6
my $repos = shift @ARGV;
 
7
   
 
8
# Make sure we got all the arguments we wanted
 
9
if ((not defined $repos) or ($repos eq ''))
 
10
   {
 
11
       print "Usage: svn_logs.pl REPOS-PATH\n\n";
 
12
       exit;
 
13
   }
 
14
   
 
15
# Get the youngest revision in the repository.
 
16
my $youngest = `svnlook youngest $repos`;
 
17
chomp $youngest;    # don't want carriage return
 
18
die ("Error using svnlook to get youngest revision") if (not $youngest =~
 
19
/^\d/);
 
20
 
 
21
while ($youngest >= 1)
 
22
   {
 
23
       print "--------------------------------------------------------\n";
 
24
       print "Revision $youngest\n";
 
25
       print `svnlook info $repos -r $youngest`;
 
26
       print "\n";
 
27
       $youngest--;
 
28
   }
 
29