mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-15 11:49:55 +02:00
fixed lazdoc options loading/saving
git-svn-id: trunk@7736 -
This commit is contained in:
parent
6a2d38bc49
commit
3b3c877682
@ -1146,7 +1146,9 @@ begin
|
||||
LoadPascalFileExt(Path+'');
|
||||
|
||||
//lazdoc
|
||||
FLazDocPathList.Text := XMLConfig.GetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
|
||||
if FLazDocPathList<>nil then
|
||||
FLazDocPathList.Text :=
|
||||
XMLConfig.GetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
|
||||
|
||||
if FileVersion>=103 then begin
|
||||
fCharcaseFileAction:=CharCaseFileActionNameToType(XMLConfig.GetValue(
|
||||
@ -1359,7 +1361,8 @@ begin
|
||||
AmbiguousFileActionNames[afaAsk]);
|
||||
|
||||
//lazdoc
|
||||
XMLConfig.SetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
|
||||
if FLazDocPathList<>nil then
|
||||
XMLConfig.SetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
|
||||
|
||||
// object inspector
|
||||
FObjectInspectorOptions.SaveBounds:=false;
|
||||
|
Loading…
Reference in New Issue
Block a user