14 lines
236 B
Smalltalk
14 lines
236 B
Smalltalk
|
Class {
|
||
|
#name : #BaselineOfClouseau,
|
||
|
#superclass : #Object,
|
||
|
#category : #BaselineOfClouseau
|
||
|
}
|
||
|
|
||
|
{ #category : #baselines }
|
||
|
BaselineOfClouseau >> baseline: spec [
|
||
|
<baseline>
|
||
|
spec
|
||
|
for: #common
|
||
|
do: [ spec package: 'Clouseau' ].
|
||
|
]
|