diff --git a/bin/gendobj b/bin/gendobj
index 754d172e7..1671acf94 100755
--- a/bin/gendobj
+++ b/bin/gendobj
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 #
-# $Id: gendobj,v 1.7 2002/02/20 23:35:42 mdb Exp $
+# $Id: gendobj,v 1.8 2002/03/08 01:00:34 mdb Exp $
 #
 # gendobj is used to generate DObject source file definitons basded on
 # abbreviated declarations. Because DObject fields all have standard
@@ -222,7 +222,7 @@ sub print_dobj_setters
      * change. Proxied copies of this object (on clients) will apply the
      * value change when they received the attribute changed notification.
      */
-    public void set$cfield (DSet value)
+    public void set$cfield (DSet $field)
     {
         this.$field = $field;
         requestAttributeChange($fcode, value);