Index: openacs-4/packages/schema-browser/www/function-body.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/schema-browser/www/function-body.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/schema-browser/www/function-body.tcl	28 Jun 2004 05:30:03 -0000	1.4
+++ openacs-4/packages/schema-browser/www/function-body.tcl	30 Oct 2013 09:46:06 -0000	1.5
@@ -12,8 +12,10 @@
     oid:notnull,integer
 }
 
+set function_src "cannot obtain function body for oid $oid"
+set function_name "cannot obtain function name for oid $oid"
 
-db_1row function_body ""
+db_0or1row function_body ""
 
 set context [list "Trigger: $function_name"]
 set page_title "Trigger: $function_name"