Rename `mime-preview/' -> `mime-preview-'.

diff --git a/mime-image.el b/mime-image.el
index d24963a..825a419 100644 (file)
--- a/mime-image.el
+++ b/mime-image.el
@@ -65,12 +65,12 @@
        ;;
        (autoload 'highlight-headers "highlight-headers")
        
-       (defun mime-preview/x-face-function-use-highlight-headers ()
+       (defun mime-preview-x-face-function-use-highlight-headers ()
         (highlight-headers (point-min) (re-search-forward "^$" nil t) t)
         )
        
        (add-hook 'mime-view-content-header-filter-hook
-                'mime-preview/x-face-function-use-highlight-headers)
+                'mime-preview-x-face-function-use-highlight-headers)
        
        )
       ((featurep 'mule)

diff --git a/mime-play.el b/mime-play.el
index 435aa46..30cdfbf 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -34,7 +34,7 @@
 ;;; @ content decoder
 ;;;
 
-(defvar mime-preview/after-decoded-position nil)
+(defvar mime-preview-after-decoded-position nil)
 
 (defun mime-view-play-current-entity (&optional mode)
   "Play current entity.
@@ -50,13 +50,13 @@ If MODE is specified, play as it.  Default MODE is \"play\"."
        (let ((the-buf (current-buffer))
              (raw-buffer (get-text-property (point) 'mime-view-raw-buffer))
              )
-         (setq mime-preview/after-decoded-position (point))
+         (setq mime-preview-after-decoded-position (point))
          (set-buffer raw-buffer)
          (mime-playback-entity cinfo mode)
          (if (eq (current-buffer) raw-buffer)
              (progn
                (set-buffer the-buf)
-               (goto-char mime-preview/after-decoded-position)
+               (goto-char mime-preview-after-decoded-position)
                ))
          ))))