(mm-define-backend buffer)
-(mm-define-method open-entity ((nil buffer) location)
+(mm-define-method open ((nil buffer) location)
(mime-parse-buffer location))
(mm-define-method point-min ((entity buffer))
(mm-define-backend cooked (buffer))
-(mm-define-method open-entity ((nil cooked) location)
+(mm-define-method open ((nil cooked) location)
(mime-parse-buffer location 'cooked))
(mm-define-method cooked-p ((entity cooked)) t)