Merge pull request #1937 from thierryvolpiatto/Fix_mu4e-view-gnus-save-mime-parts
Fix error in mu4e-view-gnus-save-mime-parts
This commit is contained in:
@ -1435,7 +1435,7 @@ attachments is done with `completing-read-multiple', in this case use
|
|||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(while (not (eobp))
|
(while (not (eobp))
|
||||||
(let ((handle (get-text-property (point) 'gnus-data)))
|
(let ((handle (get-text-property (point) 'gnus-data)))
|
||||||
(when handle
|
(when (consp handle)
|
||||||
(let ((fname (cdr (assoc 'filename (assoc "attachment" (cdr handle))))))
|
(let ((fname (cdr (assoc 'filename (assoc "attachment" (cdr handle))))))
|
||||||
(when fname
|
(when fname
|
||||||
(push `(,fname . ,handle) handles)
|
(push `(,fname . ,handle) handles)
|
||||||
|
|||||||
Reference in New Issue
Block a user