(tar): Modify to convert `PACKAGE' in ftp.in.

[elisp/flim.git] / mime-parse.el

diff --git a/mime-parse.el b/mime-parse.el
index a61ec05..4a49855 100644 (file)
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -24,10 +24,8 @@
 
 ;;; Code:
 
-(require 'std11)
 (require 'mime-def)
-
-(eval-when-compile (require 'cl))
+(require 'std11)
 
 
 ;;; @ lexical analyzer
@@ -277,8 +275,8 @@ If is is not found, return DEFAULT-ENCODING."
    entity
    (with-current-buffer (mime-entity-body-buffer entity)
      (save-restriction
-       (narrow-to-region (mime-buffer-entity-body-start-internal entity)
-                        (mime-buffer-entity-body-end-internal entity))
+       (narrow-to-region (mime-entity-body-start-point entity)
+                        (mime-entity-body-end-point entity))
        (list (mime-parse-message
              (mime-entity-representation-type-internal entity) nil
              entity (cons 0 (mime-entity-node-id-internal entity))))