#termiante -> #closeRequest.
--- a/BrowserView.st Mon Aug 03 20:01:18 1998 +0200
+++ b/BrowserView.st Mon Aug 03 20:04:39 1998 +0200
@@ -5809,6 +5809,17 @@
"Created: / 18.6.1998 / 16:49:59 / cg"
!
+closeRequest
+ "let user confirm, if codeView was modified and not saved"
+
+ (self checkSelectionChangeAllowed) ifTrue:[
+ super closeRequest
+ ]
+
+ "Created: / 3.8.1998 / 19:52:39 / cg"
+ "Modified: / 3.8.1998 / 20:02:29 / cg"
+!
+
destroy
"release dependant - destroy popups"
@@ -5934,12 +5945,6 @@
"Modified: / 29.10.1997 / 15:50:26 / cg"
!
-terminate
- (self checkSelectionChangeAllowed) ifTrue:[
- super terminate
- ]
-!
-
title:someString
myLabel := someString.
self topView label:someString.
@@ -12047,6 +12052,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.437 1998-07-31 15:16:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.438 1998-08-03 18:04:39 cg Exp $'
! !
BrowserView initialize!
--- a/BrwsrView.st Mon Aug 03 20:01:18 1998 +0200
+++ b/BrwsrView.st Mon Aug 03 20:04:39 1998 +0200
@@ -5809,6 +5809,17 @@
"Created: / 18.6.1998 / 16:49:59 / cg"
!
+closeRequest
+ "let user confirm, if codeView was modified and not saved"
+
+ (self checkSelectionChangeAllowed) ifTrue:[
+ super closeRequest
+ ]
+
+ "Created: / 3.8.1998 / 19:52:39 / cg"
+ "Modified: / 3.8.1998 / 20:02:29 / cg"
+!
+
destroy
"release dependant - destroy popups"
@@ -5934,12 +5945,6 @@
"Modified: / 29.10.1997 / 15:50:26 / cg"
!
-terminate
- (self checkSelectionChangeAllowed) ifTrue:[
- super terminate
- ]
-!
-
title:someString
myLabel := someString.
self topView label:someString.
@@ -12047,6 +12052,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.437 1998-07-31 15:16:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.438 1998-08-03 18:04:39 cg Exp $'
! !
BrowserView initialize!