Index: openacs-4/packages/survey/www/admin/response-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/response-delete.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/survey/www/admin/response-delete.tcl	27 Jun 2015 20:46:15 -0000	1.6
+++ openacs-4/packages/survey/www/admin/response-delete.tcl	3 Sep 2024 15:37:54 -0000	1.7
@@ -23,17 +23,24 @@
     {warning:text(inform) {value "[_ survey.lt_Completely_delete [list user_name_var user_name response_date_var response_date]]"}
     {label "[_ survey.Warning]"}}
     {confirmation:text(radio) {label " "}
-	{options
-	    {{"[_ survey.Continue_with_Delete]" t }
-	     {"[_ survey.lt_Cancel_and_return_to_]" f }}	}
-	    {value f}
+        {options
+            {{"[_ survey.Continue_with_Delete]" t }
+                {"[_ survey.lt_Cancel_and_return_to_]" f }}
+        }
+        {value f}
     }
 
 } -on_submit {
     if {$confirmation} {
-	db_exec_plsql delete_response {}
-    } 
+        db_exec_plsql delete_response {}
+    }
     ad_returnredirect [export_vars -base one-respondent {survey_id user_id}]
 }
 
 set context [_ survey.Delete_Response]
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: