diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index c3742786b2..487d75cc6c 100755
--- a/core/parser/parser.factor
+++ b/core/parser/parser.factor
@@ -216,7 +216,7 @@ SYMBOL: interactive-vocabs
 : filter-moved ( assoc1 assoc2 -- seq )
     swap assoc-diff [
         drop where dup [ first ] when
-        file get source-file-path =
+        file get path>> =
     ] assoc-filter keys ;
 
 : removed-definitions ( -- assoc1 assoc2 )