Config-Irssi-Parser
view release on metacpan or search on metacpan
CHAT = "dcc chat";
RUN = "SCRIPT LOAD";
UPTIME = "eval exec - expr `date +%s` - \\$F | awk '{print \"Irssi uptime: \"int(\\\\\\$1/3600/24)\"d \"int(\\\\\\$1/3600%24)\"h \"int(\\\\\\$1/60%60)\"m \"int(\\\\\\$1%60)\"s\" }'";
CALC = "exec - if which bc &>/dev/null\\; then echo '$*' | bc | awk '{print \"$*=\"$$1}'\\; else echo bc was not found\\; fi";
SBAR = "STATUSBAR";
INVITELIST = "mode $C +I";
Q = "QUERY";
a = "/op -yes *";
uq = "/unquery";
l = "/say /* $* */";
slap = "/me slaps $0 around with vadim's small 50lb UNIX manual";
ham = "/me gives $0 a hamster";
setident = "/quote setident";
setname = "/quote setname";
ton = "/me slaps $0 around with a 9.4 ton trailer";
shill = "/me grabs his shillelagh";
stick = "/me grabs his whoopin' stick";
ddate = "/exec -o ddate | sed 's/YOLD/Year of Our Lady Discordia/'";
s = "/slap $0; /ton $0; /ham $0";
ll = "/lastlog";
myident = "sineident";
mycident = "/msg ChanServ identify #lobby password";
opident = "/msg gandalf identify password";
ls = "/exec ls";
srxit = "/echo \"SRX!\"; /mode #Btech -o SRXProject ";
foo = "/echo $J";
say = "msg *";
gate = "/mode -Q; /kick Dylan ";
sleep = "/nick ${nick}[sleep]; /away I am sleeping; /exec ts start sleep";
wake = "/nick ${nick}; /away; /exec ts stop sleep";
afk = "/nick ${nick}[afk]; /away I am afk";
back = "/nick ${nick}; /away";
hv = "/connect -haver haver localhost 7070";
uni = "/nick $nick[uni]; /away I am at university";
study = "/nick Dylan[study] ; /away I am studying.";
newaway = "/alias $0 /nick $nick[$0] \\; /away $1-";
};
statusbar = {
# formats:
# when using {templates}, the template is shown only if it's argument isn't
# empty unless no argument is given. for example {sb} is printed always,
# but {sb $T} is printed only if $T isn't empty.
items = {
# start/end text in statusbars
barstart = "{sbstart}";
barend = "{sbend}";
topicbarstart = "{topicsbstart}";
topicbarend = "{topicsbend}";
# treated "normally", you could change the time/user name to whatever
time = "{sb $Z}";
user = "{sb {sbnickmode $cumode}$N{sbmode $usermode}{sbaway $A}}";
# treated specially .. window is printed with non-empty windows,
# window_empty is printed with empty windows
window = "{sb $winref:$itemname{sbmode $M}}";
window_empty = "{sb $winref{sbservertag $tag}}";
prompt = "{prompt $[.15]itemname}";
prompt_empty = "{prompt $winname}";
topic = " $topic";
topic_empty = " Irssi v$J - http://irssi.org/help/";
# all of these treated specially, they're only displayed when needed
lag = "{sb Lag: $0-}";
act = "{sb Act: $0-}";
more = "-- more --";
};
# there's two type of statusbars. root statusbars are either at the top
# of the screen or at the bottom of the screen. window statusbars are at
# the top/bottom of each split window in screen.
default = {
# the "default statusbar" to be displayed at the bottom of the window.
# contains all the normal items.
window = {
disabled = "no";
# window, root
type = "window";
# top, bottom
placement = "bottom";
# number
position = "1";
# active, inactive, always
visible = "active";
# list of items in statusbar in the display order
items = {
barstart = { priority = "100"; };
time = { };
user = { };
window = { };
window_empty = { };
lag = { priority = "-1"; };
act = { priority = "10"; };
more = { priority = "-1"; alignment = "right"; };
barend = { priority = "100"; alignment = "right"; };
};
};
# statusbar to use in inactive split windows
window_inact = {
type = "window";
placement = "bottom";
position = "1";
visible = "inactive";
items = {
barstart = { priority = "100"; };
window = { };
window_empty = { };
more = { priority = "-1"; alignment = "right"; };
barend = { priority = "100"; alignment = "right"; };
};
};
# we treat input line as yet another statusbar :) It's possible to
# add other items before or after the input line item.
prompt = {
( run in 2.110 seconds using v1.01-cache-2.11-cpan-995e09ba956 )