X-Git-Url: http://git.pond.sub.org/?p=eow;a=blobdiff_plain;f=empire.lisp;h=1f2aae423b6724f4d7a42cf171519c80d0cfd91f;hp=5b58812bd257662c8afed7eb4199c597771e1070;hb=fc636ef0b61e6018deba9e31e2f9ab3efc381a1e;hpb=e7660a5ec8ec2f814a1869dbb120249582bc80d5 diff --git a/empire.lisp b/empire.lisp index 5b58812..1f2aae4 100644 --- a/empire.lisp +++ b/empire.lisp @@ -261,7 +261,8 @@ (defmethod special-command ((c connection) line) (cond ((string= line "xup") (special-xup c)) - (t (empire-web:data (session c) "Unknown special command")))) + (t (empire-web:data (session c) "Unknown special command"))) + line) (defmethod command ((c connection) line) (cond ((special-command-p line) (special-command c (subseq line 1)))