Changeset 6982
- Timestamp:
- 2004-03-09T15:05:50+13:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/classify/Phind.pm
r6968 r6982 109 109 'deft' => "", 110 110 'reqd' => "no" }, 111 { 'name' => "builddir",112 'desc' => "{BasClas.builddir}",113 'type' => "string",114 'deft' => "" },115 111 { 'name' => "suffixmode", 116 112 'desc' => "{Phind.suffixmode}", … … 178 174 q^buttonname/.*/Phrase^, \$self->{'buttonname'}, 179 175 q^language/.*/en^, \$language, 180 q^builddir/.*/^, \$builddir,181 176 q^savephrases/.*/^, \$self->{'savephrases'}, 182 177 q^suffixmode/\d/1^, \$self->{'suffixmode'}, … … 198 193 # collection directories 199 194 $self->{'collectiondir'} = $ENV{'GSDLCOLLECTDIR'}; 200 if (!$builddir) { 201 $builddir = &util::filename_cat($ENV{'GSDLCOLLECTDIR'}, "building"); 202 } 203 $self->{'builddir'} = $builddir;195 196 if (! defined $self->{'builddir'}) { 197 $self->{'builddir'} = &util::filename_cat($ENV{'GSDLCOLLECTDIR'}, "building"); 198 } 204 199 205 200 $self->{'total'} = 0;
Note:
See TracChangeset
for help on using the changeset viewer.