Clean up docstrings for helpers module.

1 files changed, 3 insertions, 4 deletions

diff --git a/2d/helpers.scm b/2d/helpers.scm
index e71d7a1..cce88d8 100644
--- a/2d/helpers.scm
+++ b/2d/helpers.scm
@@ -29,11 +29,10 @@
             rgba->gl-color))
 
 (define (any-equal? elem . args)
-  "Returns true if elem equals any of the arguments and returns false
-otherwise."
+  "Return #t if ELEM equals any of the elements in the list ARGS."
   (any (lambda (e) (equal? elem e)) args))
 
 (define (logand? . args)
-  "Returns true if the result of a bitwise AND of the integer
-arguments is non-zero and returns false otherwise."
+  "Return #t if the result of a bitwise AND of the integers in list
+ARGS is non-zero."
   (not (zero? (apply logand args))))