diff options
author | Angelo Naselli <anaselli@linux.it> | 2014-11-30 17:24:18 +0100 |
---|---|---|
committer | Angelo Naselli <anaselli@linux.it> | 2014-11-30 17:24:18 +0100 |
commit | b1dc12e97b44b9d27ee6ac584ba2163826eed2c7 (patch) | |
tree | 15e1b3e87c8baa9f2ae5adbda816d2dc6b1fe8b3 | |
parent | b0e29f4b7583aa0c6efc027e3febffa7b6ea5de3 (diff) | |
download | colin-keep-b1dc12e97b44b9d27ee6ac584ba2163826eed2c7.tar colin-keep-b1dc12e97b44b9d27ee6ac584ba2163826eed2c7.tar.gz colin-keep-b1dc12e97b44b9d27ee6ac584ba2163826eed2c7.tar.bz2 colin-keep-b1dc12e97b44b9d27ee6ac584ba2163826eed2c7.tar.xz colin-keep-b1dc12e97b44b9d27ee6ac584ba2163826eed2c7.zip |
used Carp to get the bt
-rw-r--r-- | lib/AdminPanel/rpmdragora.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/AdminPanel/rpmdragora.pm b/lib/AdminPanel/rpmdragora.pm index e9f23a0..3ae4f31 100644 --- a/lib/AdminPanel/rpmdragora.pm +++ b/lib/AdminPanel/rpmdragora.pm @@ -51,6 +51,8 @@ use AdminPanel::Shared; use AdminPanel::Shared::Locales; use AdminPanel::Shared::GUI; +use Carp; + our @ISA = qw(Exporter); our $VERSION = '2.27'; our @EXPORT = qw( @@ -311,7 +313,7 @@ sub interactive_msg { sub interactive_packtable { my ($title, $parent_window, $top_label, $lines, $action_buttons) = @_; - warnings::warn("AdminPanel::rpmdragora::interactive_packtable is deprecated and is going to be removed"); + carp "AdminPanel::rpmdragora::interactive_packtable is deprecated and is going to be removed"; my $w = ugtk2->new($title, grab => 1, transient => $parent_window); local $::main_window = $w->{real_window}; |