lib/Tools/installfonts
author paulson
Mon, 16 Nov 1998 10:36:30 +0100
changeset 5865 2303f5a3036d
parent 3253 ea75747190a7
child 9788 df671fa2562a
permissions -rwxr-xr-x
moved some facts about Pi from ex/PiSets to Fun.ML

#!/bin/bash
#
# $Id$
#
# DESCRIPTION: install the isabelle fonts into your X11 server


PRG=$(basename $0)

function usage()
{
  echo
  echo "Usage: $PRG"
  echo
  echo "  Install the isabelle fonts into your X11 server."
  echo "  (May be safely called repeatedly.)"
  echo
  exit 1
}


## check for isabelle fonts

function checkfonts()
{
  RESULT=$(xlsfonts -fn "-isabelle-fixed-*-isabelle-0" 2>&1) || return 1

  case "$RESULT" in
    xlsfonts:*)
      return 1
      ;;
  esac

  return 0
}


## main

[ $# -ne 0 ] && usage

checkfonts || eval $ISABELLE_INSTALLFONTS
checkfonts || echo "WARNING: Isabelle fonts probably not installed correctly!" >&2