r1098 - ofw/fs/cdfs

Author: wmb
Date: 2009-02-02 08:01:43 +0100 (Mon, 02 Feb 2009)
New Revision: 1098

Modified:
   ofw/fs/cdfs/cdfs.fth
Log:
Fixed the ISO9660 filesystem reader so it doesn't convert
names to upper case, because lower case and mixed case names
can appear on media.

Modified: ofw/fs/cdfs/cdfs.fth
===================================================================
--- ofw/fs/cdfs/cdfs.fth	2009-02-02 06:58:07 UTC (rev 1097)
+++ ofw/fs/cdfs/cdfs.fth	2009-02-02 07:01:43 UTC (rev 1098)
@@ -137,7 +137,6 @@
    max-name min                 ( adr len' )
    tuck sought-name swap move   ( len' )
    sought-name  swap	        ( adr' len' )
-   2dup upper       	        ( adr' len' )
    -period                      ( adr' len'' )
 ;
 : froot  ( -- )  root-dirent select-file set-dir  ;