Allow underscores in the Windows installation path. Fixes #5467

This commit is contained in:
Dave Page committed 2021-02-26 12:27:39 +00:00
1 parent 87b9549ff4
commit e8114b5dc6
2 files changed
+2 -1

No files matched your search

+1 -1
View File
@@ -161,7 +161,7 @@ begin
for I := 3 to Length(Path) do
begin
case Path[I] of
'0'..'9', 'A'..'Z', '\', ' ', '.', '-', '(', ')':
'0'..'9', 'A'..'Z', '\', ' ', '.', '-', '_', '(', ')':
else
begin
Ret := False;