Agenda: Fix bug with state change matching for log display

Reported by Matt Lundin.

lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-02-20  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-agenda.el (org-agenda-get-progress): Fix bug with state
+	matching.
+
 	* org-list.el (org-indent-item): Allow point to be at the end of
 	the region.
 

lisp/org-agenda.el

@@ -3558,7 +3558,7 @@ the documentation of `org-diary'."
 		(list
 		 (if (memq 'closed items) (concat "\\<" org-closed-string))
 		 (if (memq 'clock items) (concat "\\<" org-clock-string))
-		 (if (memq 'state items) "- State \"\\([a-zA-Z0-9]+\\)\""))))
+		 (if (memq 'state items) "- State \"\\([a-zA-Z0-9]+\\)\".*?"))))
 	 (parts-re (if parts (mapconcat 'identity parts "\\|")
 		     (error "`org-agenda-log-mode-items' is empty")))
 	 (regexp (concat