diff options
Diffstat (limited to 'qooxdoo/source/perl')
| -rw-r--r-- | qooxdoo/source/perl/Qooxdoo/Services/Tr.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm index 357b020..6fb1c55 100644 --- a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm +++ b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm @@ -113,6 +113,7 @@ sub method_run_tr elsif (/^SLEEPING/){ push @array, ['SLEEPING']; $point = tell($fh); + } else { $error->set_error(107,"ERROR: $_. See $data for more information."); return $error; |