(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)