From: John Benediktsson <mrjbq7@gmail.com>
Date: Fri, 1 Sep 2023 23:16:19 +0000 (-0700)
Subject: models.combinators: fix help-lint
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=263ae23c7af61a0ec1645e19d28c7e05a0e161ed

models.combinators: fix help-lint
---

diff --git a/extra/models/combinators/combinators-docs.factor b/extra/models/combinators/combinators-docs.factor
index a7e3e8c4c7..ea98ad3e7a 100644
--- a/extra/models/combinators/combinators-docs.factor
+++ b/extra/models/combinators/combinators-docs.factor
@@ -10,7 +10,7 @@ HELP: filter-model
 { $description "Creates a model that uses the updates of another model only when they satisfy a given predicate" } ;
 
 HELP: fold
-{ $values { "model" model } { "oldval" "starting value" } { "quot" "applied to update and previous values" } { "model" model } }
+{ $values { "model" model } { "oldval" "starting value" } { "quot" "applied to update and previous values" } }
 { $description "Similar to " { $link reduce } " but works on models, applying a quotation to the previous and new values at each update" } ;
 
 HELP: switch-models
@@ -18,7 +18,7 @@ HELP: switch-models
 { $description "Creates a model that starts with the behavior of model2 and switches to the behavior of model1 on its update" } ;
 
 HELP: <mapped>
-{ $values { "model" model } { "quot" "applied to model's value on updates" } { "model" model } }
+{ $values { "model" model } { "quot" "applied to model's value on updates" } }
 { $description "An expanded version of " { $link <arrow> } ". Use " { $link fmap } " instead." } ;
 
 HELP: when-model