Mercurial > hg > soundsoftware-site
annotate extra/svn/svnserve.wrapper @ 1022:f2ec92061fca browsing
Merge from live branch
author | Chris Cannam <chris.cannam@soundsoftware.ac.uk> |
---|---|
date | Tue, 13 Nov 2012 10:35:40 +0000 |
parents | 513646585e45 |
children |
rev | line source |
---|---|
Chris@0 | 1 #!/usr/bin/perl |
Chris@0 | 2 # |
Chris@0 | 3 # redMine is free software; you can redistribute it and/or |
Chris@0 | 4 # modify it under the terms of the GNU General Public License |
Chris@0 | 5 # as published by the Free Software Foundation; either version 2 |
Chris@0 | 6 # of the License, or (at your option) any later version. |
Chris@0 | 7 # |
Chris@0 | 8 # This program is distributed in the hope that it will be useful, |
Chris@0 | 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
Chris@0 | 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
Chris@0 | 11 # GNU General Public License for more details. |
Chris@0 | 12 # |
Chris@0 | 13 # You should have received a copy of the GNU General Public License |
Chris@0 | 14 # along with this program; if not, write to the Free Software |
Chris@0 | 15 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
Chris@0 | 16 |
Chris@0 | 17 # modify to suit your repository base |
Chris@0 | 18 my $repos_base = '/var/svn'; |
Chris@0 | 19 |
Chris@0 | 20 my $path = '/usr/bin/'; |
Chris@0 | 21 my %kwown_commands = map { $_ => 1 } qw/svnserve/; |
Chris@0 | 22 |
Chris@0 | 23 umask 0002; |
Chris@0 | 24 |
Chris@0 | 25 exec ('/usr/bin/svnserve', '-r', $repos_base, '-t'); |