mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Use '$' for environment variable definition

Browse source
This commit is contained in:
Alexander Koblov 2010-09-25 07:15:45 +00:00
commit 5c3e3ca1bb
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/udcutils.pas
View file

@ -431,7 +431,11 @@ begin
for I:= 1 to X do
begin
EnvVarList.Add(mbGetEnvironmentString(I));
{$IFDEF UNIX}
Result:= StringReplace(Result, '$'+EnvVarList.Names[I-1], EnvVarList.ValueFromIndex[I-1], [rfReplaceAll, rfIgnoreCase]);
{$ELSE}
Result:= StringReplace(Result, '%'+EnvVarList.Names[I-1]+'%', EnvVarList.ValueFromIndex[I-1], [rfReplaceAll, rfIgnoreCase]);
{$ENDIF}
end;
FreeAndNil(EnvVarList);