#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Tue, 08 May 2018 19:58:20 +0200
changeset 1043 aeecdb5610e4
parent 1042 3b8c88c55251
child 1044 af7f15850437
#FEATURE by cg class: MCPostscriptDefinition added: #asChange
MCPostscriptDefinition.st
--- a/MCPostscriptDefinition.st	Tue May 08 19:54:33 2018 +0200
+++ b/MCPostscriptDefinition.st	Tue May 08 19:58:20 2018 +0200
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/monticello' }"
 
+"{ NameSpace: Smalltalk }"
+
 MCScriptDefinition subclass:#MCPostscriptDefinition
 	instanceVariableNames:''
 	classVariableNames:''
@@ -20,6 +22,14 @@
 	^ 'zzz' "force to the end so it gets loaded late"
 ! !
 
+!MCPostscriptDefinition methodsFor:'converting'!
+
+asChange
+    ^OtherChange new
+        mcDefinition: self;
+        yourself
+! !
+
 !MCPostscriptDefinition methodsFor:'installing'!
 
 postload
@@ -29,14 +39,14 @@
 !MCPostscriptDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPostscriptDefinition.st,v 1.5 2013-01-18 13:02:34 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPostscriptDefinition.st,v 1.5 2013-01-18 13:02:34 cg Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '§Id: MCPostscriptDefinition.st 5 2010-08-29 07:30:29Z vranyj1 §'
+    ^ '$Id$'
 ! !