diff options
Diffstat (limited to 'feature-tests')
| -rw-r--r-- | feature-tests/getchan.pl | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/feature-tests/getchan.pl b/feature-tests/getchan.pl index 622f708..92044aa 100644 --- a/feature-tests/getchan.pl +++ b/feature-tests/getchan.pl @@ -80,15 +80,8 @@ my $state; sub get_format_string { my ($module, $tag, $theme) = @_; - $theme ||= Irssi::current_theme(); - my $format_str; - { - # deeeeeeep black magic. - #print "Trying to get format for $module, $tag"; - local *CORE::GLOBAL::caller = sub { $module }; - $format_str = $theme->get_format($module, $tag); - } - return $format_str; + $theme ||= Irssi::current_theme; + return $theme->get_format($module, $tag); } |