From 79add00e24e5cc3efe1aedf2997e37b47834df4e Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 22 Feb 2020 20:40:11 -0800
Subject: [PATCH] help.html: don't use sprintf.

---
 basis/help/html/html.factor    | 7 ++++---
 basis/help/html/stylesheet.css | 2 +-
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/basis/help/html/html.factor b/basis/help/html/html.factor
index ec15167b49..55faa7d10e 100644
--- a/basis/help/html/html.factor
+++ b/basis/help/html/html.factor
@@ -1,8 +1,8 @@
 ! Copyright (C) 2008, 2011 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays assocs combinators.short-circuit
-debugger formatting fry help help.home help.topics help.vocabs
-html html.streams io.directories io.encodings.binary
+debugger fry help help.home help.topics help.vocabs html
+html.streams io.directories io.encodings.binary
 io.encodings.utf8 io.files io.files.temp io.pathnames kernel
 locals make math math.parser memoize namespaces regexp sequences
 sequences.deep serialize sorting splitting tools.completion
@@ -93,7 +93,8 @@ M: pathname url-of
 : css-style ( style -- style' )
     R/ font-size: \d+pt;/ [
         "font-size: " ?head drop "pt;" ?tail drop
-        string>number 12 / "font-size: %frem;" sprintf
+        string>number 12 /f number>string
+        "font-size: " "rem; " surround
     ] re-replace-with ;
 
 : css-classes ( classes -- stylesheet )
diff --git a/basis/help/html/stylesheet.css b/basis/help/html/stylesheet.css
index b61b0ea4ac..b41604c863 100644
--- a/basis/help/html/stylesheet.css
+++ b/basis/help/html/stylesheet.css
@@ -52,5 +52,5 @@ tr:hover {
 .page {
     margin: 20px;
     max-width: 800px;
-    line-height: 150%;
+    line-height: 140%;
 }