Revision: 8865 https://osdn.net/projects/ttssh2/scm/svn/commits/8865 Author: zmatsuo Date: 2020-07-29 23:39:32 +0900 (Wed, 29 Jul 2020) Log Message: ----------- リビジョン番号の取得に失敗することがあったので修正 Modified Paths: -------------- trunk/svnrev_perl/svnrev.pl -------------- next part -------------- Modified: trunk/svnrev_perl/svnrev.pl =================================================================== --- trunk/svnrev_perl/svnrev.pl 2020-07-27 15:28:08 UTC (rev 8864) +++ trunk/svnrev_perl/svnrev.pl 2020-07-29 14:39:32 UTC (rev 8865) @@ -20,7 +20,7 @@ if (-d "$source_root/.svn") { # svn infoを実行、出力をすべて取り込む - if (!open(my $FD, "-|", "$svn info $source_root 2>&1")) { + if (!open(my $FD, "-|", "\"$svn\" info $source_root 2>&1")) { # svn が実行できない print "'$svn' can not execute\n"; }