From 058abd98349799e09d1de1d8783c07162398b861 Mon Sep 17 00:00:00 2001
From: jkf <jkf>
Date: Mon, 4 Feb 2008 21:13:16 +0000
Subject: [PATCH] check

---
 playback.cl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/playback.cl b/playback.cl
index da7c2626..daaa40dc 100644
--- 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))))