diff --git a/source/qb64.bas b/source/qb64.bas
index 64dd32c82..cab2ff2dc 100644
--- a/source/qb64.bas
+++ b/source/qb64.bas
@@ -20589,14 +20589,6 @@ SUB regid
         id.cn = n$
     END IF
 
-    IF LEN(Refactor_Source) THEN
-        n$ = RTRIM$(id.n)
-        IF UCASE$(n$) = UCASE$(Refactor_Source) THEN
-            id.cn = Refactor_Dest
-        END IF
-    END IF
-
-
     id.insubfunc = subfunc
     id.insubfuncn = subfuncn