factor: use ??if instead of ?if-old

[factor.git] / basis / vocabs / refresh / refresh.factor

diff --git a/basis/vocabs/refresh/refresh.factor b/basis/vocabs/refresh/refresh.factor
index 6ffe19e3d33d37cd7a5c4b0f219a15d46d99ac6a..722668aa69f33d341dc11e7bfdfccf80545b3ec8 100644 (file)
--- a/basis/vocabs/refresh/refresh.factor
+++ b/basis/vocabs/refresh/refresh.factor
@@ -6,7 +6,8 @@ namespaces sequences sets source-files vocabs vocabs.loader ;
 IN: vocabs.refresh
 
 : source-modified? ( path -- ? )
-    dup source-files get at [
+    [ source-files get at ]
+    [
         dup path>>
         dup file-exists? [
             utf8 file-lines crc32 checksum-lines
@@ -16,7 +17,7 @@ IN: vocabs.refresh
         ] if
     ] [
         file-exists?
-    ] ?if ;
+    ] ??if ;
 
 SYMBOL: changed-vocabs