diff --git a/designer/propedits.pp b/designer/propedits.pp
index b6b71141ec..3cce87ab8a 100644
--- a/designer/propedits.pp
+++ b/designer/propedits.pp
@@ -840,7 +840,7 @@ type
 
 implementation
 
-uses Dialogs, Math, ColumnDlg;
+uses Dialogs, ColumnDlg;
 
 
 const
diff --git a/ide/buildlazdialog.pas b/ide/buildlazdialog.pas
index 3b582ff46e..d43dad9949 100644
--- a/ide/buildlazdialog.pas
+++ b/ide/buildlazdialog.pas
@@ -321,6 +321,7 @@ end;
 
 procedure TConfigureBuildLazarusDlg.Save(Options: TBuildLazarusOptions);
 begin
+  if Options=nil then exit;
   Options.CleanAll:=CleanAllCheckBox.Checked;
   Options.BuildLCL:=IntToMakeMode(BuildLCLRadioGroup.ItemIndex);
   Options.BuildSynEdit:=IntToMakeMode(BuildSynEditRadioGroup.ItemIndex);
diff --git a/ide/compiler.pp b/ide/compiler.pp
index 5c8a68b062..ee028a29f0 100644
--- a/ide/compiler.pp
+++ b/ide/compiler.pp
@@ -78,8 +78,6 @@ end;
 {------------------------------------------------------------------------------}
 function TCompiler.Compile(AProject: TProject; BuildAll: boolean;
   const DefaultFilename: string): TModalResult;
-const
-  BufSize = 1024;
 var
   CmdLine : String;
   Abort : Boolean;
@@ -181,6 +179,9 @@ end.
 
 {
   $Log$
+  Revision 1.29  2002/03/28 00:11:04  lazarus
+  MG: removed unused
+
   Revision 1.28  2002/01/23 20:07:20  lazarus
   MG: added outputfilter
 
diff --git a/ide/wordcompletion.pp b/ide/wordcompletion.pp
index 59a063751a..0d6e2632f9 100644
--- a/ide/wordcompletion.pp
+++ b/ide/wordcompletion.pp
@@ -41,8 +41,6 @@ type
 
 implementation
 
-uses Strings, Math;
-
 type
   TCharType = (ctNone,ctWordBegin,ctWord);