[lazarus] New Bug found

[Jens Arm]

Hi

Start Lazarus, then choose Project/new Project. Then choose it a second 
time and you get a SEGFault:

TSourceNotebook.NewSe END
An unhandled exception occurred at 0x080FECFC :
A Component with name Project1 exists already
  0x080FECFC
  0x00000000
 
must be nil
Exiting ControlClick
must be nil
Exiting ControlClick
must be nil
Exiting ControlClick
 
Gtk-WARNING **: invalid cast from `(unknown)' to `GtkObject'
 
Gtk-WARNING **: invalid cast from `(unknown)' to `GtkObject'
 
Gtk-CRITICAL **: file gtkwidget.c: line 2725 (gtk_widget_event): 
assertion `GTK_IS_WIDGET (widget)' failed.
An unhandled exception occurred at 0x00000002 :
Access violation
  0x00000002
  0x00000000
  0x081719EC  main,  line 40 of lcllinux.pp
 
[TgtkObject.Destroy] WARNING: There are 174 unreleased DCs and 557 
unreleased GDIObjects
[TgtkObject.Destroy] WARNING: There are 8 messages left in the queue! 
I'll free them                                                          


cu Jens