fixed access violation when freeing the environment options

git-svn-id: trunk@7753 -
This commit is contained in:
vincents 2005-09-20 10:00:24 +00:00
parent e48c5f8f8b
commit aff5ce1ef0

View File

@ -2431,7 +2431,7 @@ begin
PascalFileExtension:=petPAS;
//lazdoc
LazDocPathList := LazDocListBox.Items;
LazDocPathList.Assign(LazDocListBox.Items);
CharcaseFileAction := TCharCaseFileAction(CharcaseFileActionRadioGroup.ItemIndex);
AmbiguousFileAction := TAmbiguousFileAction(AmbiguousFileActionRadioGroup.ItemIndex);