*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 15 Jan 1999 21:19:21 +0100
changeset 3954 20cc39f4e75c
parent 3953 0f8f1c7a6c12
child 3955 ebf11ebe113e
*** empty log message ***
Filename.st
--- a/Filename.st	Thu Jan 07 15:44:49 1999 +0100
+++ b/Filename.st	Fri Jan 15 21:19:21 1999 +0100
@@ -2584,7 +2584,7 @@
      See also: #pathName, #directoryPathName and #baseName.
      Compatibility note: use #head for ST-80 compatibility."
 
-    |last index sep sepString p rest|
+    |index sep sepString p rest|
 
     sep := self separator.
     sepString := sep asString.
@@ -3173,6 +3173,6 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.147 1998-10-27 12:34:47 ps Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.148 1999-01-15 20:19:21 cg Exp $'
 ! !
 Filename initialize!