Changeset 1872

Show
Ignore:
Timestamp:
30.01.2001 11:34:11 (19 years ago)
Author:
paynter
Message:

Use new phind classifier paths.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/src/phind/generate/symbol-names.pl

    r1562 r1872  
    3131die "Usage: symbol-names.pl collection [file]\n" unless ($collection); 
    3232 
    33 $vocab = $ENV{'GSDLHOME'} . "/collect/$collection/phindex/clauses.vocab"; 
    34 die "Usage: symbol-names.pl collection [file]\n" unless (-e "$vocab"); 
     33$vocab = $ENV{'GSDLHOME'} . "/collect/$collection/index/phind/clauses.vocab"; 
     34if (-e "$vocab") { 
     35    print "Using vocabulary from: $vocab\n"; 
     36} else { 
     37    $vocab = $ENV{'GSDLHOME'} . "/collect/$collection/building/phind/clauses.vocab"; 
     38    if (-e "$vocab") { 
     39    print "Using vocabulary from: $vocab\n"; 
     40    } else { 
     41    die "Usage: symbol-names.pl collection [file]\n" unless (-e "$vocab"); 
     42    } 
     43} 
    3544 
    3645open(V, "<$vocab");