MCPostscriptDefinition.st
author Claus Gittinger <cg@exept.de>
Mon, 14 May 2018 02:21:18 +0200
changeset 1048 582b3a028cbc
parent 1043 aeecdb5610e4
permissions -rw-r--r--
#FEATURE by cg class: MCMethodDefinition changed: #postloadOver:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"{ Package: 'stx:goodies/monticello' }"
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
1043
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
     3
"{ NameSpace: Smalltalk }"
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
     4
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
MCScriptDefinition subclass:#MCPostscriptDefinition
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
	instanceVariableNames:''
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
	classVariableNames:''
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
	poolDictionaries:''
669
d810aea88225 category change
Claus Gittinger <cg@exept.de>
parents: 272
diff changeset
     9
	category:'SCM-Monticello-Modeling'
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
!
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
!MCPostscriptDefinition class methodsFor:'as yet unclassified'!
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
scriptSelector
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
	^ #postscript
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
! !
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
720
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    19
!MCPostscriptDefinition methodsFor:'comparing'!
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
sortKey
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
	^ 'zzz' "force to the end so it gets loaded late"
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
! !
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
1043
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    25
!MCPostscriptDefinition methodsFor:'converting'!
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    26
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    27
asChange
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    28
    ^OtherChange new
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    29
        mcDefinition: self;
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    30
        yourself
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    31
! !
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    32
720
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    33
!MCPostscriptDefinition methodsFor:'installing'!
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    34
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    35
postload
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    36
	self evaluate
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    37
! !
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    38
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
!MCPostscriptDefinition class methodsFor:'documentation'!
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
272
653588e703c9 initial checkin
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    41
version
1043
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    42
    ^ '$Header$'
272
653588e703c9 initial checkin
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    43
!
653588e703c9 initial checkin
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    44
189
9ec64dc59ee0 added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 55
diff changeset
    45
version_CVS
1043
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    46
    ^ '$Header$'
189
9ec64dc59ee0 added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 55
diff changeset
    47
!
9ec64dc59ee0 added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 55
diff changeset
    48
9ec64dc59ee0 added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 55
diff changeset
    49
version_SVN
1043
aeecdb5610e4 #FEATURE by cg
Claus Gittinger <cg@exept.de>
parents: 720
diff changeset
    50
    ^ '$Id$'
55
5eac706aec6c initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
! !
720
42e3a70b0ea2 category changes
Claus Gittinger <cg@exept.de>
parents: 669
diff changeset
    52