diff options
Diffstat (limited to 'PerlQt/lib/Qt/debug.pm')
| -rw-r--r-- | PerlQt/lib/Qt/debug.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/PerlQt/lib/Qt/debug.pm b/PerlQt/lib/Qt/debug.pm index 28c0a43..a0f4e19 100644 --- a/PerlQt/lib/Qt/debug.pm +++ b/PerlQt/lib/Qt/debug.pm @@ -1,5 +1,5 @@ -package Qt::debug; -use Qt; +package TQt::debug; +use TQt; our %channel = ( 'ambiguous' => 0x01, @@ -23,14 +23,14 @@ sub import { $usage++; } } - Qt::_internal::setDebug($db); + TQt::_internal::setDebug($db); print "Available channels: \n\t". join("\n\t", sort keys %channel). "\n" if $usage; } sub unimport { - Qt::_internal::setDebug(0); + TQt::_internal::setDebug(0); } 1;
\ No newline at end of file |