Author: rhuijben
Date: Wed Feb 22 17:43:04 2012
New Revision: 1292414
URL: http://svn.apache.org/viewvc?rev=1292414&view=rev
Log:
* subversion/bindings/swig/perl/native/t/3client.t
Retrieve the username in a less platform dependant way if possible. This
fixes Windows usage. (And makes further errors visible).
Modified:
subversion/trunk/subversion/bindings/swig/perl/native/t/3client.t
Modified: subversion/trunk/subversion/bindings/swig/perl/native/t/3client.t
URL:
http://svn.apache.org/viewvc/subversion/trunk/subversion/bindings/swig/perl/native/t/3client.t?rev=1292414&r1=1292413&r2=1292414&view=diff
==============================================================================
--- subversion/trunk/subversion/bindings/swig/perl/native/t/3client.t (original)
+++ subversion/trunk/subversion/bindings/swig/perl/native/t/3client.t Wed Feb
22 17:43:04 2012
@@ -53,7 +53,7 @@ my $current_rev = 0;
$SVN::Error::handler = undef;
# Get username we are running as
-my $username = getpwuid($>);
+my $username = getlogin() || getpwuid($>);
# This is ugly to create the test repo with SVN::Repos, but
# it seems to be the most reliable way.
