--- a/FileBrowser.st	Fri Jan 24 23:05:05 1997 +0100
+++ b/FileBrowser.st	Fri Jan 24 23:23:40 1997 +0100
@@ -1519,7 +1519,7 @@
     |stream line lnr myProcess myPriority startLine startCol stopSignal
      access|
 
-    access := Semaphore forMutualExclusion.
+    access := Semaphore forMutualExclusion name:'accessLock'.
     stopSignal := Signal new.
 
     "
@@ -2817,5 +2817,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.115 1997-01-23 20:19:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.116 1997-01-24 22:23:13 cg Exp $'
 ! !