@@ -165,7 +165,7 @@ is replaced with replacement."
(mapcar (lambda (e) (string-trim '(#\Newline #\Space) (plump:text e)))
(get-by-tag row "td")))
(format-data (data)
- (format nil "~{~A~^ ~}" (mapcar (lambda (n) (nth n data)) '(1 2 3 4 7))))
+ (format nil "~{~A~^ ~}" (mapcar (lambda (n) (nth n data)) '(1 2 3 4 7 6))))
(get-intresting (rows)
(loop for row in rows
for data = (row-data row)
