X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=telnet-server.lisp;h=7520ea32c8538f0242640e1bc2d3b3e1c698cf66;hp=6be5c68b6a87e9d703657c75d50289d7f570bd09;hb=ba354a40a203103a4cf16cd3d21f89f707ba5205;hpb=30b4f8d91af2bb031e8d4ef7d5a38492739de2bf diff --git a/telnet-server.lisp b/telnet-server.lisp index 6be5c68..7520ea3 100644 --- a/telnet-server.lisp +++ b/telnet-server.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: telnet-server.lisp,v 1.4 2002/10/10 16:23:48 kevin Exp $ +;;;; $Id: telnet-server.lisp,v 1.5 2002/10/16 03:45:34 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -71,7 +71,7 @@ (format stream "~&~A> " (package-name *package*)) (force-output stream)) -(defvar *telnet-password* "ksec") +(defvar *telnet-password* "") (defun telnet-on-stream (stream) (unwind-protect