diff options
-rwxr-xr-x | utils/svn-testament.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/svn-testament.pl b/utils/svn-testament.pl index 17e697004..a1015e60e 100755 --- a/utils/svn-testament.pl +++ b/utils/svn-testament.pl @@ -78,7 +78,7 @@ $testament .= "#define GECOS \"$userinfo{GECOS}\"\n"; my $qroot = $root; $qroot =~ s/"/\\"/g; -my $hostname = $ENV{HOSTNAME}; +my $hostname = POSIX::uname()[1]; if ( !defined ( $hostname ) ) { # Try hostname command if env-var empty $hostname = `hostname`; |