if (word(2 $loadinfo()) != [pf]) { load -pf $word(1 $loadinfo()); return; };

#
# This script has a lot of legacy behind it, but it's slowly
# become more bitrot than anything...
#

subpackage 2.8script;

# I dont know why the client cant do this...
alias join
{
	switch ($*)
	{
		(*,*)
		{
			join $before(, $*);
			join $after(, $*);
		}
		(#*) (&*) (0) (-*) (!*) (+*)
			{ //join $*; }
		() 
			{ //join -i; }
		(*) 
			{ //join #$*; }
	};
};

alias leave
{
	switch ($0)
	{
		(*,*)
		{
			leave $before(, $0) $1-;
			leave $after(, $0) $1-;
		}
		(#*) (&*) (0) (-*) (!*) (+*)
			{ //leave $*; }
		() (\\*)
			{ //leave * $1-; }
		(*)
			{ //leave #$*; }
	};
};

# Ban list:
on ^367 * { xecho -b $[$CHANNEL_NAME_WIDTH]1 $2-; };

# I added this for sobriquet - Purge all ignores
alias clearignore { 
	for refnum in ($ignorectl(REFNUMS)) {
		@ignorectl(DELETE $refnum);
	};
};