Status: New
Owner: ----
New issue 3713 by
[hidden email]: Additional obsolete methods in
PharoCore-1.2.image (2/15/11 9:08am)
http://code.google.com/p/pharo/issues/detail?id=3713I did a search through PharoV10.sources for comments which reported methods
as 'obsolete'. I looked for them in Pharo, using the 2/15/11 9:08am image
(from Pharo-1.2.zip). These methods are still in the 1.2 image:
!Canvas methodsFor: 'drawing' stamp: 'ar 6/17/1999 01:30'!
line: pt1 to: pt2 brushForm: brush
"Obsolete - will be removed in the future"! !
!Canvas methodsFor: 'drawing' stamp: 'ar 6/17/1999 01:32'!
point: p color: c
"Obsolete - will be removed in the future"! !
!Canvas methodsFor: 'drawing-obsolete' stamp: 'ar 2/12/2000 18:11'!
imageWithOpaqueWhite: aForm at: aPoint
"Note: This protocol is deprecated. Use #drawImage: instead"
self image: aForm
at: aPoint
sourceRect: (0@0 extent: aForm extent)
rule: Form over.
! !
!Canvas methodsFor: 'drawing-text' stamp: 'ar 12/31/2001 02:40'!
text: s at: pt font: fontOrNil color: c
"OBSOLETE"
^ self drawString: s at: pt font: fontOrNil color: c! !
!Canvas methodsFor: 'drawing-text' stamp: 'ar 12/31/2001 02:40'!
text: s bounds: boundsRect font: fontOrNil color: c
"OBSOLETE"
^self drawString: s in: boundsRect font: fontOrNil color: c! !
!FontSet class methodsFor: 'installing' stamp: 'damiencassou 5/30/2008
14:51'!
fontNamed: fontName fromLiteral: aString
"NOTE -- THIS IS AN OBSOLETE METHOD THAT MAY CAUSE ERRORS.
The old form of fileOut for FontSets produced binary literal strings which
may not be accurately read in systems with support for international
character sets. If possible, file the FontSet out again from a system that
produces the newer MIME encoding (current def of compileFont:), and uses
the corresponding altered version of this method. If this is not easy, then
file the fontSet into an older system (3.7 or earlier),
assume it is called FontSetZork...
execute FontSetZork installAsTextStyle.
copy the compileFont: method from this system into that older one.
remove the class FontSetZork.
Execute: FontSet convertTextStyleNamed: 'Zork', and see that it creates a
new FontSetZork.
FileOut the new class FontSetZork.
The resulting file should be able to be read into this system.
"
^ StrikeFont new
name: fontName;
readFromStrike2Stream: aString asByteArray readStream! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
classModified: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
classMoved: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
classRemoved: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
methodModified: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
methodMoved: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
methodRemoved: anEvent
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
registerForNotifications
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
registerForNotificationsFrom: aNotifier
"obsolete - remove this later"! !
!MCPackageManager methodsFor: 'system changes' stamp: 'ar 4/26/2005 22:17'!
systemChange: anEvent
"obsolete - remove this later"! !
!Process methodsFor: 'accessing' stamp: 'ar 12/7/2007 17:06'!
offList
"OBSOLETE. Process>>suspend will atomically reset myList if the process is
suspended.
There should never be a need to send #offList but some older users may not
be aware
of the changed semantics to suspend and may try the old hickadidoo seen
here:
(suspendingList := process suspendingList) == nil
ifTrue: [process == Processor activeProcess ifTrue: [process suspend]]
ifFalse: [suspendingList remove: process ifAbsent:[].
process offList].
Usages like the above should be replaced by a simple 'process suspend' "
myList := nil! !
Locked
