factor: trim using lists

[factor.git] / extra / ctags / etags / etags-docs.factor

diff --git a/extra/ctags/etags/etags-docs.factor b/extra/ctags/etags/etags-docs.factor
index 28ca7ff165e1589179fa549352f6796f2e1dda23..be992b3ffbb0987d6fae0e69bd1a210708505953 100644 (file)
--- a/extra/ctags/etags/etags-docs.factor
+++ b/extra/ctags/etags/etags-docs.factor
@@ -1,16 +1,14 @@
-USING: help.syntax help.markup kernel prettyprint sequences strings words math ;
+USING: help.markup help.syntax strings ;
 IN: ctags.etags
 
 ARTICLE: "etags" "Etags file"
 { $emphasis "Etags" } " generates a index file of every factor word in etags format as supported by emacs and other editors. More information can be found at " { $url "http://en.wikipedia.org/wiki/Ctags#Etags_2" } "."
 { $subsections
     etags
-    etags-write
-    etag-strings
-    etag-header
-}
+    write-etags
+} ;
 
-HELP: etags ( path -- )
+HELP: write-etags
 { $values { "path" string } }
 { $description "Generates a index file in etags format and stores in " { $snippet "path" } "." }
 { $examples
@@ -21,21 +19,4 @@ HELP: etags ( path -- )
   }
 } ;
 
-HELP: etags-write ( alist path -- )
-{ $values { "alist" sequence }
-          { "path" string } }
-{ $description "Stores a " { $snippet "alist" } " in " { $snippet "path" } ". " { $snippet "alist" } " must be an association list with etags format: its key must be a resource path and its value a vector, containing pairs of words and lines" }
-{ $examples
-  { $unchecked-example
-    "USING: kernel etags.ctags ;"
-    "{ { \"resource:extra/unix/unix.factor\" V{ { dup2 91 } } } } \"ETAGS\" etags-write"
-    ""
-  }
-} ;
-
-HELP: etag-strings ( alist -- seq )
-{ $values { "alist" sequence }
-          { "seq" sequence } }
-{ $description "Converts an " { $snippet "alist" } " with etag format (a path as key and a vector containing word/line pairs) in a " { $snippet "seq" } " of strings." } ;
-
-ABOUT: "etags" ;
\ No newline at end of file
+ABOUT: "etags"