Bug fixes

diff --git a/extra/webapps/pastebin/style.css b/extra/webapps/pastebin/style.css
index dda38b90d440fffa4661fe1fe226202d86d2e0e2..e3c7c19fc5a7d381378d58216b77f66cade121e2 100644 (file)
--- a/extra/webapps/pastebin/style.css
+++ b/extra/webapps/pastebin/style.css
@@ -22,6 +22,7 @@ pre.code {
        background-color:#f5f5f5;
        padding:5px;
        font-size:150%;
+       color:#000000;
 }
 
 .navbar {

diff --git a/extra/webapps/source/source.factor b/extra/webapps/source/source.factor
index ddc2f1575942fe5d2be1cd0510bcdb73cbafd3de..36fbf9d5ae66cad57bab0f16f9930e40cf0cb428 100755 (executable)
--- a/extra/webapps/source/source.factor
+++ b/extra/webapps/source/source.factor
@@ -12,7 +12,7 @@ global [
             [
                 drop
                 serving-html
-                htmlize-stream
+                swap htmlize-stream
             ] serve-file-hook set
             file-responder
         ] with-scope

diff --git a/extra/xmode/catalog/catalog-tests.factor b/extra/xmode/catalog/catalog-tests.factor
index e5d049de727d43c7221d73d0a3177480af76690e..d5420ed2e377cf9a876acb2210f9e94223a7d4af 100644 (file)
--- a/extra/xmode/catalog/catalog-tests.factor
+++ b/extra/xmode/catalog/catalog-tests.factor
@@ -5,5 +5,7 @@ kernel sequences io ;
 [ t ] [ modes hashtable? ] unit-test
 
 [ ] [
-    modes keys [ dup print load-mode drop reset-modes ] each
+    modes keys [
+        dup print flush load-mode drop reset-modes
+    ] each
 ] unit-test