Removing more >r/r> usages

[factor.git] / basis / tools / deploy / config / config.factor

diff --git a/basis/tools/deploy/config/config.factor b/basis/tools/deploy/config/config.factor
index c78e0a32ba94d0d7b5fb94af9e911886ec8c7650..84bfab682be2dc4457fa4db93123d45442b1a24b 100644 (file)
--- a/basis/tools/deploy/config/config.factor
+++ b/basis/tools/deploy/config/config.factor
@@ -76,7 +76,7 @@ SYMBOL: deploy-image
     parse-fresh [ first assoc-union ] unless-empty ;
 
 : set-deploy-config ( assoc vocab -- )
-    >r unparse-use string-lines r>
+    [ unparse-use string-lines ] dip
     dup deploy-config-path set-vocab-file-contents ;
 
 : set-deploy-flag ( value key vocab -- )