David T. Lewis uploaded a new version of 39Deprecated to project The Trunk:
http://source.squeak.org/trunk/39Deprecated-dtl.15.mcz

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

Name: 39Deprecated-dtl.15
Author: dtl
Time: 23 November 2009, 5:14:39 am
UUID: 41d745e7-cef2-46db-8d2e-5da5209ed1c4
Ancestors: 39Deprecated-dtl.14

Eliminate class CurrentProjectRefactoring.
Package 39Deprecated is now empty.

=============== Diff against 39Deprecated-dtl.14 ===============

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>xxxCurrent (in category 'miscellaneous') -----
- xxxCurrent
- 
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^Project current!

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>exitCurrentProject (in category 'miscellaneous') -----
- exitCurrentProject
- "
- CurrentProjectRefactoring exitCurrentProject
- "
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^self xxxCurrent exit
- !

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>suppressFlapsString (in category 'flaps') -----
- suppressFlapsString
- 	"Answer a string characterizing whether flaps are suppressed 
- 	at the moment or not"
- 	
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^ (self currentFlapsSuppressed
- 		ifTrue: ['<no>']
- 		ifFalse: ['<yes>']), 'show shared tabs (F)' translated!

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>isFlapEnabled: (in category 'flaps') -----
- isFlapEnabled: aFlapTab
- 	"Answer whether the given flap tab is enabled in the current project"
- 	
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^ self xxxCurrent isFlapEnabled: aFlapTab!

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>currentFlapsSuppressed (in category 'flaps') -----
- currentFlapsSuppressed
- "
- CurrentProjectRefactoring currentFlapsSuppressed
- "
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^self xxxCurrent flapsSuppressed!

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>showSharedFlaps (in category 'flaps') -----
- showSharedFlaps
- 	"Answer whether shared flaps are currently showing (true) or suppressed (false).  The CurrentProjectRefactoring circumlocution is in service of making it possible for shared flaps to appear on the edges of an interior subworld, I believe."
- 	
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^ self xxxCurrent showSharedFlaps!

Item was removed:
- ----- Method: CurrentProjectRefactoring class>>currentToggleFlapsSuppressed (in category 'flaps') -----
- currentToggleFlapsSuppressed
- "
- CurrentProjectRefactoring currentToggleFlapsSuppressed
- "
- 	self deprecated: 'CurrentProjectRefactoring is deprecated'.
- 	
- 	^self xxxCurrent flapsSuppressed: self xxxCurrent flapsSuppressed not.
- 
- 
- !

Item was removed:
- Object subclass: #CurrentProjectRefactoring
- 	instanceVariableNames: ''
- 	classVariableNames: ''
- 	poolDictionaries: ''
- 	category: '39Deprecated'!