Changeset 20b4e44 for app/src/tok

Timestamp:

03/19/08 12:29:21 (16 years ago)

Author:

pawelk <pawelk@…>

Branches:

master, help

Children:

389de9a

Parents:

d593c5e

git-author:

pawelk <pawelk@…> (03/19/08 12:29:21)

git-committer:

pawelk <pawelk@…> (03/19/08 12:29:21)

Message:

Wersja niestabilna, zawiera wstepne poprawki.

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

File:

• app/src/tok/tok (modified) (2 diffs)

app/src/tok/tok

@@ -1 +1 @@
 #!/usr/bin/perl
 
+#package:       UAM Text Tools
+#component:     tok (tokenizer)
+#version:       1.0
+#author:        Tomasz Obrebski
+
+use strict;
 use locale;
 use Getopt::Long;
+use File::HomeDir;
 
 my $interactive=0;
@@ -8 +15 @@
 
 my $systemconfigfile='/usr/local/etc/utt/tok.conf';
-my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf";
+#my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf";
+my $userconfigfile=home()."/.utt/tok.conf";
 
 #read configuration files###########################