[REBOL] Re: Millenium Bug in "info?" function - returns bad date.
From: rebol:techscribe at: 4-Jan-2001 13:10
Hi Doug,
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-date function that is embedded
in the parse-files function of the ftp scheme.) The add-date function,
add-date: func [] [
month: first pdate
system/words/remove 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
prototocol.
Hope this helps,
Elan
Vos, Doug
wrote: