comparison lisp/gnus/gnus-group.el @ 118:7d55a9ba150c r20-1b11

Import from CVS: tag r20-1b11
author cvs
date Mon, 13 Aug 2007 09:24:17 +0200
parents 9f59509498e1
children cca96a509cfe
comparison
equal deleted inserted replaced
117:578fd4947a72 118:7d55a9ba150c
2061 (gnus-group-real-name group) 2061 (gnus-group-real-name group)
2062 (list 'nndir (if all "hpc" "edu") 2062 (list 'nndir (if all "hpc" "edu")
2063 (list 'nndir-directory 2063 (list 'nndir-directory
2064 (if all gnus-group-archive-directory 2064 (if all gnus-group-archive-directory
2065 gnus-group-recent-archive-directory)))) 2065 gnus-group-recent-archive-directory))))
2066 (gnus-group-add-parameter group (cons 'to-address "ding@ifi.uio.no")))) 2066 (gnus-group-add-parameter group (cons 'to-address "ding@gnus.org"))))
2067 2067
2068 (defun gnus-group-make-directory-group (dir) 2068 (defun gnus-group-make-directory-group (dir)
2069 "Create an nndir group. 2069 "Create an nndir group.
2070 The user will be prompted for a directory. The contents of this 2070 The user will be prompted for a directory. The contents of this
2071 directory will be used as a newsgroup. The directory should contain 2071 directory will be used as a newsgroup. The directory should contain