use system-micros

2009-11-18 18:27:35 -06:00 · 2009-11-18 18:27:35 -06:00 · fc3b126d8f
parent daf3094b8c
commit fc3b126d8f
1 changed files with 1 additions and 1 deletions
--- a/basis/smtp/smtp.factor
+++ b/basis/smtp/smtp.factor
@ -187,7 +187,7 @@ ERROR: invalid-header-string string ;
        "<" %
        64 random-bits #
        "-" %
-        micros #
+        system-micros #
        "@" %
        smtp-domain get [ host-name ] unless* %
        ">" %