Rename com-follow to com-browse

diff --git a/basis/ui/tools/browser/browser.factor b/basis/ui/tools/browser/browser.factor
index e8ead0afa61fe3d3858c37a250bbc3951d9b1994..8fcd14c95f051b0233d3db4fcbc144690fa86ab0 100644 (file)
--- a/basis/ui/tools/browser/browser.factor
+++ b/basis/ui/tools/browser/browser.factor
@@ -81,12 +81,12 @@ M: browser-gadget focusable-child* search-field>> ;
 
 \ browser-window H{ { +nullary+ t } } define-command
 
-: com-follow ( link -- )
+: com-browse ( link -- )
     [ browser-gadget? ] find-window
     [ [ raise-window ] [ gadget-child show-help ] bi ]
     [ (browser-window) ] if* ;
 
-: show-browser ( -- ) "handbook" com-follow ;
+: show-browser ( -- ) "handbook" com-browse ;
 
 \ show-browser H{ { +nullary+ t } } define-command
 
@@ -96,7 +96,7 @@ M: browser-gadget focusable-child* search-field>> ;
 
 : com-documentation ( browser -- ) "handbook" swap show-help ;
 
-: browser-help ( -- ) "ui-browser" com-follow ;
+: browser-help ( -- ) "ui-browser" com-browse ;
 
 \ browser-help H{ { +nullary+ t } } define-command
 

diff --git a/basis/ui/tools/deploy/deploy.factor b/basis/ui/tools/deploy/deploy.factor
index fc5502223d6e623c28bc95dde8d4dedc3c6507ee..6a8322ac02fb9aded6b27a4c6bb782aa6bf9defa 100644 (file)
--- a/basis/ui/tools/deploy/deploy.factor
+++ b/basis/ui/tools/deploy/deploy.factor
@@ -83,7 +83,7 @@ TUPLE: deploy-gadget < pack vocab settings ;
     tri ;
 
 : com-help ( -- )
-    "ui.tools.deploy" com-follow ;
+    "ui.tools.deploy" com-browse ;
 
 \ com-help H{
     { +nullary+ t }

diff --git a/basis/ui/tools/inspector/inspector.factor b/basis/ui/tools/inspector/inspector.factor
index 0154251f3552d3c2ed6a12a83c20a9e361f5522c..a7810153a8899755b4e9093ffb27706f22602d55 100644 (file)
--- a/basis/ui/tools/inspector/inspector.factor
+++ b/basis/ui/tools/inspector/inspector.factor
@@ -103,7 +103,7 @@ M: inspector-gadget focusable-child*
         slot-editor-window
     ] [ 2drop 2drop ] if ;
 
-: inspector-help ( -- ) "ui-inspector" com-follow ;
+: inspector-help ( -- ) "ui-inspector" com-browse ;
 
 \ inspector-help H{ { +nullary+ t } } define-command
 

diff --git a/basis/ui/tools/operations/operations.factor b/basis/ui/tools/operations/operations.factor
index ac95ebfef7a59105c39d1d99bfec6dbd0175d8c1..6d6cda1dba76af5aaf71a69d2a53b6c7445f6b9c 100644 (file)
--- a/basis/ui/tools/operations/operations.factor
+++ b/basis/ui/tools/operations/operations.factor
@@ -93,7 +93,7 @@ UNION: definition word method-spec link vocab vocab-link ;
 
 [ definition? ] \ com-forget H{ } define-operation
 
-[ topic? ] \ com-follow H{
+[ topic? ] \ com-browse H{
     { +keyboard+ T{ key-down f { C+ } "h" } }
     { +primary+ t }
 } define-operation

diff --git a/basis/ui/tools/profiler/profiler.factor b/basis/ui/tools/profiler/profiler.factor
index 4eb5833ed0fefb746efcd9605e8a547a513fb940..6e86cde0a5711b6a51af76b453e9954ddcdfe7a2 100644 (file)
--- a/basis/ui/tools/profiler/profiler.factor
+++ b/basis/ui/tools/profiler/profiler.factor
@@ -197,7 +197,7 @@ M: method-renderer column-titles drop { "" "Method" "Count" } ;
             over <methods-tab> "Methods" add-tab
         1 track-add ;
 
-: profiler-help ( -- ) "ui-profiler" com-follow ;
+: profiler-help ( -- ) "ui-profiler" com-browse ;
 
 \ profiler-help H{ { +nullary+ t } } define-command
 

diff --git a/basis/ui/tools/walker/walker.factor b/basis/ui/tools/walker/walker.factor
index 32cd3240304d158fe4f2645aec6d2e65bdb45c5f..63426f86bfb79e46ec6c6654e4e5cb3de60ca130 100644 (file)
--- a/basis/ui/tools/walker/walker.factor
+++ b/basis/ui/tools/walker/walker.factor
@@ -66,7 +66,7 @@ M: walker-gadget focusable-child*
         dup status>> self <thread-status> f track-add
         dup traceback>> 1 track-add ;
     
-: walker-help ( -- ) "ui-walker" com-follow ;
+: walker-help ( -- ) "ui-walker" com-browse ;
 
 \ walker-help H{ { +nullary+ t } } define-command