diff options
| author | dscho <dscho> | 2006-06-15 12:32:37 +0000 |
|---|---|---|
| committer | dscho <dscho> | 2006-06-15 12:32:37 +0000 |
| commit | d12939e22c056345f5926595f0f5e7cc2b686077 (patch) | |
| tree | a085ddb6b93646ca1d7e711505ae5868dc91a568 /VisualNaCro/recorder.pl | |
| parent | afcdc4f4b25f5568b4082d5c240bda1ea866d5e6 (diff) | |
| download | libtdevnc-d12939e22c056345f5926595f0f5e7cc2b686077.tar.gz libtdevnc-d12939e22c056345f5926595f0f5e7cc2b686077.zip | |
no need for Time::HiRes to play back
Diffstat (limited to 'VisualNaCro/recorder.pl')
| -rw-r--r-- | VisualNaCro/recorder.pl | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/VisualNaCro/recorder.pl b/VisualNaCro/recorder.pl index 3b86e40..6621380 100644 --- a/VisualNaCro/recorder.pl +++ b/VisualNaCro/recorder.pl @@ -56,15 +56,10 @@ if($vnc<0) { exit 1; } -# TODO: timing - open OUT, ">$output.pl"; print OUT "#!/usr/bin/perl\n"; print OUT "\n"; print OUT "use nacro;\n"; -if ($timing) { - print OUT "use Time::HiRes;" -} print OUT "\n"; print OUT "\$x_origin=0; \$y_origin=0;\n"; print OUT "\$vnc=nacro::initvnc(\"$server\",$port,$listen_port);\n"; |