- (date (match-string 2 string))
- (count (match-string 3 string))
- (authors (match-string 4 string))
- (subject (match-string 5 string))
- (tags (match-string 6 string))
- (tag-list (if tags (save-match-data (split-string tags)))))
- (if (/= (match-beginning 1) line)
+ (tags-str (match-string 7 string))
+ (result (list :thread thread-id
+ :date_relative (match-string 2 string)
+ :matched (string-to-number
+ (match-string 3 string))
+ :total (string-to-number
+ (match-string 4 string))
+ :authors (match-string 5 string)
+ :subject (match-string 6 string)
+ :tags (if tags-str
+ (save-match-data
+ (split-string tags-str))))))
+ (if (/= (match-beginning 0) line)