typo in log message

svn: r1865
This commit is contained in:
Eli Barzilay 2006-01-19 06:35:07 +00:00
parent 830f29891c
commit 6108f2dafd

View File

@ -437,7 +437,7 @@
(lambda (str info) (check-field str (cadr info) (car info) (caddr info)))
(cdr new-data) EXTRA-FIELDS)
(LOG "change info for ~a ~s -> ~s"
(car usernames) new-data (car user-datas))
(car usernames) (car user-datas) new-data)
(put-user-data (car usernames) new-data)))
(define (get-user-info data)