Index: openacs-4/packages/ams/tcl/ams-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ams/tcl/ams-procs.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/ams/tcl/ams-procs.tcl	6 Oct 2005 22:24:41 -0000	1.24
+++ openacs-4/packages/ams/tcl/ams-procs.tcl	23 Oct 2005 10:45:58 -0000	1.25
@@ -421,8 +421,8 @@
 
 ad_proc -public ams::value {
     -object_id:required
-    -attribute_id
-    -attribute_name
+    {-attribute_id ""}
+    {-attribute_name ""}
     {-format "html"}
     {-locale ""}
 } {
@@ -471,6 +471,7 @@
     } else {
 	set where_clause "and aa.attribute_name = :attribute_name"
     }
+    
     if {[db_0or1row select_value {}]} {
 	return [ams::widget -widget $widget -request "value_${format}" -attribute_name $attribute_name -attribute_id $attribute_id -value $value -locale $locale]
     } else {