Mercurial > hg > xemacs-beta
comparison lisp/gnus/nnmail.el @ 112:48d667d6f17f r20-1b8
Import from CVS: tag r20-1b8
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:20:48 +0200 |
parents | fe104dbd9147 |
children | 8619ce7e4c50 |
comparison
equal
deleted
inserted
replaced
111:164ab62060bf | 112:48d667d6f17f |
---|---|
205 (defcustom nnmail-delete-file-function 'delete-file | 205 (defcustom nnmail-delete-file-function 'delete-file |
206 "Function called to delete files in some mail backends." | 206 "Function called to delete files in some mail backends." |
207 :group 'nnmail-files | 207 :group 'nnmail-files |
208 :type 'function) | 208 :type 'function) |
209 | 209 |
210 (defcustom nnmail-crosspost-link-function 'add-name-to-file | 210 (defcustom nnmail-crosspost-link-function |
211 (if (string-match "windows-nt\\|emx" (format "%s" system-type)) | |
212 'copy-file | |
213 'add-name-to-file) | |
211 "Function called to create a copy of a file. | 214 "Function called to create a copy of a file. |
212 This is `add-name-to-file' by default, which means that crossposts | 215 This is `add-name-to-file' by default, which means that crossposts |
213 will use hard links. If your file system doesn't allow hard | 216 will use hard links. If your file system doesn't allow hard |
214 links, you could set this variable to `copy-file' instead." | 217 links, you could set this variable to `copy-file' instead." |
215 :group 'nnmail-files | 218 :group 'nnmail-files |