implemented saving global defines

git-svn-id: trunk@4102 -
This commit is contained in:
mattias 2003-04-27 21:25:23 +00:00
parent f4cb3c508e
commit 636f619d27

View File

@ -464,8 +464,9 @@ begin
FCursorBeyondEOL,true); FCursorBeyondEOL,true);
// Define templates // Define templates
FGlobalDefineTemplates.SaveToXMLConfig(XMLConfig,'CodeToolsGlobalDefines/', if FGlobalDefineTemplates<>nil then
true,false,true,false); FGlobalDefineTemplates.SaveToXMLConfig(XMLConfig,
'CodeToolsGlobalDefines/',true,false,true,false);
// CodeCreation // CodeCreation
XMLConfig.SetDeleteValue( XMLConfig.SetDeleteValue(
@ -518,7 +519,7 @@ begin
XMLConfig.Free; XMLConfig.Free;
except except
on E: Exception do begin on E: Exception do begin
writeln('[TCodeToolsOptions.Load] error writing "',FFilename,'": ',E.Message); writeln('[TCodeToolsOptions.Save] error writing "',FFilename,'": ',E.Message);
end; end;
end; end;
end; end;