# HG changeset patch # User Stefan Vogel # Date 1394798117 -3600 # Node ID 1c5caf18b1d1a42af96adef6e6634a50bac3e5a2 # Parent 60ddc11e769e56317522e02f7c681ef6114f6c14 class: Filename added: #< diff -r 60ddc11e769e -r 1c5caf18b1d1 Filename.st --- a/Filename.st Thu Mar 13 17:34:17 2014 +0100 +++ b/Filename.st Fri Mar 14 12:55:17 2014 +0100 @@ -1636,6 +1636,12 @@ !Filename methodsFor:'comparing'! +< aFilename + "compare file names - used for sorting" + + ^ self asString < aFilename asString +! + = aFilename "return true, if the argument represents the same filename" @@ -6058,11 +6064,11 @@ !Filename class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.409 2013-12-06 15:30:31 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.410 2014-03-14 11:55:17 stefan Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.409 2013-12-06 15:30:31 stefan Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.410 2014-03-14 11:55:17 stefan Exp $' ! !