check

franzinc · Feb 4, 2008 · 058abd9 · 058abd9
1 parent 16cf718
commit 058abd9
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/playback.cl b/playback.cl
@@ -24,7 +24,7 @@
 ;; Suite 330, Boston, MA  02111-1307  USA
 ;;
 ;;
-;; $Id: playback.cl,v 1.3 2008/02/04 21:02:24 jkf Exp $
+;; $Id: playback.cl,v 1.4 2008/02/04 21:13:16 jkf Exp $
 
 ;; Description:
 ;;   playback a script generated by logging a site  
@@ -134,7 +134,7 @@
 
 	(if* ok 
 	   then (and *debug-playback* (format t "new user id is ~s~%" user-id))
-	   else (format t "No call id in ~s~%"  *last-response*)
+	   else (and *debug-playback* (format t "No call id in ~s~%"  resp))
 		(go out))
 
 	(return (values user-id call-id))))