dist/U/d_scorfl.U

   1 ?RCS: $Id: d_scorfl.U 1 2006-08-24 12:32:52Z rmanfredi $
   2 ?RCS:
   3 ?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
   4 ?RCS:
   5 ?RCS: You may redistribute only under the terms of the Artistic Licence,
   6 ?RCS: as specified in the README file that comes with the distribution.
   7 ?RCS: You may reuse parts of this distribution only within the terms of
   8 ?RCS: that same Artistic Licence; a copy of which may be found at the root
   9 ?RCS: of the source tree for dist 4.0.
  10 ?RCS:
  11 ?RCS: $Log: d_scorfl.U,v $
  12 ?RCS: Revision 3.0  1993/08/18  12:07:01  ram
  13 ?RCS: Baseline for dist 3.0 netwide release.
  14 ?RCS:
  15 ?MAKE:d_scorfl: cat Myread Oldconfig nametype Setvar
  16 ?MAKE:  -pick add $@ %<
  17 ?S:d_scorfl:
  18 ?S:     This variable conditionally defines the SCOREFULL symbol, which
  19 ?S:     indicates to the C program that any scoreboard kept by the program
  20 ?S:     should be kept on the basis of the user's full name as opposed to
  21 ?S:     the user's login name.
  22 ?S:.
  23 ?C:SCOREFULL:
  24 ?C:     This symbol, if defined, indicates that any scoreboard kept by the
  25 ?C:     program should be kept on the basis of the user's full name as opposed
  26 ?C:     to the user's login name.  If the user can change his full name he
  27 ?C:     can enter multiple scores if this is defined.
  28 ?C:.
  29 ?H:#$d_scorfl SCOREFULL /**/
  30 ?H:.
  31 ?LINT:set d_scorfl
  32 : see how they want the scoreboard kept
  33 case "$d_scorfl" in
  34 "$define") dflt=y ;;
  35 *) dflt=n ;;
  36 esac
  37 case "$nametype" in
  38 other) val="$undef" ;;
  39 *)
  40         $cat <<'EOM'
  41
  42 The scoreboard can be kept with one score per login name, or one score per full
  43 name.  If users can change their full name, or if there is more than one person
  44 on your system with the same full name, you should keep the score by login name
  45 (the full name is still printed).
  46
  47 EOM
  48         rp='Do you want the scoreboard kept by full name?'
  49         . ./myread
  50         case "$ans" in
  51         y*) val="$define" ;;
  52         *) val="$undef" ;;
  53         esac
  54         ;;
  55 esac
  56 set d_scorfl
  57 eval $setvar
  58