[REBOL] Re: Millenium Bug in "info?" function - returns bad date.
From: rebol:techscribe at: 4-Jan-2001 13:09
Using my Linux box I ftp'd to a remote site and did an ls on that site.
ls returned November and December dates without years.
If you look at REBOL's ftp scheme you'll notice that when REBOL parses
the returned date, if the parsed date < 3, then REBOL adds the current
year. That's where the bug is (in the add-dates function that is
embedded in the parse-files function of the ftp scheme.) The add-dates
add-date: func  [
month: first pdate
system/words/insert skip pdate 1 month
if (length? pdate) < 3 [
system/words/append pdate now/year
system/words/append pdate to-time time
in addition to checking for the length of pdate should also check for
the month's value, and append now/year - 1, if month > current-month.
You can implement the changes yourself if you want.
1. Save the ftp prototype scheme to a file.
2. Make your changes in that file.
3. use net-utils net-install function to install your modified ftp
Hope this helps,