--- pukiwiki-mode.el.orig	Mon Apr 12 05:56:41 2004
+++ pukiwiki-mode.el	Mon Apr 12 16:58:26 2004
@@ -646,6 +646,7 @@
 (defun pukiwiki-edit-preview (&optional toggle)
   (interactive "P")
   (let ((site-url (pukiwiki-site-url))
+	(coding-system (pukiwiki-site-coding-system))
         (filename (concat
                    (expand-file-name
                     (concat (make-temp-name "pw") ".html")
@@ -667,8 +668,8 @@
     (add-to-list 'post-data (cons "msg" contents))
     (setq buf
           (pukiwiki-http-request 'post nil pukiwiki-pagename
-                                 (pukiwiki-site-url)
-                                 (pukiwiki-site-coding-system)
+				 site-url
+				 coding-system
                                  post-data))
     (setq pukiwiki-post-data post-data)
     (message "Sending... done.")
@@ -687,7 +688,7 @@
         (re-search-backward "</html>" nil t)
         (end-of-line)
         (delete-region (point) (point-max))
-        (set-buffer-file-coding-system (pukiwiki-site-coding-system))
+        (set-buffer-file-coding-system coding-system)
         (write-region (point-min) (point-max) filename)
         (setq pukiwiki-preview-file-list
               (cons