lib/Tools/installfonts
author wenzelm
Tue Feb 04 08:59:17 1997 +0100 (1997-02-04)
changeset 2578 cc768a16ef65
parent 2335 e965156e84e3
child 2746 2a2d51f2cd95
permissions -rwxr-xr-x
now uses ISABELLE_INSTALLFONTS;
wenzelm@2335
     1
#!/bin/bash -norc
wenzelm@2297
     2
#
wenzelm@2311
     3
# $Id$
wenzelm@2311
     4
#
wenzelm@2297
     5
# DESCRIPTION: install Isabelle symbol fonts
wenzelm@2311
     6
wenzelm@2297
     7
wenzelm@2297
     8
PRG=$(basename $0)
wenzelm@2297
     9
wenzelm@2297
    10
function usage()
wenzelm@2297
    11
{
wenzelm@2297
    12
  echo
wenzelm@2297
    13
  echo "Usage: $PRG"
wenzelm@2297
    14
  echo
wenzelm@2297
    15
  echo "  Install the Isabelle symbol fonts into your X11 server."
wenzelm@2297
    16
  echo "  (May be savely called repeatedly.)"
wenzelm@2297
    17
  echo
wenzelm@2297
    18
  exit 1
wenzelm@2297
    19
}
wenzelm@2297
    20
wenzelm@2297
    21
wenzelm@2578
    22
## check for isabelle fonts
wenzelm@2578
    23
wenzelm@2578
    24
function checkfonts()
wenzelm@2578
    25
{
wenzelm@2578
    26
  RESULT=$(xlsfonts -fn "-isabelle-*" 2>&1) || return 1
wenzelm@2578
    27
wenzelm@2578
    28
  case "$RESULT" in
wenzelm@2578
    29
    xlsfonts:*)
wenzelm@2578
    30
      return 1
wenzelm@2578
    31
      ;;
wenzelm@2578
    32
  esac
wenzelm@2578
    33
wenzelm@2578
    34
  return 0
wenzelm@2578
    35
}
wenzelm@2578
    36
wenzelm@2578
    37
wenzelm@2297
    38
## main
wenzelm@2297
    39
wenzelm@2297
    40
[ $# -ne 0 ] && usage
wenzelm@2297
    41
wenzelm@2578
    42
checkfonts || eval $ISABELLE_INSTALLFONTS
wenzelm@2578
    43
checkfonts || echo "WARNING: Isabelle fonts probably not installed correctly!" >&2