diff options
| author | Manoj Srivastava <srivasta@debian.org> | 2008-05-30 12:42:47 -0700 |
|---|---|---|
| committer | Manoj Srivastava <srivasta@debian.org> | 2008-05-30 12:42:47 -0700 |
| commit | ceb3507a8fca872770b3dcd7e5c5b36179ab95b0 (patch) | |
| tree | b46b4e25cfff5f4c13a330b8428ceed343e3796c /mcon/U/d_newsadm.U | |
Import dist_3.5-236.orig.tar.gz
[dgit import orig dist_3.5-236.orig.tar.gz]
Diffstat (limited to 'mcon/U/d_newsadm.U')
| -rw-r--r-- | mcon/U/d_newsadm.U | 72 |
1 files changed, 72 insertions, 0 deletions
diff --git a/mcon/U/d_newsadm.U b/mcon/U/d_newsadm.U new file mode 100644 index 0000000..ed51502 --- /dev/null +++ b/mcon/U/d_newsadm.U @@ -0,0 +1,72 @@ +?RCS: $Id$ +?RCS: +?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi +?RCS: +?RCS: You may redistribute only under the terms of the Artistic License, +?RCS: as specified in the README file that comes with the distribution. +?RCS: You may reuse parts of this distribution only within the terms of +?RCS: that same Artistic License; a copy of which may be found at the root +?RCS: of the source tree for dist 4.0. +?RCS: +?RCS: $Log: d_newsadm.U,v $ +?RCS: Revision 3.0.1.2 1997/02/28 15:36:53 ram +?RCS: patch61: added Guess dependency +?RCS: +?RCS: Revision 3.0.1.1 1994/10/29 16:14:33 ram +?RCS: patch36: call ./eunice explicitly instead of relying on PATH +?RCS: +?RCS: Revision 3.0 1993/08/18 12:06:42 ram +?RCS: Baseline for dist 3.0 netwide release. +?RCS: +?MAKE:d_newsadm newsadmin: cat contains Guess Setvar Myread Oldconfig +?MAKE: -pick add $@ %< +?S:d_newsadm: +?S: This variable conditionally defines the NEWS_ADMIN symbol, which +?S: indicates to the C program that there is a user who is in charge +?S: of news administration. +?S:. +?S:newsadmin: +?S: This variable holds the login name of the news administrator, if any. +?S:. +?C:NEWS_ADMIN (NEWSADMIN): +?C: This symbol, if defined, contains the login name of the news +?C: administrator. +?C:. +?H:#$d_newsadm NEWS_ADMIN "$newsadmin" /**/ +?H:. +?LINT:set d_newsadm +: get news administrator name +case "$newsadmin" in +'') + if $contains "^news:" /etc/passwd >/dev/null 2>&1 ; then + dflt=news + elif $contains "^usenet:" /etc/passwd >/dev/null 2>&1 ; then + dflt=usenet + elif ./eunice; then + dflt=system + else + dflt=root + fi + ;; +*) + dflt="$newsadmin" + ;; +esac +$cat <<'EOM' + +Many systems keep their news in a private directory, or have a non-superuser +in charge of administering news. (If you don't have such a user, take the +default answer.) I need the login name (not directory) which is used for +news administration. + +EOM +rp="News admin login?" +. ./myread +newsadmin="$ans" +case "$newsadmin" in +root) val="$undef" ;; +*) val="$define" ;; +esac +set d_newsadm +eval $setvar + |