adapt for use with more recent PHP

David R. Morrison · David R. Morrison · commit fc9933dda3f9 · 2006-07-20T15:05:51.000Z
diff --git a/bindist/bdindex b/bindist/bdindex
@@ -21,7 +21,7 @@ sub perdir {
       $new = $new . "\$excluded = array(\"current\", \"release\",\"README\");\n";
   }
   $new = $new . "\$symlinked = 0;\n";
-  $new = $new . "\$parts = split(\"/\", \$SCRIPT_NAME);\n";
+  $new = $new . "\$parts = split(\"/\", \$_SERVER[\'SCRIPT_NAME\']);\n";
   $new = $new . "if (\$parts[4] == \"release\" || \$parts[4] == \"current\") {\n";
   $new = $new . "  \$level++;\n  \$symlinked = 1;\n}\n";
   $new = $new . "include \"".("../"x$level)."index.php\";\n?>";

Original file line number	Diff line number	Diff line change
`@@ -21,7 +21,7 @@ sub perdir {`
`21`	`21`	`$new = $new . "\$excluded = array(\"current\", \"release\",\"README\");\n";`
`22`	`22`	`}`
`23`	`23`	`$new = $new . "\$symlinked = 0;\n";`
`24`		`- $new = $new . "\$parts = split(\"/\", \$SCRIPT_NAME);\n";`
	`24`	`+ $new = $new . "\$parts = split(\"/\", \$_SERVER[\'SCRIPT_NAME\']);\n";`
`25`	`25`	`$new = $new . "if (\$parts[4] == \"release\" \|\| \$parts[4] == \"current\") {\n";`
`26`	`26`	`$new = $new . " \$level++;\n \$symlinked = 1;\n}\n";`
`27`	`27`	`$new = $new . "include \"".("../"x$level)."index.php\";\n?>";`