Dear List,
I made some improvement on MoosePanel. Instead of having a list of buttons, here is now a menu listing the import commands. We can now have more than 4 import commands without seeing buttons overlapping each other :-)
Apparently, we need an event mechanism for moose model addition and removal. For example, I added the method: -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= MooseModel>>delete <menuItem: 'Delete' category: 'Utilities'> | wantsToDelete | wantsToDelete := UIManager default confirm: 'Are you sure to want to delete ', self mooseName printString, '?'. wantsToDelete ifFalse: [ ^ self ]. MooseModel root remove: self -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Now the question is how to refresh the list of models in the MoosePanel when one deletes a model? I will add an announcement hierarchy.
Cheers, Alexandre