fix test failure

diff --git a/contrib/httpd/test/html.factor b/contrib/httpd/test/html.factor
index ea85c5ef80f40864b183e1d7df09c82723aaf12c..2cb19e1a9593f77e6faee47193c4fc0a778da26a 100644 (file)
--- a/contrib/httpd/test/html.factor
+++ b/contrib/httpd/test/html.factor
@@ -28,7 +28,7 @@ USING: html io kernel namespaces styles test xml ;
     [ "hello world" H{ } html-format ] string-out
 ] unit-test
 
-[ "<span style='font-family: Monospaced; '>car</span>" ]
+[ "<span style='font-family: monospace; '>car</span>" ]
 [
     [
         "car"

diff --git a/library/math/pow.facts b/library/math/pow.facts
index a64e43b0ca05af421b0dca31636e5b542d76f7bd..c6655e822ca05fc439ea628a2e8b39a08dfb5470 100644 (file)
--- a/library/math/pow.facts
+++ b/library/math/pow.facts
@@ -14,7 +14,7 @@ HELP: sqrt "( x -- y )"
 
 HELP: ^ "( x y -- z )"
 { $values { "x" "a complex number" } { "y" "a complex number" } { "z" "a complex number" } }
-{ $description "Raises " { $snippet "x" } " to the power of " { $snippet "y" } ". If \texttt{y}" { $snippet "y" } " is an integer the answer is computed exactly, otherwise a floating point approximation is used." }
+{ $description "Raises " { $snippet "x" } " to the power of " { $snippet "y" } ". If " { $snippet "y" } " is an integer the answer is computed exactly, otherwise a floating point approximation is used." }
 { $errors "Throws an error if " { $snippet "x" } " and " { $snippet "y" } " are both integer 0." } ;
 
 HELP: each-bit "( n quot -- )"

diff --git a/library/math/trig-hyp.facts b/library/math/trig-hyp.facts
index d14a36410e7e1c7e361d4a452260da55c12f85fb..d4abde73bf987e68a92cae68bb3939cf25c1dc05 100644 (file)
--- a/library/math/trig-hyp.facts
+++ b/library/math/trig-hyp.facts
@@ -28,30 +28,30 @@ HELP: coth "( x -- y )"
 $values-x/y
 { $description "Hyperbolic cotangent." } ;
 
-HELP: cosh "( x -- y )"
+HELP: cos "( x -- y )"
 $values-x/y
 { $description "Trigonometric cosine." } ;
 
-HELP: sech "( x -- y )"
+HELP: sec "( x -- y )"
 $values-x/y
 { $description "Trigonometric secant." } ;
 
-HELP: sinh "( x -- y )"
+HELP: sin "( x -- y )"
 $values-x/y
 { $description "Trigonometric sine." } ;
 
-HELP: sinh "( x -- y )"
+HELP: sin "( x -- y )"
 $values-x/y
 { $description "Trigonometric sine." } ;
 
-HELP: cosech "( x -- y )"
+HELP: cosec "( x -- y )"
 $values-x/y
 { $description "Trigonometric cosecant." } ;
 
-HELP: tanh "( x -- y )"
+HELP: tan "( x -- y )"
 $values-x/y
 { $description "Trigonometric tangent." } ;
 
-HELP: coth "( x -- y )"
+HELP: cot "( x -- y )"
 $values-x/y
 { $description "Trigonometric cotangent." } ;