fix system docs

diff --git a/core/system/system-docs.factor b/core/system/system-docs.factor
index 3148fd6fdb23ae996cd67ab42310c269d8543df8..7414f6be606326e2800445b095ce2b2a15ac178d 100644 (file)
--- a/core/system/system-docs.factor
+++ b/core/system/system-docs.factor
@@ -1,6 +1,5 @@
 USING: generic help.markup help.syntax kernel math memory
-namespaces sequences kernel.private strings classes.singleton
-tools.time ;
+namespaces sequences kernel.private strings classes.singleton ;
 IN: system
 
 ABOUT: "system"
@@ -18,7 +17,7 @@ ARTICLE: "system" "System interface"
 "Getting the current time:"
 { $subsections
     system-micros
-    system-micros
+    system-millis
 }
 "Getting a monotonically increasing nanosecond count:"
 { $subsections nano-count }
@@ -93,7 +92,7 @@ HELP: system-millis ( -- ms )
 HELP: nano-count ( -- ns )
 { $values { "ns" integer } }
 { $description "Outputs a monotonically increasing count of nanoseconds elapsed since an arbitrary starting time. The difference of two calls to this word allows timing. This word is unaffected by system clock changes." }
-{ $notes "This is a low-level word. The " { $link time } " word may be used to time code execution time. For system time, use " { $link system-micros } "." } ;
+{ $notes "This is a low-level word. The " { $vocab-link "tools.time" } " vocabulary defines words to time code execution time. For system time, use " { $link system-micros } "." } ;
 
 HELP: image
 { $values { "path" "a pathname string" } }