Index: openacs-4/packages/assessment/tcl/as-item-answer-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-answer-procs.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/assessment/tcl/as-item-answer-procs.tcl	7 Aug 2017 23:48:03 -0000	1.7
+++ openacs-4/packages/assessment/tcl/as-item-answer-procs.tcl	13 Jun 2018 11:39:24 -0000	1.8
@@ -39,7 +39,7 @@
 						[list regexp_text $regexp_text] \
 						[list allowed_answerbox_list $allowed_answerbox_list] ] ]
     # FIXME too much code repetition here
-    # maybe there are more efficient ways to to it (maybe using hashes to pass the values between functions)
+    # maybe there are more efficient ways to do it (maybe using hashes to pass the values between functions)
     }
 
     return $as_item_answer_id