new accessors

2008-08-30 12:34:45 -05:00 · 2008-08-30 12:34:45 -05:00 · 0f3d585dd2
parent 582aeaf73a
commit 0f3d585dd2
1 changed files with 1 additions and 1 deletions
--- 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 )