From 665a396d6be4b5bba9c591cb22b6bf9b700e71c0 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Fri, 13 Jan 2006 13:01:32 +0000
Subject: [PATCH] type

svn: r1824
---
 collects/handin-server/handin-server.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/handin-server/handin-server.ss b/collects/handin-server/handin-server.ss
index 0543bfe076..f7dfe6bf65 100644
--- a/collects/handin-server/handin-server.ss
+++ b/collects/handin-server/handin-server.ss
@@ -460,7 +460,7 @@
   (define (has-password? raw md5 passwords)
     (define (good? passwd)
       (define (bad-password msg)
-        (LOG "ERROR: ~a -- ~s" log-args passwd)
+        (LOG "ERROR: ~a -- ~s" msg passwd)
         (error 'handin "bad password in user database"))
       (cond [(string? passwd) (equal? md5 passwd)]
             [(and (list? passwd) (= 2 (length passwd))