From e951fb773a49a03a22c08d7dc27a2ae219de50ae Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <littledan@Macintosh-122.local>
Date: Thu, 19 Mar 2009 01:06:25 -0500
Subject: [PATCH] Fixing unicode script help

---
 basis/unicode/script/script-docs.factor | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/basis/unicode/script/script-docs.factor b/basis/unicode/script/script-docs.factor
index 730c361fb9..2860f83bef 100644
--- a/basis/unicode/script/script-docs.factor
+++ b/basis/unicode/script/script-docs.factor
@@ -3,8 +3,12 @@
 USING: help.syntax help.markup strings ;
 IN: unicode.script
 
-ABOUT: script-of
+ABOUT: "unicode.script"
+
+ARTICLE: "unicode.script" "Unicode script properties"
+"The unicode standard gives every character a script. Note that this is different from a language, and that it is non-trivial to detect language from a string. To get the script of a character, use"
+{ $subsection script-of } ;
 
 HELP: script-of
-{ $values { "char" "a code point" } { "script" "a symbol" } }
-{ $description "Gets a symbol representing the code point of a given character. The word name of the symbol is the same as the one " } ;
+{ $values { "char" "a code point" } { "script" string } }
+{ $description "Finds the script of the given Unicode code point, represented as a string." } ;