From b67196447f4f2c5eda6abf9ed97dc9c3a02c8fc4 Mon Sep 17 00:00:00 2001 From: "ribosome ribosome@31f1291d-b8d6-0310-a050-a5561fc1590b" Date: Sat, 3 Apr 2004 05:35:27 +0000 Subject: BUILD : 1.7.0 (26) BUGS : none NOTES : Testing svn access with a new am script. git-svn-id: svn://svn.anope.org/anope/trunk@26 31f1291d-b8d6-0310-a050-a5561fc1590b git-svn-id: http://anope.svn.sourceforge.net/svnroot/anope/trunk@17 5417fbe8-f217-4b02-8779-1006273d7864 --- bin/am | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'bin') diff --git a/bin/am b/bin/am index 5046d3d0a..14b6d8638 100755 --- a/bin/am +++ b/bin/am @@ -23,12 +23,14 @@ my $fhint="version.log"; # Default values, change or use environment variables instead. my $copy="anope"; +my $svnuser=""; my $svnpath="/usr/bin"; my $svnroot="svn://zero.org/repos/$copy"; my $editor="/usr/bin/vi"; # Environment variables SVNBINDIR and SVNROOT override the above # hardcoded values. +$svnuser="$ENV{SVNUSER}" if ($ENV{SVNUSER}); $svnpath="$ENV{SVNBINDIR}" if ($ENV{SVNBINDIR}); $svnroot="$ENV{SVNROOT}" if ($ENV{SVNROOT}); $editor="$ENV{EDITOR}" if ($ENV{EDITOR}); @@ -372,7 +374,7 @@ NOTES : "; close(OUT); print "*** Starting the upload...\n\n"; - my $rval=system("$svn commit $dst --message '$svn_comment'"); + my $rval=system("$svn commit $dst --username='$svnuser' --message '$svn_comment'"); if ( $rval ) { print "*** Error: Unable to complete commit. Rolling back....\n\n"; system("$svn revert $ctrlfile"); -- cgit