Nicolas Cellier uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-nice.305.mcz
==================== Summary ====================
Name: System-nice.305
Author: nice
Time: 30 March 2010, 10:18:06.019 pm
UUID: 0f209bd1-5091-e043-be3e-dcac0c300036
Ancestors: System-ar.304
Fix for http://bugs.squeak.org/view.php?id=7483
#metaclass -> #metaClass
=============== Diff against System-ar.304 ===============
Item was changed:
----- Method: PseudoClass>>theMetaClass (in category 'accessing') -----
theMetaClass
+ ^ self metaClass!
- ^ self metaclass!
Nicolas Cellier uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-nice.305.mcz
==================== Summary ====================
Name: System-nice.305
Author: nice
Time: 30 March 2010, 10:18:06.019 pm
UUID: 0f209bd1-5091-e043-be3e-dcac0c300036
Ancestors: System-ar.304
Fix for http://bugs.squeak.org/view.php?id=7483
#metaclass -> #metaClass
=============== Diff against System-ar.304 ===============
Item was changed:
----- Method: PseudoClass>>theMetaClass (in category 'accessing') -----
theMetaClass
+ ^ self metaClass!
- ^ self metaclass!
Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.129.mcz
==================== Summary ====================
Name: Graphics-nice.129
Author: nice
Time: 30 March 2010, 10:13:40.324 pm
UUID: 95ee7ec1-dfd6-3f41-9c10-15524928ade0
Ancestors: Graphics-ar.128
1) Fix for http://bugs.squeak.org/view.php?id=7483
2) Fix _ assigments in class comments
=============== Diff against Graphics-ar.128 ===============
Item was changed:
ImageReadWriter subclass: #PNMReadWriter
instanceVariableNames: 'first type origin cols rows depth maxValue tupleType pragma'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Files'!
+ !PNMReadWriter commentStamp: 'nice 3/24/2010 07:37' prior: 0!
- !PNMReadWriter commentStamp: 'jdr 10/20/2003 17:08' prior: 0!
I am a subclass of ImageReadWriter that decodes portable anymap file formats
(pbm, pgm, ppm and pam) images.
I accept the #origin pragma for SE files as described in:
Algoritms For Image Processing And Computer Vision. J. R. Parker
Don't work with 2 bytes samples (16 bit grays, > 32 bits color, etc...),
pam files preliminary support.
+ f := ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
- f _ ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
f morphEdit
Submitted by Javier Diaz Reinoso, Oct/2003!
Item was changed:
Pen subclass: #PenPointRecorder
instanceVariableNames: 'points'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Primitives'!
+ !PenPointRecorder commentStamp: 'nice 3/24/2010 07:38' prior: 0!
- !PenPointRecorder commentStamp: '<historical>' prior: 0!
This class is a special kind of Pen that instead of actually drawing lines records the destination points for those lines. These points can later be accessed through my accessing method #points.
This can be useful when determining the boundaries of a drawing session.
Example:
| pen |
+ pen := PenPointRecorder new.
- pen _ PenPointRecorder new.
pen up; goto: 100@100; down; goto: 120@120.
Transcript cr;
show: 'Bounding box for drawing: ';
show: (Rectangle encompassing: pen points)
Implementation note: Shouldn't we override #drawFrom:to:withFirstPoint: instead, and what about #drawLoopX:Y:? Aren't we missing those calls?!
Item was changed:
----- Method: DisplayScreen class>>depth:width:height:fullscreen: (in category 'display box access') -----
depth: depthInteger width: widthInteger height: heightInteger fullscreen: aBoolean
"Force Squeak's window (if there's one) into a new size and depth."
"DisplayScreen depth: 8 width: 1024 height: 768 fullscreen: false"
<primitive: 92>
+ self primitiveFailed!
- self primitiveFail!
Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.129.mcz
==================== Summary ====================
Name: Graphics-nice.129
Author: nice
Time: 30 March 2010, 10:13:40.324 pm
UUID: 95ee7ec1-dfd6-3f41-9c10-15524928ade0
Ancestors: Graphics-ar.128
1) Fix for http://bugs.squeak.org/view.php?id=7483
2) Fix _ assigments in class comments
=============== Diff against Graphics-ar.128 ===============
Item was changed:
ImageReadWriter subclass: #PNMReadWriter
instanceVariableNames: 'first type origin cols rows depth maxValue tupleType pragma'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Files'!
+ !PNMReadWriter commentStamp: 'nice 3/24/2010 07:37' prior: 0!
- !PNMReadWriter commentStamp: 'jdr 10/20/2003 17:08' prior: 0!
I am a subclass of ImageReadWriter that decodes portable anymap file formats
(pbm, pgm, ppm and pam) images.
I accept the #origin pragma for SE files as described in:
Algoritms For Image Processing And Computer Vision. J. R. Parker
Don't work with 2 bytes samples (16 bit grays, > 32 bits color, etc...),
pam files preliminary support.
+ f := ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
- f _ ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
f morphEdit
Submitted by Javier Diaz Reinoso, Oct/2003!
Item was changed:
Pen subclass: #PenPointRecorder
instanceVariableNames: 'points'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Primitives'!
+ !PenPointRecorder commentStamp: 'nice 3/24/2010 07:38' prior: 0!
- !PenPointRecorder commentStamp: '<historical>' prior: 0!
This class is a special kind of Pen that instead of actually drawing lines records the destination points for those lines. These points can later be accessed through my accessing method #points.
This can be useful when determining the boundaries of a drawing session.
Example:
| pen |
+ pen := PenPointRecorder new.
- pen _ PenPointRecorder new.
pen up; goto: 100@100; down; goto: 120@120.
Transcript cr;
show: 'Bounding box for drawing: ';
show: (Rectangle encompassing: pen points)
Implementation note: Shouldn't we override #drawFrom:to:withFirstPoint: instead, and what about #drawLoopX:Y:? Aren't we missing those calls?!
Item was changed:
----- Method: DisplayScreen class>>depth:width:height:fullscreen: (in category 'display box access') -----
depth: depthInteger width: widthInteger height: heightInteger fullscreen: aBoolean
"Force Squeak's window (if there's one) into a new size and depth."
"DisplayScreen depth: 8 width: 1024 height: 768 fullscreen: false"
<primitive: 92>
+ self primitiveFailed!
- self primitiveFail!
Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.129.mcz
==================== Summary ====================
Name: Graphics-nice.129
Author: nice
Time: 30 March 2010, 10:13:40.324 pm
UUID: 95ee7ec1-dfd6-3f41-9c10-15524928ade0
Ancestors: Graphics-ar.128
1) Fix for http://bugs.squeak.org/view.php?id=7483
2) Fix _ assigments in class comments
=============== Diff against Graphics-ar.128 ===============
Item was changed:
ImageReadWriter subclass: #PNMReadWriter
instanceVariableNames: 'first type origin cols rows depth maxValue tupleType pragma'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Files'!
+ !PNMReadWriter commentStamp: 'nice 3/24/2010 07:37' prior: 0!
- !PNMReadWriter commentStamp: 'jdr 10/20/2003 17:08' prior: 0!
I am a subclass of ImageReadWriter that decodes portable anymap file formats
(pbm, pgm, ppm and pam) images.
I accept the #origin pragma for SE files as described in:
Algoritms For Image Processing And Computer Vision. J. R. Parker
Don't work with 2 bytes samples (16 bit grays, > 32 bits color, etc...),
pam files preliminary support.
+ f := ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
- f _ ImageReadWriter formFromFileNamed: 'Tools:Squeak3.4:Carmen.ppm'.
f morphEdit
Submitted by Javier Diaz Reinoso, Oct/2003!
Item was changed:
Pen subclass: #PenPointRecorder
instanceVariableNames: 'points'
classVariableNames: ''
poolDictionaries: ''
category: 'Graphics-Primitives'!
+ !PenPointRecorder commentStamp: 'nice 3/24/2010 07:38' prior: 0!
- !PenPointRecorder commentStamp: '<historical>' prior: 0!
This class is a special kind of Pen that instead of actually drawing lines records the destination points for those lines. These points can later be accessed through my accessing method #points.
This can be useful when determining the boundaries of a drawing session.
Example:
| pen |
+ pen := PenPointRecorder new.
- pen _ PenPointRecorder new.
pen up; goto: 100@100; down; goto: 120@120.
Transcript cr;
show: 'Bounding box for drawing: ';
show: (Rectangle encompassing: pen points)
Implementation note: Shouldn't we override #drawFrom:to:withFirstPoint: instead, and what about #drawLoopX:Y:? Aren't we missing those calls?!
Item was changed:
----- Method: DisplayScreen class>>depth:width:height:fullscreen: (in category 'display box access') -----
depth: depthInteger width: widthInteger height: heightInteger fullscreen: aBoolean
"Force Squeak's window (if there's one) into a new size and depth."
"DisplayScreen depth: 8 width: 1024 height: 768 fullscreen: false"
<primitive: 92>
+ self primitiveFailed!
- self primitiveFail!
Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ar.405.mcz
==================== Summary ====================
Name: Morphic-ar.405
Author: ar
Time: 29 March 2010, 9:26:50.478 pm
UUID: a7b0717c-c4d5-544e-b5cc-ba5abb09d577
Ancestors: Morphic-ar.404
Fix smartSearch in the search bar. When having an exact hit on a class name it would browse the metaclass instead of the class itself.
=============== Diff against Morphic-ar.404 ===============
Item was changed:
----- Method: SearchBarMorph>>smartSearch (in category 'search') -----
smartSearch
"Take the user input and perform an appropriate search"
| input |
input := self contents asString ifEmpty:[^self].
+ (Smalltalk bindingOf: input) ifNotNil:[:assoc| | global |
- (Smalltalk bindingOf: input) ifNotNil:[:assoc|
"It's a global or a class"
+ global := assoc value.
+ ^ToolSet browse: (global isBehavior ifTrue:[global] ifFalse:[global class]) selector: nil.
- ^ToolSet browse: assoc value class selector: nil.
].
(SystemNavigation new allImplementorsOf: input asSymbol) ifNotEmpty:[:list|
^SystemNavigation new
browseMessageList: list
name: 'Implementors of ' , input
].
input first isUppercase ifTrue:[
(Utilities classFromPattern: input withCaption: '') ifNotNil:[:aClass|
^ToolSet browse: aClass selector: nil.
].
] ifFalse:[
^ToolSet default browseMessageNames: input
].
"Not found"
Beeper beepPrimitive.!
Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ar.405.mcz
==================== Summary ====================
Name: Morphic-ar.405
Author: ar
Time: 29 March 2010, 9:26:50.478 pm
UUID: a7b0717c-c4d5-544e-b5cc-ba5abb09d577
Ancestors: Morphic-ar.404
Fix smartSearch in the search bar. When having an exact hit on a class name it would browse the metaclass instead of the class itself.
=============== Diff against Morphic-ar.404 ===============
Item was changed:
----- Method: SearchBarMorph>>smartSearch (in category 'search') -----
smartSearch
"Take the user input and perform an appropriate search"
| input |
input := self contents asString ifEmpty:[^self].
+ (Smalltalk bindingOf: input) ifNotNil:[:assoc| | global |
- (Smalltalk bindingOf: input) ifNotNil:[:assoc|
"It's a global or a class"
+ global := assoc value.
+ ^ToolSet browse: (global isBehavior ifTrue:[global] ifFalse:[global class]) selector: nil.
- ^ToolSet browse: assoc value class selector: nil.
].
(SystemNavigation new allImplementorsOf: input asSymbol) ifNotEmpty:[:list|
^SystemNavigation new
browseMessageList: list
name: 'Implementors of ' , input
].
input first isUppercase ifTrue:[
(Utilities classFromPattern: input withCaption: '') ifNotNil:[:aClass|
^ToolSet browse: aClass selector: nil.
].
] ifFalse:[
^ToolSet default browseMessageNames: input
].
"Not found"
Beeper beepPrimitive.!
Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ar.405.mcz
==================== Summary ====================
Name: Morphic-ar.405
Author: ar
Time: 29 March 2010, 9:26:50.478 pm
UUID: a7b0717c-c4d5-544e-b5cc-ba5abb09d577
Ancestors: Morphic-ar.404
Fix smartSearch in the search bar. When having an exact hit on a class name it would browse the metaclass instead of the class itself.
=============== Diff against Morphic-ar.404 ===============
Item was changed:
----- Method: SearchBarMorph>>smartSearch (in category 'search') -----
smartSearch
"Take the user input and perform an appropriate search"
| input |
input := self contents asString ifEmpty:[^self].
+ (Smalltalk bindingOf: input) ifNotNil:[:assoc| | global |
- (Smalltalk bindingOf: input) ifNotNil:[:assoc|
"It's a global or a class"
+ global := assoc value.
+ ^ToolSet browse: (global isBehavior ifTrue:[global] ifFalse:[global class]) selector: nil.
- ^ToolSet browse: assoc value class selector: nil.
].
(SystemNavigation new allImplementorsOf: input asSymbol) ifNotEmpty:[:list|
^SystemNavigation new
browseMessageList: list
name: 'Implementors of ' , input
].
input first isUppercase ifTrue:[
(Utilities classFromPattern: input withCaption: '') ifNotNil:[:aClass|
^ToolSet browse: aClass selector: nil.
].
] ifFalse:[
^ToolSet default browseMessageNames: input
].
"Not found"
Beeper beepPrimitive.!