steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

use system-micros

Doug Coleman 2009-11-18 18:27:35 -06:00
parent f29abf5740
commit a2aa9a87de
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/smtp/smtp.factor
View File

@ -187,7 +187,7 @@ ERROR: invalid-header-string string ;
"<" % "<" %
64 random-bits # 64 random-bits #
"-" % "-" %
micros # system-micros #
"@" % "@" %
smtp-domain get [ host-name ] unless* % smtp-domain get [ host-name ] unless* %
">" % ">" %