Mercurial > hg > xemacs-beta
comparison lisp/gnus/nnmail.el @ 34:d620409f5eb8 r19-15b100
Import from CVS: tag r19-15b100
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:53:20 +0200 |
parents | e04119814345 |
children | 1a767b41a199 |
comparison
equal
deleted
inserted
replaced
33:9ee3cade837d | 34:d620409f5eb8 |
---|---|
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 |