]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/help/topics/topics.factor
Fix conflict
[factor.git] / basis / help / topics / topics.factor
index 459d7f9f2706bf06addc09b3a604f70d59e8d9e1..864b030126947b5f1d1b41441da555169c194359 100644 (file)
@@ -55,7 +55,7 @@ M: no-article summary
     drop "Help article does not exist" ;
 
 : article ( name -- article )
-    dup articles get at* [ nip ] [ drop no-article ] if ;
+    articles get ?at [ no-article ] unless ;
 
 M: object article-name article article-name ;
 M: object article-title article article-title ;