accinwin.pl

use Globals qw(%config);
use Plugins;

return unless
Plugins::register('accinwin', 'Add account name to window title', \&on_unload);

my $hooks = Plugins::addHooks(
      ['mainLoop::setTitle', \&onSetTitle],
   );

sub on_unload {
   Plugins::delHook($hooks);
}

sub onSetTitle{
	$_[1]->{return} =  $config{username} ." | ".$_[1]->{return};
}