IDE: fixed parsing of todo items without semicolon, support was removed in r13010 #42edb792e6 (issue #13684)

git-svn-id: trunk@19939 -

ide/todolist.pas

@@ -40,6 +40,14 @@
 
     the -o and -c tags are optional.
 
+    If the -o and -c tags are not used, then the variant without semicolon is
+    allowed too:
+    {TODO Todo_text}
+    {DONE Todo_text}
+    {#todo Todo_text}
+    {#done Todo_text}
+
+    
     Sub comments in nested comments are ignored.
 *)
 {#todo options }
@@ -413,11 +421,13 @@ begin
     aTLFile.Add(Result);
   end;
 
+  if Pos(cSemiColon, ParsingString)>0 then
+  begin
+    // Parse priority, owner and category
     n := 1;
     TempStr := '';
     Strlen  := Length(ParsingString);
 
-  // Parse priority, owner and category
     while (n <= StrLen) and (ParsingString[n]<>cSemiColon) do
     begin
 
@@ -441,6 +451,7 @@ begin
     SetItemFields(Result, TempStr);
 
     Delete(ParsingString, 1, n);
+  end;
 
   // Set item text
   Result.Text := ParsingString;