(onum (if (> knum 0)
(1- knum)
(1+ knum)))
- (raw-buf (current-buffer))
(oinfo (mime-raw-find-entity-from-node-id
(cons onum mother-node-id) mime-raw-message-info))
(basename (expand-file-name "tm" mime-temp-directory))
(orig-file (make-temp-name basename))
(sig-file (concat orig-file ".sig"))
)
- (write-region-as-binary (mime-entity-point-min oinfo)
- (mime-entity-point-max oinfo)
- orig-file)
+ (mime-raw-write-region (mime-entity-point-min oinfo)
+ (mime-entity-point-max oinfo)
+ orig-file)
(save-excursion (mime-show-echo-buffer))
(mime-write-decoded-region (save-excursion
(goto-char start)