aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-06-30 06:45:25 +00:00
Code

Moved Irssi::command(), Irssi::Server::command() and Irssi::Windowitem::command() from ui to core. Also, Irssi::command() now doesn't default to active server/window item, if this breaks any scripts change them use Irssi::active_win()->command() instead.

Browse Source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2232 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2001-12-10 17:37:51 +00:00 committed by cras
parent 1d340a9660
commit eb91b126ec
2 changed files with 22 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/perl/common/Core.xs
View File

@ -348,6 +348,12 @@ combine_level(level, str)
int level
char *str
void
command(cmd)
char *cmd
CODE:
perl_command(cmd, NULL, NULL);
void
commands()
PREINIT:
@ -458,6 +464,14 @@ PPCODE:
XPUSHs(sv_2mortal(new_pv(ret)));
g_free_not_null(ret);
void
command(server, cmd)
Irssi::Server server
char *cmd
CODE:
perl_command(cmd, server, NULL);
#*******************************
MODULE = Irssi::Core PACKAGE = Irssi::Windowitem
#*******************************
@ -474,3 +488,11 @@ PPCODE:
ret = parse_special_string(cmd, item->server, item, data, NULL, flags);
XPUSHs(sv_2mortal(new_pv(ret)));
g_free_not_null(ret);
void
command(item, cmd)
Irssi::Windowitem item
char *cmd
CODE:
perl_command(cmd, item->server, item);

20
src/perl/ui/Window.xs
View File

@ -34,12 +34,6 @@ print(str, level=MSGLEVEL_CLIENTNOTICE)
CODE:
printtext_string(NULL, NULL, level, str);
void
command(cmd)
char *cmd
CODE:
perl_command(cmd, active_win->active_server, active_win->active);
Irssi::UI::Window
window_find_name(name)
char *name
@ -99,13 +93,6 @@ OUTPUT:
MODULE = Irssi::UI::Window PACKAGE = Irssi::Server
#*******************************
void
command(server, cmd)
Irssi::Server server
char *cmd
CODE:
perl_command(cmd, server, NULL);
void
print(server, channel, str, level=MSGLEVEL_CLIENTNOTICE)
Irssi::Server server
@ -249,13 +236,6 @@ print(item, str, level=MSGLEVEL_CLIENTNOTICE)
CODE:
printtext_string(item->server, item->name, level, str);
void
command(item, cmd)
Irssi::Windowitem item
char *cmd
CODE:
perl_command(cmd, item->server, item);
Irssi::UI::Window
window_create(item, automatic)
Irssi::Windowitem item