For some reason, QuakeNet requires one to manually send a PONG message when connecting. For this, a /quote command, that sends a raw string to the server, is necessary. Attached to this email is a simple patch that implements such a command.
Index: application.lisp =================================================================== RCS file: /project/beirc/cvsroot/beirc/application.lisp,v retrieving revision 1.84 diff -u -r1.84 application.lisp --- application.lisp 31 May 2006 19:35:39 -0000 1.84 +++ application.lisp 31 May 2006 21:10:38 -0000 @@ -681,6 +681,13 @@ ((what 'mumble)) (com-msg (target) what))
+(define-beirc-command (com-quote :name t) + ((what 'mumble :prompt "Text")) + (let ((stream (irc:output-stream (current-connection *application-frame*)))) + (write-sequence what stream) + (terpri stream) + (force-output stream))) + (define-beirc-command (com-me :name t) ((what 'mumble :prompt nil)) (let ((m (make-fake-irc-message 'irc:ctcp-action-message :trailing-argument