X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=DOODLE-TIPS;h=f817d19cc5733db85c1c05e2f975c40ee97d4566;hb=4d9c85cce61c5f3a0e1746a885b57b667f3843d8;hp=5d979a013089fd13ec9694ea25b442dd0e67f17a;hpb=d172c5b4e65095273156cefd01ca8f7f0b31bb0f;p=elisp%2Fflim.git

diff --git a/DOODLE-TIPS b/DOODLE-TIPS
index 5d979a0..f817d19 100644
--- a/DOODLE-TIPS
+++ b/DOODLE-TIPS
@@ -1,7 +1,8 @@
 * You should byte-compile(make).
 Because DOODLE uses very complex macro.
 
-Especialy ew-line.el, ew-scan-m.el, ew-scan-s.el and ew-scan-u.el that are require 'lex.
+Especialy ew-line.el, ew-scan-m.el, ew-scan-s.el and ew-scan-u.el that
+are require 'lex.
 (lex is scanner generator.)
 
 * Multiline field-bodies fetched from XOVER is already concatinated,
@@ -11,12 +12,29 @@ tell it here. Unless doing it, DOODLE does not decode atoms in phrase
 because DOODLE cannot decide whether an atom is in phrase or not without
 field name information.
 
+(setq gnus-structured-field-decoder
+   (lambda (string)
+     (if (fboundp 'ew-decode-field)
+         (let ((ew-ignore-76bytes-limit t))
+           (ew-cut-cr-lf
+             (ew-decode-field "From" (ew-lf-crlf-to-crlf string))))
+       (eword-decode-and-unfold-structured-field string))))
+
 (setq gnus-unstructured-field-decoder
-  (lambda (string)
-    (let ((ew-ignore-76bytes-limit t))
-      (ew-cut-cr-lf (ew-decode-field "Subject" (ew-lf-to-crlf string))))))
+   (lambda (string)
+     (if (fboundp 'ew-decode-field)
+         (let ((ew-ignore-76bytes-limit t))
+           (ew-cut-cr-lf
+             (ew-decode-field "Subject" (ew-lf-crlf-to-crlf string))))
+       (eword-decode-unstructured-field-body
+         (std11-unfold-string string) 'must-unfold))))
 
-(setq gnus-structured-field-decoder
-  (lambda (string)
-    (let ((ew-ignore-76bytes-limit t))
-      (ew-cut-cr-lf (ew-decode-field "From" (ew-lf-to-crlf string))))))
+* Ignore warnings about args-eword-* when byte-compiling.
+
+* If you have a problem with ew-ccl-b or other CCL based coding-system,
+set ew-bq-use-mel to t.
+
+* If you want to modify load-path or other variables when
+byte-compiling without editing files, set EVALARGS environment variable.
+
+  % EVALARGS='(setq load-path (cons "../apel" load-path))' make