[Openmcl-cvs-notifications] r11970 - /trunk/source/examples/finger.lisp

[gb at clozure.com]

Author: gb
Date: Sun Apr 26 20:03:39 2009
New Revision: 11970

Log:
Try to increase the likelyhood that people will think before invoking
a test case.  (Possibly a lost cause.)

Modified:
    trunk/source/examples/finger.lisp

Modified: trunk/source/examples/finger.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/examples/finger.lisp (original)
+++ trunk/source/examples/finger.lisp Sun Apr 26 20:03:39 2009
@@ -69,8 +69,9 @@
     (%finger host host-query port)))
 =

 ;; For testing try:
-;;   (finger "idsoftware.com")
-;;   (finger "johnc at idsoftware.com") =

+;; (where "some-host.com" is a host running a finger server):
+;;   (finger "some-host.com")
+;;   (finger "user at some-host.com") =

 =

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Server code