Ignore:
Timestamp:
03/27/08 20:49:46 (17 years ago)
Author:
pawelk <pawelk@…>
Branches:
master, help
Children:
2fe08ac
Parents:
ef85bd7
git-author:
pawelk <pawelk@…> (03/27/08 20:49:46)
git-committer:
pawelk <pawelk@…> (03/27/08 20:49:46)
Message:

Zmodyfikowalem pliki licencji i praw, poprawilem generowanie tarballa dla slownikow, uaktualnilem generowanie konfiguracji o plik compiledict.conf.

git-svn-id: svn://atos.wmid.amu.edu.pl/utt@18 e293616e-ec6a-49c2-aa92-f4a8b91c5d16

File:
1 edited

Legend:

Unmodified
Added
Removed
  • app/dist/common/utt_make_config.pl

    r389de9a ra4d0da5  
    1515 
    1616conf_cor(catfile($usr_home, 'cor.conf'), $sys_home); 
     17conf_compiledic(catfile($usr_home, 'compiledic.conf'), $sys_home); 
    1718conf_grp(catfile($usr_home, 'grp.conf'), $sys_home); 
    1819conf_gue(catfile($usr_home, 'gue.conf'), $sys_home); 
     
    5960} 
    6061 
     62sub conf_compiledic() { 
     63        my $compiledic_file = shift; 
     64        my $utthome = shift; 
     65  open(FILE, ">$compiledic_file"); 
     66 
     67  print FILE makeConfigHeader(); 
     68  my $hm = home(); 
     69  my $lang=`grep language $hm/.utt/utt.conf | cut -d= -f 2`; 
     70  chomp $lang; 
     71# powinno byc $utthome/share/utt/pl_PL.ISO-8859-2/pl_PL.ISO-8892-2.sym 
     72# ale to bez sensu 
     73  print FILE "symbols=", abs_path("$utthome/share/utt"); 
     74  print FILE "/$lang/$lang.sym\n"; 
     75 
     76  close FILE; 
     77} 
     78 
     79sub conf_grp() { 
     80        my $grp_file = shift; 
     81        my $utthome = shift; 
     82  open(FILE, ">$grp_file"); 
     83 
     84  print FILE makeConfigHeader(); 
     85  print FILE "macros=", abs_path("$utthome/lib/utt/terms.m4"), "\n"; 
     86 
     87  close FILE; 
     88} 
     89 
    6190sub conf_cor() { 
    6291        my $cor_file = shift; 
Note: See TracChangeset for help on using the changeset viewer.