mirror of https://github.com/djcb/mu.git
parent
22b2d44b96
commit
72a9ee9d4b
|
@ -1069,8 +1069,8 @@ The alist uniquely maps the number to the gnus-part."
|
||||||
(while (not (eobp))
|
(while (not (eobp))
|
||||||
(let ((part (get-text-property (point) 'gnus-data))
|
(let ((part (get-text-property (point) 'gnus-data))
|
||||||
(index (get-text-property (point) 'gnus-part)))
|
(index (get-text-property (point) 'gnus-part)))
|
||||||
(when (and part (numberp index) (not (assoc index parts))
|
(when (and part (numberp index) (not (assoc index parts)))
|
||||||
(push `(,index . ,part) parts)))
|
(push `(,index . ,part) parts))
|
||||||
(goto-char (or (next-single-property-change (point) 'gnus-part)
|
(goto-char (or (next-single-property-change (point) 'gnus-part)
|
||||||
(point-max))))))
|
(point-max))))))
|
||||||
parts))
|
parts))
|
||||||
|
|
Loading…
Reference in New Issue