vocabs.metadata: fix for error refactoring.

diff --git a/basis/vocabs/metadata/metadata.factor b/basis/vocabs/metadata/metadata.factor
index a1ab1e06e608eacd4fec94690216e3ab46d3cc80..f6aa934145c05eb87a4ec2c8a79504c5a42fcce5 100644 (file)
--- a/basis/vocabs/metadata/metadata.factor
+++ b/basis/vocabs/metadata/metadata.factor
@@ -126,5 +126,5 @@ M: unsupported-platform summary
 
 [
     dup vocab-platforms dup supported-platform?
-    [ 2drop ] [ [ vocab-name ] dip unsupported-platform ] if
+    [ 2drop ] [ [ vocab-name ] dip throw-unsupported-platform ] if
 ] check-vocab-hook set-global