From 6c4960737ccffccaf8af76b75efdd984071362a9 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 30 Mar 2016 21:52:13 -0700 Subject: [PATCH] vocabs.metadata: Allow empty lines in platforms.txt parsing. Fixes 1554. --- basis/vocabs/metadata/metadata.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/vocabs/metadata/metadata.factor b/basis/vocabs/metadata/metadata.factor index e2bef1f726..e89a6d5996 100644 --- a/basis/vocabs/metadata/metadata.factor +++ b/basis/vocabs/metadata/metadata.factor @@ -85,7 +85,7 @@ M: vocab-link summary vocab-summary ; ERROR: bad-platform name ; : vocab-platforms ( vocab -- platforms ) - dup vocab-platforms-path vocab-file-contents + dup vocab-platforms-path vocab-file-contents harvest [ dup "system" lookup-word [ ] [ bad-platform ] ?if ] map ; : set-vocab-platforms ( platforms vocab -- )