Mercurial > hg > xemacs-beta
comparison lisp/gnus/dgnushack.el @ 100:4be1180a9e89 r20-1b2
Import from CVS: tag r20-1b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:15:11 +0200 |
parents | 0d2f883870bc |
children | 360340f9fd5f |
comparison
equal
deleted
inserted
replaced
99:2d83cbd90d8d | 100:4be1180a9e89 |
---|---|
58 (error (setq files (delete "nnweb.el" files)))) | 58 (error (setq files (delete "nnweb.el" files)))) |
59 (while (setq file (pop files)) | 59 (while (setq file (pop files)) |
60 (cond | 60 (cond |
61 ((or (string= file "custom.el") (string= file "browse-url.el")) | 61 ((or (string= file "custom.el") (string= file "browse-url.el")) |
62 (setq byte-compile-warnings nil)) | 62 (setq byte-compile-warnings nil)) |
63 (xemacs | |
64 (setq byte-compile-warnings | |
65 '(free-vars unresolved callargs redefine))) | |
66 (t | 63 (t |
67 (setq byte-compile-warnings | 64 (setq byte-compile-warnings |
68 '(free-vars unresolved callargs redefine obsolete)))) | 65 '(free-vars unresolved callargs redefine obsolete)))) |
69 (when (or (not (member file '("gnus-xmas.el" "gnus-picon.el" | 66 (when (or (not (member file '("gnus-xmas.el" "gnus-picon.el" |
70 "messagexmas.el" "nnheaderxm.el" | 67 "messagexmas.el" "nnheaderxm.el" |