(elmo-imap4-flags-to-imap): Preserve argument

[elisp/wanderlust.git] / WL-MK

diff --git a/WL-MK b/WL-MK
index abaac88..c2befaf 100644 (file)
--- a/WL-MK
+++ b/WL-MK
@@ -234,6 +234,15 @@
    objs))
 
 
+(defun wl-examine-modules ()
+  "Examine wl modules should be byte-compile'd."
+  (config-wl-package-subr)
+  (make-wl-news)
+  (dolist (module modules-alist)
+    (dolist (filename (cdr module))
+      (princ (format "%s/%s.elc " (car module) filename)))))
+
+
 (defun compile-wl-package ()
   (config-wl-package)
   (make-wl-news)
@@ -385,8 +394,7 @@
 (defun wl-texinfo-format-file (lang)
   (require 'wl-vars) ;; for 'wl-cs-local
   (or (wl-texinfo-check-newer lang)
-      (let (obuf
-           (undo-outer-limit (eval '(lsh -1 -1))))
+      (let (obuf)
        ;; Support old texinfmt.el
        (require 'ptexinfmt (expand-file-name "ptexinfmt.el" UTILSDIR))
        (find-file (expand-file-name (wl-texinfo-texi-file lang) DOCDIR))