[squeak-dev] The Trunk: 46Deprecated-mt.7.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Jan 8 08:12:30 UTC 2018


Marcel Taeumel uploaded a new version of 46Deprecated to project The Trunk:
http://source.squeak.org/trunk/46Deprecated-mt.7.mcz

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

Name: 46Deprecated-mt.7
Author: mt
Time: 8 January 2018, 9:12:32.321885 am
UUID: 3dff94ee-9c0e-4543-bb0b-3180b65f1695
Ancestors: 46Deprecated-eem.6

Makes some deprecations more clear with a helpful description.

=============== Diff against 46Deprecated-eem.6 ===============

Item was changed:
  ----- Method: ScrollPane>>alwaysShowHScrollBar: (in category '*46Deprecated') -----
  alwaysShowHScrollBar: bool
+ 
+ 	self deprecated: 'Use #hScrollBarPolicy: instead. Note that true means #always and false means #whenNeeded.'. 
+ 	
- 	self deprecated.
  	self setProperty: #hScrollBarAlways toValue: bool.
  
  	bool
  		ifTrue: [self hScrollBarPolicy: #always]
  		ifFalse: [self hScrollBarPolicy: #whenNeeded].
  		
  	self hHideOrShowScrollBar.
  !

Item was changed:
  ----- Method: ScrollPane>>alwaysShowScrollBars: (in category '*46Deprecated') -----
  alwaysShowScrollBars: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #vScrollBarPolicy: and #hScrollBarPolicy: instead. Note that true means #always and false means #whenNeeded.'. 	
- 	self deprecated. 
  	
  	self 
  		alwaysShowHScrollBar: bool;
  		alwaysShowVScrollBar: bool.
  !

Item was changed:
  ----- Method: ScrollPane>>alwaysShowVScrollBar: (in category '*46Deprecated') -----
  alwaysShowVScrollBar: bool
  
+ 	self deprecated: 'Use #vScrollBarPolicy: instead. Note that true means #always and false means #whenNeeded.'. 
- 	self deprecated. 
  	
  	self setProperty: #vScrollBarAlways toValue: bool.
  	
  	bool
  		ifTrue: [self vScrollBarPolicy: #always]
  		ifFalse: [self vScrollBarPolicy: #whenNeeded].
  	
  	self vHideOrShowScrollBar.
  !

Item was changed:
  ----- Method: ScrollPane>>hideHScrollBarIndefinitely: (in category '*46Deprecated') -----
  hideHScrollBarIndefinitely: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #hScrollBarPolicy: instead. Note that true means #never and false means #whenNeeded.'. 
- 	self deprecated. 
  	
  	self setProperty: #noHScrollBarPlease toValue: bool.
  	
  	bool
  		ifTrue: [self hScrollBarPolicy: #never]
  		ifFalse: [self hScrollBarPolicy: #whenNeeded].
  	
  	self hHideOrShowScrollBar.
  !

Item was changed:
  ----- Method: ScrollPane>>hideScrollBarsIndefinitely: (in category '*46Deprecated') -----
  hideScrollBarsIndefinitely: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #vScrollBarPolicy: and #hScrollBarPolicy: instead. Note that true means #never and false means #whenNeeded.'. 
- 	self deprecated.
  
  	self hideVScrollBarIndefinitely: bool.
  	self hideHScrollBarIndefinitely: bool.
  !

Item was changed:
  ----- Method: ScrollPane>>hideVScrollBarIndefinitely: (in category '*46Deprecated') -----
  hideVScrollBarIndefinitely: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #vScrollBarPolicy: instead. Note that true means #never and false means #whenNeeded.'. 
- 	self deprecated. 
  	
  	self setProperty: #noVScrollBarPlease toValue: bool.
  	
  	bool
  		ifTrue: [self vScrollBarPolicy: #never]
  		ifFalse: [self vScrollBarPolicy: #whenNeeded].
  	
  	self vHideOrShowScrollBar.
  !

Item was changed:
  ----- Method: ScrollPane>>showHScrollBarOnlyWhenNeeded: (in category '*46Deprecated') -----
  showHScrollBarOnlyWhenNeeded: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #hScrollBarPolicy: instead. Note that true means #whenNeeded and false means #never.'. 
- 	self deprecated.
  
  	self setProperty: #noHScrollBarPlease toValue: bool not.
  	self setProperty: #hScrollBarAlways toValue: bool not.
  	
  	bool
  		ifTrue: [self hScrollBarPolicy: #whenNeeded]
  		ifFalse: [self hScrollBarPolicy: #never].
  	
  	self hHideOrShowScrollBar.
  !

Item was changed:
  ----- Method: ScrollPane>>showScrollBarsOnlyWhenNeeded: (in category '*46Deprecated') -----
  showScrollBarsOnlyWhenNeeded: bool
  
+ 	self deprecated: 'Use #vScrollBarPolicy: and #hScrollBarPolicy: instead. Note that true means #whenNeeded and false means #never.'. 
- 	self deprecated. 
  	
  	self showHScrollBarOnlyWhenNeeded: bool.
  	self showVScrollBarOnlyWhenNeeded: bool.
  !

Item was changed:
  ----- Method: ScrollPane>>showVScrollBarOnlyWhenNeeded: (in category '*46Deprecated') -----
  showVScrollBarOnlyWhenNeeded: bool
  	"Get rid of scroll bar for short panes that don't want it shown."
  
+ 	self deprecated: 'Use #vScrollBarPolicy: instead. Note that true means #whenNeeded and false means #never.'. 
- 	self deprecated. 
  
  	self setProperty: #noVScrollBarPlease toValue: bool not.
  	self setProperty: #vScrollBarAlways toValue: bool not.
  	
  	bool
  		ifTrue: [self vScrollBarPolicy: #whenNeeded]
  		ifFalse: [self vScrollBarPolicy: #never].
  	
  	self vHideOrShowScrollBar.
  !



More information about the Squeak-dev mailing list