diff --git a/core/namespaces/namespaces.factor b/core/namespaces/namespaces.factor
index b0e764c94d..977e5a2961 100644
--- a/core/namespaces/namespaces.factor
+++ b/core/namespaces/namespaces.factor
@@ -24,6 +24,7 @@ PRIVATE>
 : get-global ( variable -- value ) global at ;
 : set-global ( value variable -- ) global set-at ;
 : change ( variable quot -- ) [ [ get ] keep ] dip dip set ; inline
+: change-global ( var quot -- ) [ [ get-global ] keep ] dip dip set-global ; inline
 : +@ ( n variable -- ) [ 0 or + ] change ;
 : inc ( variable -- ) 1 swap +@ ; inline
 : dec ( variable -- ) -1 swap +@ ; inline
diff --git a/extra/modules/rpc-server/rpc-server.factor b/extra/modules/rpc-server/rpc-server.factor
index 63d5a870b4..525ff35a09 100644
--- a/extra/modules/rpc-server/rpc-server.factor
+++ b/extra/modules/rpc-server/rpc-server.factor
@@ -31,8 +31,6 @@ MEMO: mem-do-rpc ( args word -- bytes ) do-rpc ; inline
 SYNTAX: service \ do-rpc  "executer" set (service) ;
 SYNTAX: mem-service \ mem-do-rpc "executer" set (service) ;
 
-: change-global ( var quot -- ) [ [ get-global ] keep ] dip dip set-global ; inline
-
 load-vocab-hook [
    [ dup words>> values
    \ mem-do-rpc "memoize" word-prop [ delete-at ] curry each ]