aboutsummaryrefslogtreecommitdiffstats
path: root/feature-tests/getchan.pl
diff options
context:
space:
mode:
Diffstat (limited to 'feature-tests/getchan.pl')
-rw-r--r--feature-tests/getchan.pl11
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);
}