Parent Directory | Revision Log
skip repositories which can't be reindexed
1 | #!/usr/bin/perl -w |
2 | |
3 | # SVNBrowser indexer |
4 | # |
5 | # 12/04/06 22:19:20 CET Dobrica Pavlinusic <dpavlin@rot13.org> |
6 | |
7 | use strict; |
8 | |
9 | use lib 'lib'; |
10 | |
11 | use SVN::Log; |
12 | use Data::Dump qw/dump/; |
13 | |
14 | use Jifty; |
15 | use SVNBrowser::Indexer; |
16 | |
17 | BEGIN { Jifty->new }; |
18 | |
19 | my $repository = shift @ARGV || Jifty->config->app('repository'); |
20 | |
21 | my $system_user = SVNBrowser::CurrentUser->superuser; |
22 | |
23 | my $rep_col = SVNBrowser::Model::RepositoryCollection->new(current_user => $system_user); |
24 | $rep_col->unlimit; |
25 | while ( my $rep = $rep_col->next ) { |
26 | eval { |
27 | SVNBrowser::Indexer->reindex( $rep ); |
28 | }; |
29 | if ($@) { |
30 | warn "ERROR: cannot reindex repository ", $rep->uri; |
31 | } |
32 | } |
33 |
Name | Value |
---|---|
svn:executable |
ViewVC Help | |
Powered by ViewVC 1.1.26 |