projects
/
onak.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
cscvs to tla changeset 3
[onak.git]
/
onak-mail.pl
diff --git
a/onak-mail.pl
b/onak-mail.pl
index 30e5b9326034e96686ef76f5e2f11acf63bd065d..0f108f45e48f3fa1d7f980990724d843e399818b 100755
(executable)
--- a/
onak-mail.pl
+++ b/
onak-mail.pl
@@
-22,14
+22,16
@@
sub submitupdate {
my @data = @_;
my (@errors, @mergedata);
my @data = @_;
my (@errors, @mergedata);
- open3(\*MERGEIN, \*MERGEOUT, \*MERGEERR, "/home/noodles/onak-0.0.
2/keymerge
");
+ open3(\*MERGEIN, \*MERGEOUT, \*MERGEERR, "/home/noodles/onak-0.0.
3/onak", "add
");
print MERGEIN @data;
close MERGEIN;
@errors = <MERGEERR>;
@mergedata = <MERGEOUT>;
print MERGEIN @data;
close MERGEIN;
@errors = <MERGEERR>;
@mergedata = <MERGEOUT>;
- #print @errors;
+ open (LOG, ">>/home/noodles/onak-0.0.3/keyadd.log");
+ print LOG @errors;
+ close LOG;
return @mergedata;
}
return @mergedata;
}