diff --git a/basis/ui/tools/operations/operations.factor b/basis/ui/tools/operations/operations.factor index fa259032d3..5000364dad 100644 --- a/basis/ui/tools/operations/operations.factor +++ b/basis/ui/tools/operations/operations.factor @@ -162,7 +162,7 @@ M: word com-stack-effect 1quotation com-stack-effect ; : com-profile ( quot -- ) profile profiler-window ; [ quotation? ] \ com-profile H{ - { +keyboard+ T{ key-down f { C+ } "f" } } + { +keyboard+ T{ key-down f { C+ } "o" } } { +listener+ t } } define-operation