Ticket #297: relative-find-lisp.diff

File relative-find-lisp.diff, 723 bytes (added by Matt McCutchen, 15 years ago)
  • proofgeneral

    RCS file: /disk/cvs/proofgen/ProofGeneral/bin/proofgeneral,v
    retrieving revision 10.5
    diff -u -r10.5 proofgeneral
     
    7474# Try to find Proof General directory
    7575if [ -z "$PGHOME" ] || [ ! -d "$PGHOME" ]; then
    7676    # default relative to this script, otherwise PGHOMEDEFAULT
    77     if [ -d ../generic ]; then
    78         PGHOME="../generic"
     77    MYDIR="`readlink --canonicalize "$0" | sed -ne 's,/bin/proofgeneral$,,p'`"
     78    if [ -d "$MYDIR" ]; then
     79        PGHOME="$MYDIR"
    7980    elif [ -d "$PGHOMEDEFAULT" ]; then
    8081        PGHOME="$PGHOMEDEFAULT"
    8182    else