[squeak-dev] The Trunk: MorphicExtras-ar.46.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Sep 19 05:00:54 UTC 2009


Andreas Raab uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-ar.46.mcz

==================== Summary ====================

Name: MorphicExtras-ar.46
Author: ar
Time: 18 September 2009, 10:00:10 am
UUID: 9c189e26-a0c6-0240-8ce2-3434a380ebd9
Ancestors: MorphicExtras-ar.45

Project refactoring: Use MorphicProjects.

=============== Diff against MorphicExtras-ar.45 ===============

Item was changed:
  ----- Method: ProjectSorterMorph>>insertNewProject: (in category 'as yet unclassified') -----
  insertNewProject: evt
  
  	| newProj |
  
+ 	[newProj := MorphicProject openViewOn: nil.]
- 	[newProj := Project newMorphicOn: nil.]
  		on: ProjectViewOpenNotification
  		do: [ :ex | ex resume: false].	
  
  	EToyProjectDetailsMorph 
  		getFullInfoFor: newProj
  		ifValid: [
  			evt hand attachMorph: (self sorterMorphForProjectNamed: newProj name)
  		]
  		expandedFormat: false.
  
  
  !

Item was changed:
  ----- Method: InternalThreadNavigationMorph>>insertNewProject (in category 'navigation') -----
  insertNewProject
  
  	| newProj |
  
+ 	[newProj := MorphicProject openViewOn: nil.]
- 	[newProj := Project newMorphicOn: nil.]
  		on: ProjectViewOpenNotification
  		do: [ :ex | ex resume: false].	
  
  	EToyProjectDetailsMorph 
  		getFullInfoFor: newProj
  		ifValid: [self insertNewProjectActionFor: newProj]
  		expandedFormat: false.
  
  
  !

Item was changed:
  ----- Method: ProjectNavigationMorph>>newProject (in category 'the actions') -----
  newProject
  
+ 	MorphicProject openViewOn: nil
- 	Project newMorphicOn: nil
  !




More information about the Squeak-dev mailing list