| 1 | # |
| 2 | # Every user's newsrc is checked by the newsrc-listgroups program |
| 3 | # and if it hasn't got too many groups in it, they will be fetched. |
| 4 | # |
| 5 | # The service should spit out a list of legal newsgroup names, |
| 6 | # and will always be invoked by something in group news. |
| 7 | |
| 8 | reset |
| 9 | no-set-environment |
| 10 | suppress-args |
| 11 | ignore-fd 0 |
| 12 | |
| 13 | if ! glob calling-group news |
| 14 | error Sorry (caller). |
| 15 | fi |
| 16 | if ! grep service-user-shell /etc/shells |
| 17 | message Warning - newsrc-listgroups for user whose shell not in shells |
| 18 | execute /bin/true |
| 19 | quit |
| 20 | fi |
| 21 | |
| 22 | execute /usr/local/lib/news/feed+read/newsrc-listgroups /etc/news/nntp-merge.conf |