From: tomo Date: Wed, 21 Jun 2000 03:59:01 +0000 (+0000) Subject: (mime-entity-header-buffer): Comment out. X-Git-Tag: chao-1_14_0-1~8 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ab9df1093c07e5106892e539d303da997048935f;p=elisp%2Fflim.git (mime-entity-header-buffer): Comment out. (mime-goto-header-start-point): Likewise. (mime-entity-header-start-point): Likewise. (mime-entity-header-end-point): Likewise. (mime-entity-body-buffer): Likewise. (mime-goto-body-start-point): Likewise. (mime-goto-body-end-point): Likewise. (mime-entity-body-start-point): Likewise. (mime-entity-body-end-point): Likewise. (mime-entity-buffer): Likewise. (mime-entity-point-min): Likewise. (mime-entity-point-max): Likewise. --- diff --git a/mmbuffer.el b/mmbuffer.el index dc1c5b2..0d55007 100644 --- a/mmbuffer.el +++ b/mmbuffer.el @@ -170,66 +170,66 @@ ;;; @ header buffer ;;; -(luna-define-method mime-entity-header-buffer ((entity mime-buffer-entity)) - (mime-buffer-entity-buffer-internal entity) - ) +;; (luna-define-method mime-entity-header-buffer ((entity mime-buffer-entity)) +;; (mime-buffer-entity-buffer-internal entity) +;; ) -(luna-define-method mime-goto-header-start-point ((entity mime-buffer-entity)) - (set-buffer (mime-buffer-entity-buffer-internal entity)) - (goto-char (mime-buffer-entity-header-start-internal entity)) - ) +;; (luna-define-method mime-goto-header-start-point ((entity mime-buffer-entity)) +;; (set-buffer (mime-buffer-entity-buffer-internal entity)) +;; (goto-char (mime-buffer-entity-header-start-internal entity)) +;; ) -(luna-define-method mime-entity-header-start-point ((entity - mime-buffer-entity)) - (mime-buffer-entity-header-start-internal entity) - ) +;; (luna-define-method mime-entity-header-start-point ((entity +;; mime-buffer-entity)) +;; (mime-buffer-entity-header-start-internal entity) +;; ) -(luna-define-method mime-entity-header-end-point ((entity - mime-buffer-entity)) - (mime-buffer-entity-header-end-internal entity) - ) +;; (luna-define-method mime-entity-header-end-point ((entity +;; mime-buffer-entity)) +;; (mime-buffer-entity-header-end-internal entity) +;; ) ;;; @ body buffer ;;; -(luna-define-method mime-entity-body-buffer ((entity mime-buffer-entity)) - (mime-buffer-entity-buffer-internal entity) - ) +;; (luna-define-method mime-entity-body-buffer ((entity mime-buffer-entity)) +;; (mime-buffer-entity-buffer-internal entity) +;; ) -(luna-define-method mime-goto-body-start-point ((entity mime-buffer-entity)) - (set-buffer (mime-buffer-entity-buffer-internal entity)) - (goto-char (mime-buffer-entity-body-start-internal entity)) - ) +;; (luna-define-method mime-goto-body-start-point ((entity mime-buffer-entity)) +;; (set-buffer (mime-buffer-entity-buffer-internal entity)) +;; (goto-char (mime-buffer-entity-body-start-internal entity)) +;; ) -(luna-define-method mime-goto-body-end-point ((entity mime-buffer-entity)) - (set-buffer (mime-buffer-entity-buffer-internal entity)) - (goto-char (mime-buffer-entity-body-end-internal entity)) - ) +;; (luna-define-method mime-goto-body-end-point ((entity mime-buffer-entity)) +;; (set-buffer (mime-buffer-entity-buffer-internal entity)) +;; (goto-char (mime-buffer-entity-body-end-internal entity)) +;; ) -(luna-define-method mime-entity-body-start-point ((entity mime-buffer-entity)) - (mime-buffer-entity-body-start-internal entity) - ) +;; (luna-define-method mime-entity-body-start-point ((entity mime-buffer-entity)) +;; (mime-buffer-entity-body-start-internal entity) +;; ) -(luna-define-method mime-entity-body-end-point ((entity mime-buffer-entity)) - (mime-buffer-entity-body-end-internal entity) - ) +;; (luna-define-method mime-entity-body-end-point ((entity mime-buffer-entity)) +;; (mime-buffer-entity-body-end-internal entity) +;; ) ;;; @ buffer (obsolete) ;;; -(luna-define-method mime-entity-buffer ((entity mime-buffer-entity)) - (mime-buffer-entity-buffer-internal entity) - ) +;; (luna-define-method mime-entity-buffer ((entity mime-buffer-entity)) +;; (mime-buffer-entity-buffer-internal entity) +;; ) -(luna-define-method mime-entity-point-min ((entity mime-buffer-entity)) - (mime-buffer-entity-header-start-internal entity) - ) +;; (luna-define-method mime-entity-point-min ((entity mime-buffer-entity)) +;; (mime-buffer-entity-header-start-internal entity) +;; ) -(luna-define-method mime-entity-point-max ((entity mime-buffer-entity)) - (mime-buffer-entity-body-end-internal entity) - ) +;; (luna-define-method mime-entity-point-max ((entity mime-buffer-entity)) +;; (mime-buffer-entity-body-end-internal entity) +;; ) ;;; @ end