ChangeSet.st
changeset 1885 b77dd687e497
parent 1883 40975a15e85f
child 1898 325fa7fbb3e3
equal deleted inserted replaced
1884:f22617540244 1885:b77dd687e497
  1079         and:[changeClass owningClass == aClass]]) ifTrue:[
  1079         and:[changeClass owningClass == aClass]]) ifTrue:[
  1080             ^ true
  1080             ^ true
  1081         ]
  1081         ]
  1082     ].
  1082     ].
  1083     ^ false
  1083     ^ false
       
  1084 !
       
  1085 
       
  1086 includesChangeForPackage:aPackageID
       
  1087     ^ self changedPackages includes:aPackageID
       
  1088 
       
  1089 "/    ^ self contains:[:aChange | aChange package = aPackageID]
       
  1090 
       
  1091     "
       
  1092      ChangeSet current includesChangeForPackage:'stx:libbasic'
       
  1093     "
       
  1094 
       
  1095     "Created: / 25-10-2006 / 18:06:55 / cg"
  1084 ! !
  1096 ! !
  1085 
  1097 
  1086 !ChangeSet methodsFor:'utilities'!
  1098 !ChangeSet methodsFor:'utilities'!
  1087 
  1099 
  1088 apply
  1100 apply
  2264 ! !
  2276 ! !
  2265 
  2277 
  2266 !ChangeSet class methodsFor:'documentation'!
  2278 !ChangeSet class methodsFor:'documentation'!
  2267 
  2279 
  2268 version
  2280 version
  2269     ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.144 2006-10-25 11:13:56 sr Exp $'
  2281     ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.145 2006-10-25 16:09:08 cg Exp $'
  2270 ! !
  2282 ! !