Commit d12939e2 authored by dscho's avatar dscho

no need for Time::HiRes to play back

parent afcdc4f4
2006-06-15: Johannes Schindelin <Johannes.Schindelin@gmx.de>
* added timing: you can record the events with their timestamps now
2005-01-13: Johannes Schindelin <Johannes.Schindelin@gmx.de> 2005-01-13: Johannes Schindelin <Johannes.Schindelin@gmx.de>
* started the project * started the project
No News yet With --timing, you can actually record action scripts which are meaningful...
Earlier, the events just got garbled, because the GUI could not react as
fast as the events were churned out.
...@@ -56,15 +56,10 @@ if($vnc<0) { ...@@ -56,15 +56,10 @@ if($vnc<0) {
exit 1; exit 1;
} }
# TODO: timing
open OUT, ">$output.pl"; open OUT, ">$output.pl";
print OUT "#!/usr/bin/perl\n"; print OUT "#!/usr/bin/perl\n";
print OUT "\n"; print OUT "\n";
print OUT "use nacro;\n"; print OUT "use nacro;\n";
if ($timing) {
print OUT "use Time::HiRes;"
}
print OUT "\n"; print OUT "\n";
print OUT "\$x_origin=0; \$y_origin=0;\n"; print OUT "\$x_origin=0; \$y_origin=0;\n";
print OUT "\$vnc=nacro::initvnc(\"$server\",$port,$listen_port);\n"; print OUT "\$vnc=nacro::initvnc(\"$server\",$port,$listen_port);\n";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment