BrowserView.st
changeset 2685 ed1e3d861cf5
parent 2684 c4507a0a9517
child 2687 1c3f48a220b4
equal deleted inserted replaced
2684:c4507a0a9517 2685:ed1e3d861cf5
  1036                     oldMethod := someArgument at:2.
  1036                     oldMethod := someArgument at:2.
  1037                     selector := someArgument at:1.
  1037                     selector := someArgument at:1.
  1038                 ] ifFalse:[
  1038                 ] ifFalse:[
  1039                     selector := someArgument
  1039                     selector := someArgument
  1040                 ].
  1040                 ].
  1041 self halt.
  1041 
  1042                 (selector isSymbol) ifTrue:[
  1042                 (selector isSymbol) ifTrue:[
  1043                     |changedMethod s1 s2 oldMethodSelection oldMethodCategorySelection|
  1043                     |changedMethod s1 s2 oldMethodSelection oldMethodCategorySelection|
  1044 
  1044 
  1045                     "
  1045                     "
  1046                      the method with selector was changed or removed
  1046                      the method with selector was changed or removed
 14141 ! !
 14141 ! !
 14142 
 14142 
 14143 !BrowserView class methodsFor:'documentation'!
 14143 !BrowserView class methodsFor:'documentation'!
 14144 
 14144 
 14145 version
 14145 version
 14146     ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.626 2000-07-25 11:21:40 cg Exp $'
 14146     ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.627 2000-07-25 11:21:55 cg Exp $'
 14147 ! !
 14147 ! !
 14148 BrowserView initialize!
 14148 BrowserView initialize!