Synch to Oort Gnus 200304292337.

* dgnushack.el: Autoload nnheader for XEmacs -no-autoloads.

diff --git a/ChangeLog b/ChangeLog
index 026c198..e873a32 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,7 @@
 2003-04-29  Katsumi Yamaoka  <yamaoka@jpl.org>
 
-       * lisp/dgnushack.el: Autoload font-lock for XEmacs -no-autoloads.
+       * lisp/dgnushack.el: Autoload font-lock and nnheader for XEmacs
+       -no-autoloads.
 
        * lisp/pop3.el: Require `advice' for compiling it in Gnus.
 

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5fb1692..5edcbe3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-04-30  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * lpath.el: Fbind string-to-multibyte.
+
 2003-04-30  Steve Youngs  <youngs@xemacs.org>
 
        * dgnushack.el: Add some missing autoloads for XEmacs 21.1.

diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el
index 4aac7c8..9998f95 100644 (file)
--- a/lisp/dgnushack.el
+++ b/lisp/dgnushack.el
@@ -480,14 +480,12 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (autoload 'apropos-command "apropos" nil t)
     (autoload 'bbdb-complete-name "bbdb-com" nil t)
     (autoload 'browse-url "browse-url" nil t)
-    (autoload 'c-mode "cc-mode" nil t)
     (autoload 'customize-apropos "cus-edit" nil t)
     (autoload 'customize-save-variable "cus-edit" nil t)
     (autoload 'customize-variable "cus-edit" nil t)
     (autoload 'delete-annotation "annotations")
     (autoload 'dolist "cl-macs" nil nil 'macro)
     (autoload 'enriched-decode "enriched")
-    (autoload 'font-lock-mode "font-lock" nil t)
     (autoload 'info "info" nil t)
     (autoload 'make-annotation "annotations")
     (autoload 'make-display-table "disp-table")
@@ -495,7 +493,6 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (autoload 'ps-despool "ps-print" nil t)
     (autoload 'ps-spool-buffer "ps-print" nil t)
     (autoload 'ps-spool-buffer-with-faces "ps-print" nil t)
-    (autoload 'read-kbd-macro "edmacro" nil t)
     (autoload 'read-passwd "passwd")
     (autoload 'regexp-opt "regexp-opt")
     (autoload 'reporter-submit-bug-report "reporter")
@@ -506,7 +503,6 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (autoload 'sort-numeric-fields "sort" nil t)
     (autoload 'sort-subr "sort")
     (autoload 'trace-function-background "trace" nil t)
-    (autoload 'turn-on-font-lock "font-lock" nil t)
     (autoload 'w3-do-setup "w3")
     (autoload 'w3-prepare-buffer "w3-display")
     (autoload 'w3-region "w3-display" nil t)
@@ -524,6 +520,18 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (defalias 'run-with-idle-timer 'ignore)
     (defalias 'w3-coding-system-for-mime-charset 'ignore)))
 
+;; T-gnus stuff.
+(eval-and-compile
+  (when (featurep 'xemacs)
+    (autoload 'c-mode "cc-mode" nil t)
+    (autoload 'font-lock-mode "font-lock" nil t)
+    (autoload 'nnheader-detect-coding-region "nnheader")
+    (autoload 'read-kbd-macro "edmacro" nil t)
+    (autoload 'std11-extract-addresses-components "nnheader")
+    (autoload 'std11-fold-regionstd11-unfold-region "nnheader")
+    (autoload 'std11-narrow-to-field "nnheader")
+    (autoload 'turn-on-font-lock "font-lock" nil t)))
+
 (defconst dgnushack-unexporting-files
   (append '("dgnushack.el" "dgnuspath.el" "dgnuskwds.el" "lpath.el")
          (condition-case nil

diff --git a/lisp/lpath.el b/lisp/lpath.el
index 06d2bd1..3171f5f 100644 (file)
--- a/lisp/lpath.el
+++ b/lisp/lpath.el
@@ -17,7 +17,7 @@
               propertize put-image replace-regexp-in-string
               rmail-msg-is-pruned rmail-msg-restore-non-pruned-header
               sort-coding-systems spam-BBDB-register-routine
-              spam-enter-ham-BBDB tool-bar-add-item
+              spam-enter-ham-BBDB string-to-multibyte tool-bar-add-item
               tool-bar-add-item-from-menu tool-bar-local-item-from-menu
               url-http-file-exists-p vcard-pretty-print w32-focus-frame
               w3m-charset-to-coding-system x-focus-frame))