mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-06 07:27:43 +01:00
LCL: Fix quote char in OpenDocument and SelectInFolder for Linux.
This commit is contained in:
parent
94951a82fd
commit
4164e5b669
@ -44,7 +44,7 @@ begin
|
||||
Exit(False);
|
||||
|
||||
if (APath<>'') and (APath[1]<>'"') then
|
||||
APath:=QuotedStr(APath);
|
||||
APath:=APath.QuotedString('"');
|
||||
RunCmdFromPath(lApp,APath);
|
||||
end;
|
||||
|
||||
@ -104,7 +104,7 @@ begin
|
||||
end;
|
||||
|
||||
if (FileParam <> '') and (FileParam[1] <> '"') then
|
||||
FileParam := QuotedStr(FileParam);
|
||||
FileParam := FileParam.QuotedString('"');
|
||||
RunCmdFromPath(lApp, SelParam + FileParam, []);
|
||||
Result := True;
|
||||
end;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user