--- a/STXInstaller.st	Mon Apr 20 15:38:13 1998 +0200
+++ b/STXInstaller.st	Mon Apr 20 15:39:07 1998 +0200
@@ -263,7 +263,7 @@
 !STXInstaller methodsFor:'installing'!
 
 changeWritability
-    |msg dirsToMake numDirs nDone|
+    |msg|
 
     msg := (resources array:#('ST/X Installation' '' 'making target dir writable' '' '' '')) asStringCollection.
 
@@ -276,8 +276,8 @@
     ].
     ^ true
 
-    "Modified: / 25.2.1998 / 19:20:59 / cg"
-    "Created: / 20.4.1998 / 15:37:52 / cg"
+    "Created: / 17.7.1996 / 15:24:19 / cg"
+    "Modified: / 20.4.1998 / 15:38:59 / cg"
 !
 
 copyFiles