mason.release.archive: use code-array literal

diff --git a/extra/mason/release/archive/archive.factor b/extra/mason/release/archive/archive.factor
index 5932771900d7d1fcac0c85a46d60b63f7f879a9c..7b18186fcd1300a26650ee91c84755fc0414adf7 100644 (file)
--- a/extra/mason/release/archive/archive.factor
+++ b/extra/mason/release/archive/archive.factor
@@ -1,8 +1,8 @@
 ! Copyright (C) 2008 Eduardo Cavazos, Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors combinators io.directories
-io.directories.hierarchy io.files io.pathnames kernel locals
-make mason.common mason.config mason.platform namespaces
+io.directories.hierarchy io.files io.pathnames kernel literals
+locals make mason.common mason.config mason.platform namespaces
 sequences system words ;
 IN: mason.release.archive
 
@@ -38,13 +38,12 @@ IN: mason.release.archive
 : sign-factor.app? ( -- ? ) cert-path exists? ;
 
 :: sign-factor.app ( -- )
-    {
+    ${
         "codesign" "--force" "--sign"
         "Developer ID Application"
-    }
-    cert-path suffix
-    "Factor.app/" suffix
-    short-running-process ;
+        cert-path
+        "Factor.app/"
+    } short-running-process ;
 
 ! Make the .dmg
 : make-macosx-archive ( archive-name -- )