File: 2.8script

package info (click to toggle)
epic5 2.0.1-1
  • links: PTS
  • area: main
  • in suites: buster, sid, stretch
  • size: 4,696 kB
  • ctags: 6,357
  • sloc: ansic: 69,814; makefile: 715; ruby: 227; sh: 178; perl: 13
file content (49 lines) | stat: -rw-r--r-- 730 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
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-; }