Fixed `mime-setup-enable-inline-html' comments.

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index bad17f4..217264d 100644 (file)
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -91,6 +91,7 @@
 ;(setq wl-draft-use-frame t)
 
 ;; Disable inline display HTML part.
+;; Put before (require 'mime-setup)
 ;(setq mime-setup-enable-inline-html nil)
 
 ;; Don't split large message.
@@ -182,7 +183,7 @@
                            (cadr (split-string sequence " ")))))
     (if (string-match
 ;;;     "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
-         "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
+        "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         subject-string)
        (progn
          (setq subj (substring subject-string (match-end 0)))
@@ -296,11 +297,11 @@
 ;; rule for auto refile.
 ;(setq wl-refile-rule-alist
 ;      '(
-;      ("x-ml-name"
-;       ("^Wanderlust" . "+wl")
-;       ("^Elisp" . "+elisp"))
-;      ("From"
-;       ("teranisi@isl.ntt.co.jp" . "+teranisi"))))
+;      ("x-ml-name"
+;       ("^Wanderlust" . "+wl")
+;       ("^Elisp" . "+elisp"))
+;      ("From"
+;       ("teranisi@isl.ntt.co.jp" . "+teranisi"))))
 
 ;; Marks to skip auto-refile (default is "N" "U" "!").
 ;; nil means all message is auto-refiled.

diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index b0f79fe..3f4c8f2 100644 (file)
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -91,6 +91,7 @@
 ;(setq wl-draft-use-frame t)
 
 ;; HTML \e$B%Q!<%H$rI=<($7$J$$\e(B
+;; (require 'mime-setup) \e$B$h$j@h$K5-=R$9$kI,MW$,$"$j$^$9!#\e(B
 ;(setq mime-setup-enable-inline-html nil)
 
 ;; \e$BBg$-$$%a%C%;!<%8$rAw?.;~$KJ,3d$7$J$$\e(B
@@ -187,7 +188,7 @@
                            (cadr (split-string sequence " ")))))
     (if (string-match
 ;;;     "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
-         "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
+        "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         subject-string)
        (progn
          (setq subj (substring subject-string (match-end 0)))
@@ -225,12 +226,12 @@
       '(("default"
         ("From" . wl-from)
         ("Organization" . "~/.wl sample")
-        (body . "  \e$B!{!{$G$9!#\e(B\n"))               ;; \e$BK\J8\e(B
+        (body . "  \e$B!{!{$G$9!#\e(B\n"))       ; \e$BK\J8\e(B
        ("report"
         ("To" . "boss@example.com")
         ("Subject" . "\e$BJs9p\e(B")
-        (top . "\e$B:#=5$NJs9p$G$9!#\e(B\n")             ;; \e$BK\J8@hF,$X$NA^F~\e(B
-;;      (bottom-file . "~/work/report.txt")    ;; \e$BK\J8KvHx$X%U%!%$%k$NA^F~\e(B
+        (top . "\e$B:#=5$NJs9p$G$9!#\e(B\n")     ; \e$BK\J8@hF,$X$NA^F~\e(B
+;;      (bottom-file . "~/work/report.txt") ; \e$BK\J8KvHx$X%U%!%$%k$NA^F~\e(B
         )
        ))
 
@@ -239,11 +240,11 @@
 (setq wl-draft-config-alist
       '((reply                 ;; \e$BJV?.85$N%P%C%U%!$r8+$k\e(B
         "^To: .*\\(test-notsend-wl@lists.airs.net\\)"
-        (template . "default"))                ;; \e$B%F%s%W%l!<%H\e(B
+        (template . "default"))        ; \e$B%F%s%W%l!<%H\e(B
        ("^To: .*\\(test-notsend-wl@lists.airs.net\\)"
-        wl-ml-draft-config-func                ;; \e$B4X?t\e(B
-        ("From" . wl-from)                     ;; \e$BJQ?t\e(B
-        ("Organization" . "~/.wl sample"))     ;; \e$BJ8;zNs\e(B
+        wl-ml-draft-config-func        ; \e$B4X?t\e(B
+        ("From" . wl-from)             ; \e$BJQ?t\e(B
+        ("Organization" . "~/.wl sample")) ; \e$BJ8;zNs\e(B
        ("^Newsgroups: test.*"
         ("Organization" . "\e$B%K%e!<%9Ej9F;~$NAH?%L>\e(B"))
        ))
@@ -308,11 +309,11 @@
 ;; \e$B<+F0%j%U%!%$%k$N%k!<%k@_Dj\e(B
 ;(setq wl-refile-rule-alist
 ;      '(
-;      ("x-ml-name"
-;       ("^Wanderlust" . "+wl")
-;       ("^Elisp" . "+elisp"))
-;      ("From"
-;       ("teranisi@isl.ntt.co.jp" . "+teranisi"))))
+;      ("x-ml-name"
+;       ("^Wanderlust" . "+wl")
+;       ("^Elisp" . "+elisp"))
+;      ("From"
+;       ("teranisi@isl.ntt.co.jp" . "+teranisi"))))
 
 ;; \e$B<+F0%j%U%!%$%k$7$J$$1JB3%^!<%/$r@_Dj\e(B
 ;; \e$BI8=`$G$O\e(B "N" "U" "!" \e$B$K$J$C$F$*$j!"L$FI%a%C%;!<%8$r<+F0%j%U%!%$%k$7\e(B