Stephane wrote:
> str: copy []
> foreach l (sort read/lines %my-file) [append str join l "^/"]
>
> But I haven't thought of blank line which are empty string in the sort
read/lines resulting block.

str: copy []
foreach Line sort read/lines %my-file [
    if not empty? Line [
        append str join Line newline
        ]
    ]

> >> foreach i t [if length? i <> 0 [print i]]

Try:

foreach i t [if 0 <> length? i [print i]]


Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-



-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to