From: Martin Mares Date: Sat, 27 Mar 2010 20:18:32 +0000 (+0100) Subject: mop: mo-score-mop reads everything from the cwd X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=59026be03102e0ab8a83f335a18a7c2b342a1a98;p=moe.git mop: mo-score-mop reads everything from the cwd --- diff --git a/mop/score/mo-score-mop.sh b/mop/score/mo-score-mop.sh index fc6c6a2..20c20b4 100755 --- a/mop/score/mo-score-mop.sh +++ b/mop/score/mo-score-mop.sh @@ -26,7 +26,7 @@ close CT; print STDERR 0+keys %users, "\n"; print STDERR "Scanning teoretical results... "; -if (open (EX, "mop/score/teorie.txt")) { +if (open (EX, "teorie.txt")) { while () { chomp; (/^$/ || /^#/) && next; @@ -131,13 +131,13 @@ while ($i < @table) { print STDERR "OK\n"; if ($tex) { - open HDR,"mop/score/listina.hdr" or die "Cannot open file mop/score/listina.hdr with TeX template!"; + open HDR,"listina.hdr" or die "Cannot open file listina.hdr with TeX template!"; while () {print; } close HDR; foreach $r (@table) { print join('&',@$r), "\\cr\n";} - open FTR,"mop/score/listina.ftr" or die "Cannot open file mop/score/listina.ftr with TeX template!"; + open FTR,"listina.ftr" or die "Cannot open file listina.ftr with TeX template!"; while () {print; } close FTR; } else {