Document delete-substrings.

* dump.scm (delete-substring): Add docstring.

1 files changed, 1 insertions, 0 deletions

diff --git a/dump.scm b/dump.scm
index 587cdbf..cab926c 100755
--- a/dump.scm
+++ b/dump.scm
@@ -76,6 +76,7 @@
 ;;; Dump tables
 
 (define (delete-substrings str . substrings)
+  "Delete SUBSTRINGS, a list of strings, from STR."
   (fold (lambda (substring result)
           (string-replace-substring result substring ""))
         str