]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/help/lint/spaces/spaces.factor
core: subseq-index? -> subseq-of?
[factor.git] / basis / help / lint / spaces / spaces.factor
index 9c3e769992c0b6d382389802e3c5bfd9b70d603b..d8c6f161abddc5d564ebf9c8c0b75249cec792a5 100644 (file)
@@ -1,9 +1,8 @@
 ! Copyright (C) 2017 Alexander Ilin.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: arrays combinators.short-circuit formatting io
-io.directories io.encodings.utf8 io.files io.pathnames
-kernel math namespaces prettyprint sequences ui.gadgets.panes
-vocabs.loader ;
+USING: arrays combinators.short-circuit formatting
+io.directories io.encodings.utf8 io.files io.pathnames kernel
+math namespaces prettyprint sequences vocabs.loader ;
 
 IN: help.lint.spaces
 
@@ -19,7 +18,7 @@ IN: help.lint.spaces
             first [
                 { [ CHAR: space = ] [ CHAR: " = ] } 1||
             ] trim-head
-            "  " swap subseq?
+            "  " subseq-of?
         ] filter
         [ drop ] [
             swap <pathname> .