Class.st
changeset 8770 58da3f88a882
parent 8756 240a8c625065
child 8838 81ee56a49ac3
equal deleted inserted replaced
8769:d85a61c092ee 8770:58da3f88a882
  4176      ClockView packageSourceCodeInfo
  4176      ClockView packageSourceCodeInfo
  4177     "
  4177     "
  4178 
  4178 
  4179     "Created: 4.11.1995 / 20:36:53 / cg"
  4179     "Created: 4.11.1995 / 20:36:53 / cg"
  4180     "Modified: 19.9.1997 / 10:42:25 / cg"
  4180     "Modified: 19.9.1997 / 10:42:25 / cg"
       
  4181 !
       
  4182 
       
  4183 projectDirectory
       
  4184     "return my projects directory - thats where the sources, binaries, classLib, 
       
  4185      resources etc. are typically found."
       
  4186 
       
  4187     ^ Smalltalk projectDirectoryForClass:self
       
  4188 
       
  4189     "
       
  4190      Object projectDirectory
       
  4191      View projectDirectory
       
  4192      ApplicationModel projectDirectory
       
  4193     "
  4181 !
  4194 !
  4182 
  4195 
  4183 resourceDirectory
  4196 resourceDirectory
  4184     "return the directory where my resource file is supposed to live.
  4197     "return the directory where my resource file is supposed to live.
  4185      Here, take the package and assume that a directory named 'resources' exists
  4198      Here, take the package and assume that a directory named 'resources' exists
  4910 ! !
  4923 ! !
  4911 
  4924 
  4912 !Class class methodsFor:'documentation'!
  4925 !Class class methodsFor:'documentation'!
  4913 
  4926 
  4914 version
  4927 version
  4915     ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.483 2005-02-25 16:41:17 cg Exp $'
  4928     ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.484 2005-03-04 10:13:20 cg Exp $'
  4916 ! !
  4929 ! !