home *** CD-ROM | disk | FTP | other *** search
/ Peanuts NeXT Software Archives / Peanuts-2.iso / Developer / webobjects / extensions / win-nt / WOPerl-lite-10e7.exe / Examples / WOPerl / ObjTclHello / Hello.wo / Hello.objtcl < prev    next >
Encoding:
Text File  |  1996-08-09  |  400 b   |  23 lines

  1. # $Id: Hello.objtcl,v 1.1 1996/07/26 05:18:16 pedja Exp $
  2.  
  3. class Hello WOComponentController {
  4.   nameString
  5. } {
  6.   method void -dealloc {
  7.     $nameString release
  8.     super dealloc
  9.   }
  10.  
  11.   method NSString -nameString { return $nameString }
  12.  
  13.   method void -setNameString: n {
  14.     rrset nameString $n
  15.   }
  16.  
  17.   method -goHome {
  18.     return [[WOApplication sharedInstance] pageWithName: [@ Main]]
  19.   }
  20. }
  21.  
  22. # EOF
  23.