Change some usages of catch to recover, and fix a help viewer bug

library/bootstrap/boot-stage1.factor

@@ -10,10 +10,10 @@ sequences vectors words ;
 "/library/bootstrap/primitives.factor" run-resource
 
 : parse-resource* ( path -- )
-    [ parse-resource ] catch [
+    [ parse-resource ] [
         { { "Parse file again" t } } condition drop
         parse-resource*
-    ] when* ;
+    ] recover ;
 
 : if-arch ( arch seq -- )
     architecture get rot member?

library/bootstrap/boot-stage2.factor

@@ -84,6 +84,6 @@ parser sequences sequences-internals words ;
     "Now, you can run ./f factor.image" print flush
     
     "factor.image" resource-path save-image
-] catch [ print-error listener ] when*
+] [ print-error listener ] recover
 
 0 exit

library/ui/tools/help.factor

@@ -22,7 +22,7 @@ TUPLE: help-gadget history ;
     [
         "Back" [ history-action go-back ] <bevel-button> ,
         "Forward" [ history-action go-forward ] <bevel-button> ,
-        "Home" [ history-action go-home ] <bevel-button> ,
+        "Home" [ find-help-gadget go-home ] <bevel-button> ,
     ] make-toolbar ;
 
 : <help-pane> ( -- gadget )

library/windows/ui.factor

@@ -196,7 +196,7 @@ SYMBOL: hWnd
 
                 { [ t ] [ drop DefWindowProc ] }
             } cond
-        ] catch [ error. 0 ] when*
+        ] [ error. 0 ] recover
      ] alien-callback ;
 
 : event-loop ( -- )