Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Sat, 25 Jan 1997 00:20:57 +0100
changeset 1273 158d030a5553
parent 1272 a2a1b384f90f
child 1274 778fdd997e45
checkin from browser
WGroup.st file | annotate | diff | comparison | revisions
WindowGroup.st file | annotate | diff | comparison | revisions 
--- a/WGroup.st	Sat Jan 25 00:13:39 1997 +0100
+++ b/WGroup.st	Sat Jan 25 00:20:57 1997 +0100
@@ -569,15 +569,17 @@
     "restart after a snapin."
 
     topViews notNil ifTrue:[
-	"
-	 need a new semaphore, since obsolete processes 
-	 (from our previous live) may still sit on the current semaphore
-	"
-	mySensor eventSemaphore:(Semaphore new name:'eventSema').
-	isModal ifFalse:[
-	    self startup:true 
-	]
+        "
+         need a new semaphore, since obsolete processes 
+         (from our previous live) may still sit on the current semaphore
+        "
+        mySensor eventSemaphore:(Semaphore new name:'WGroup eventSema').
+        isModal ifFalse:[
+            self startup:true 
+        ]
     ]
+
+    "Modified: 25.1.1997 / 00:20:25 / cg"
 !
 
 shutDown
@@ -1267,9 +1269,11 @@
      and an event semaphore"
 
     mySensor := WindowSensor new.
-    mySensor eventSemaphore:(Semaphore new name:'eventSema').
+    mySensor eventSemaphore:(Semaphore new name:'WGroup eventSema').
     isModal := false.
     isForModalSubview := false.
+
+    "Modified: 25.1.1997 / 00:20:19 / cg"
 !
 
 reinitialize
@@ -1463,6 +1467,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.98 1997-01-24 22:21:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.99 1997-01-24 23:20:57 cg Exp $'
 ! !
 WindowGroup initialize!
--- a/WindowGroup.st	Sat Jan 25 00:13:39 1997 +0100
+++ b/WindowGroup.st	Sat Jan 25 00:20:57 1997 +0100
@@ -569,15 +569,17 @@
     "restart after a snapin."
 
     topViews notNil ifTrue:[
-	"
-	 need a new semaphore, since obsolete processes 
-	 (from our previous live) may still sit on the current semaphore
-	"
-	mySensor eventSemaphore:(Semaphore new name:'eventSema').
-	isModal ifFalse:[
-	    self startup:true 
-	]
+        "
+         need a new semaphore, since obsolete processes 
+         (from our previous live) may still sit on the current semaphore
+        "
+        mySensor eventSemaphore:(Semaphore new name:'WGroup eventSema').
+        isModal ifFalse:[
+            self startup:true 
+        ]
     ]
+
+    "Modified: 25.1.1997 / 00:20:25 / cg"
 !
 
 shutDown
@@ -1267,9 +1269,11 @@
      and an event semaphore"
 
     mySensor := WindowSensor new.
-    mySensor eventSemaphore:(Semaphore new name:'eventSema').
+    mySensor eventSemaphore:(Semaphore new name:'WGroup eventSema').
     isModal := false.
     isForModalSubview := false.
+
+    "Modified: 25.1.1997 / 00:20:19 / cg"
 !
 
 reinitialize
@@ -1463,6 +1467,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.98 1997-01-24 22:21:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.99 1997-01-24 23:20:57 cg Exp $'
 ! !
 WindowGroup initialize!
hg/stx-libview