Index: openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl	27 Feb 2004 19:16:25 -0000	1.2
+++ openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl	23 Feb 2005 15:28:57 -0000	1.3
@@ -46,8 +46,12 @@
 } {
     # destructor
 
-    apm_package_instance_delete $blog_id
-    acs_user::delete -permanent -user_id $user_id
+    if {[catch { 
+        apm_package_instance_delete $blog_id
+        acs_user::delete -permanent -user_id $user_id
+    } errMsg]} {
+        ns_log error "create_blog_and_user teardown failed: $errMsg"
+    }
 }
 
 aa_register_case -cats web -init_classes {