lang/pear/files/go-pear.php: use modern PHP syntax

Use modern PHP syntax which cause problem with PHP 8.

1 files changed, 2 insertions, 2 deletions

diff --git a/lang/pear/files/go-pear.php b/lang/pear/files/go-pear.php
index f6730a5ff59..1131bc31b3d 100644
--- a/lang/pear/files/go-pear.php
+++ b/lang/pear/files/go-pear.php
@@ -35,7 +35,7 @@
  * @author     Tias Guns <tias@ulyssis.org>
  */
 
-/* $NetBSD: go-pear.php,v 1.4 2011/08/20 14:02:29 taca Exp $ */
+/* $NetBSD: go-pear.php,v 1.5 2021/03/07 13:14:08 taca Exp $ */
 
 $sapi_name = php_sapi_name();
 
@@ -822,7 +822,7 @@ function which($program, $dont_search_in = false)
             if (!strlen($dir)) {
                 continue;
             }
-            if ($dir{strlen($dir) - 1} != '\\') {
+            if ($dir[strlen($dir) - 1] != '\\') {
                 $dir .= '\\';
             }
             $tmp = $dir . $program;