* Makefile.in (install): Run install-etc.

[elisp/gnus.git-] / lisp / dgnushack.el

diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el
index 6d82064..fb47b53 100644 (file)
--- a/lisp/dgnushack.el
+++ b/lisp/dgnushack.el
@@ -1,6 +1,6 @@
 ;;; dgnushack.el --- a hack to set the load path for byte-compiling
-;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
-;;        Free Software Foundation, Inc.
+;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
+;; 2004, 2005 Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;;     Katsumi Yamaoka <yamaoka@jpl.org>
@@ -328,7 +328,8 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (autoload 'read-passwd "passwd")
     (autoload 'regexp-opt "regexp-opt")
     (autoload 'reporter-submit-bug-report "reporter")
-    (if (emacs-version>= 21 5)
+    (if (and (emacs-version>= 21 5)
+            (not (featurep 'sxemacs)))
        (autoload 'setenv "process" nil t)
       (autoload 'setenv "env" nil t))
     (autoload 'sgml-mode "psgml" nil t)
@@ -350,7 +351,6 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
     (defalias 'overlays-in 'ignore)
     (defalias 'replace-dehighlight 'ignore)
     (defalias 'replace-highlight 'ignore)
-    (defalias 'run-with-idle-timer 'ignore)
     (defalias 'w3-coding-system-for-mime-charset 'ignore)))
 
 ;; T-gnus stuff.
@@ -424,8 +424,7 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again.
                        ""))
             '("gnus-bbdb.el")))
          (unless (featurep 'xemacs)
-           '("gnus-xmas.el" "messagexmas.el" "nnheaderxm.el"
-             "run-at-time.el"))
+           '("gnus-xmas.el" "messagexmas.el" "nnheaderxm.el"))
          (when (and (fboundp 'base64-decode-string)
                     (subrp (symbol-function 'base64-decode-string)))
            '("base64.el"))
@@ -691,6 +690,22 @@ dgnushack-compile."
                                     t)
                    'string-lessp))
        (while (setq file (pop files))
-         (insert "info/" file "\n"))))))
+         (insert "info/" file "\n"))
+       (insert "etc/gnus-tut.txt\n")
+       (setq files
+             (sort (directory-files "../etc/images/gnus/" nil
+                                    "\\.\\(pbm\\|xbm\\|xpm\\)\\'"
+                                    t)
+                   'string-lessp))
+       (while (setq file (pop files))
+         (insert "etc/images/gnus/" file "\n"))
+       (insert "etc/images/gnus/x-splash\n")
+       (setq files
+             (sort (directory-files "../etc/images/smilies/" nil
+                                    "\\.\\(pbm\\|xpm\\)\\'"
+                                    t)
+                   'string-lessp))
+       (while (setq file (pop files))
+         (insert "etc/images/smilies/" file "\n"))))))
 
 ;;; dgnushack.el ends here