Changeset 19dfa5c for app/dist/common/utt_make_config.pl

Timestamp:

04/24/08 12:36:13 (17 years ago)

Author:

pawelk <pawelk@…>

Branches:

master, help

Children:

12d8443

Parents:

a5fdde9

git-author:

pawelk <pawelk@…> (04/24/08 12:36:13)

git-committer:

pawelk <pawelk@…> (04/24/08 12:36:13)

Message:

gph i dgc obsluguja configi

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

File:

• app/dist/common/utt_make_config.pl (modified) (4 diffs)

app/dist/common/utt_make_config.pl

@@ -14 +14 @@
 conf_utt(catfile($usr_home, 'utt.conf'), $sys_home);
 
+conf_cor(catfile($usr_home, 'cor.conf'), $sys_home);
+conf_kor(catfile($usr_home, 'kor.conf'), $sys_home);
 conf_compiledic(catfile($usr_home, 'compiledic.conf'), $sys_home);
-conf_cor(catfile($usr_home, 'cor.conf'), $sys_home);
-conf_dgc(catfile($usr_home, 'dgc.conf'), $sys_home);
 conf_grp(catfile($usr_home, 'grp.conf'), $sys_home);
 conf_gue(catfile($usr_home, 'gue.conf'), $sys_home);
-conf_kor(catfile($usr_home, 'kor.conf'), $sys_home);
 conf_lem(catfile($usr_home, 'lem.conf'), $sys_home);
 conf_ser(catfile($usr_home, 'ser.conf'), $sys_home);
+conf_dgc(catfile($usr_home, 'dgc.conf'), $sys_home);
 
 print "UTT user configuration created in $usr_home\n";
@@ -34 +34 @@
 
     if(-d $dir) {
-                print "Old configuration detected. ";
-                my $cnt = unlink <$dir/*>;
-                print "($cnt files deleted)\n";
+        print "Old configuration detected. ";
+        my $cnt = unlink <$dir/*>;
+        print "($cnt files deleted)\n";
     }
     else {
-                print "Creating directory $dir\n";
-                if(1 != mkdir $dir) {
-                    die "Unable to create UTT user configuration!\n";
-                }
+        print "Creating directory $dir\n";
+        if(1 != mkdir $dir) {
+            die "Unable to create UTT user configuration!\n";
+        }
     }
 }
@@ -108 +108 @@
   print FILE makeConfigHeader();
   print FILE "dictionary-home=", abs_path("$utthome/share/utt"), "\n";
-  print FILE "weights=", abs_path("$utthome/lib/utt/weights.kor"), "\n";
+  print FILE "weights=", abs_path("$utthome/lib/utt/weights.cor"), "\n";
   print FILE "threshold=1.0\n";
 
@@ -222 +222 @@
 
   print FILE makeConfigHeader();
-  print FILE "categories=", abs_path("$utthome/lib/utt/cats.dgc"), "\n";
-  print FILE "grammar=", abs_path("$utthome/lib/utt/gram.dgc"), "\n";
+  print FILE "catfile=", abs_path("$utthome/lib/utt/cats.dgc"), "\n";
+  print FILE "gramfile=", abs_path("$utthome/lib/utt/gram.dgc"), "\n";
 
   close FILE;