help.lint.checks: temporary fix for $quotation changes.

diff --git a/basis/help/lint/checks/checks.factor b/basis/help/lint/checks/checks.factor
index 7e518f98fc935f6b9b74d6e8c8ea17c2090be159..f5bae8911e3d5dbddb28049b5ce5a773a930584e 100644 (file)
--- a/basis/help/lint/checks/checks.factor
+++ b/basis/help/lint/checks/checks.factor
@@ -3,7 +3,7 @@
 USING: accessors arrays assocs classes classes.tuple combinators
 combinators.short-circuit debugger definitions effects eval
 formatting fry grouping help help.markup help.topics io
-io.streams.string kernel macros namespaces sequences
+io.streams.string kernel macros namespaces present sequences
 sequences.deep sets splitting strings summary unicode.categories
 vocabs vocabs.loader words words.constant words.symbol ;
 FROM: sets => members ;
@@ -45,7 +45,7 @@ SYMBOL: vocab-articles
     \ $values swap elements dup empty? [
         first rest [
             \ $quotation swap elements dup empty? [ drop f ] [
-                first second
+                first second present
             ] if
         ] map
     ] unless ;