On Mon, 19 Nov 2001, Serge Matveev wrote: > Угу. Ещё бы шашечек пару дописать (типа completition) - цены бы ей не > было.
Похоже, надо работу делить. Лично я беру на себя взаимодействие с окружением (вызов внешних программ, заголовки xterm, автоопределение кодировки консоли). А интерфейсом пользователя (completion), импортом из micq/licq и собственно протоколом (info, file transfer, sms)предлагаю заняться кому-нибудь еще. Кстати, вот патч для shell-escape --- vicq/vicq Thu Nov 15 16:44:56 2001 +++ /usr/local/bin/vicq Mon Nov 19 11:26:47 2001 @@ -1716,7 +1716,7 @@ %helps = ( - '' => "Command list:\nmsg\nadd\nsubmit\ntogvis\ninv\nna\ndnd\nonline\naway\nocc\nauth\nw\ne\nquit\n?\nhelp", + '' => "Command list:\nmsg\nadd\nsubmit\ntogvis\ninv\nna\ndnd\nonline\naway\nocc\nauth\nw\ne\nquit\n?\nhelp\n!", 'msg' => "Format: msg [UIN | nickname][/message]", 'add' => "Format: add UIN nickname", 'submit' => "debug command", @@ -1732,7 +1732,8 @@ 'e' => "Format: e\nPrints contactlist, but not \"Offline\"", 'quit' => "Format: quit\nThis command allows you to do something else\nbehind ICQ", '?' => "Format: help [cmd]\nShow help on command", - 'help' => "Format: help [cmd]\nShow help on command" + 'help' => "Format: help [cmd]\nShow help on command", + '!' => "Format: ! OS command", ); @@ -1986,7 +1987,11 @@ my $cmd = shift; help($cmd); return ''; - } + }, + '!' => sub { + system(join(" ",@_)); + return ''; + } ); -- Victor Wagner [EMAIL PROTECTED] Chief Technical Officer Office:7-(095)-748-53-88 Communiware.Net Home: 7-(095)-135-46-61 http://www.communiware.net http://www.ice.ru/~vitus