Index: openacs-4/packages/acs-templating/tcl/form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/form-procs.tcl,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/acs-templating/tcl/form-procs.tcl	22 Sep 2003 17:42:56 -0000	1.17
+++ openacs-4/packages/acs-templating/tcl/form-procs.tcl	22 Sep 2003 18:03:48 -0000	1.18
@@ -366,6 +366,11 @@
 
   set file_stub [template::get_resource_path]/forms/$style
 
+  if { ![file exists "${file_stub}.adp"] } {
+      # We always have a template named 'standard'
+      set file_stub "[template::get_resource_path]/forms/standard"
+  }
+
   # set the asset url for images
   set assets "[template::get_resource_path]/assets"
   # assume resources are under page root (not safe)
@@ -397,12 +402,7 @@
 
     @return A string containing the HTML for the body of the form.
 } {
-  if { [catch {
-      set __adp_output [template $id $style]
-  }] } {
-      set style "standard"
-      set __adp_output [template $id $style]
-  }
+  set __adp_output [template $id $style]
   
   set level [template::adp_level]