diff --git a/test/codetoolstests/testcompleteblock.pas b/test/codetoolstests/testcompleteblock.pas
index ac9fefc588..c290fefba2 100644
--- a/test/codetoolstests/testcompleteblock.pas
+++ b/test/codetoolstests/testcompleteblock.pas
@@ -200,7 +200,7 @@ begin
                +'  end;'+LineEnding
                +'  writeln;'+LineEnding
                +'end.');
-  { Not implemented yet:
+  { Todo: Not implemented yet
   CompleteBlock('procedure a;'+LineEnding
                +'begin|'+LineEnding
                +'begin'+LineEnding