Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.12 -r1.12.2.1
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	13 Sep 2002 10:43:57 -0000	1.12
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	11 Dec 2002 00:11:34 -0000	1.12.2.1
@@ -171,7 +171,7 @@
         
         set person(person_id) $person_id
         set person(first_names) $first_names
-        set person(last_name) $last_names
+        set person(last_name) $last_name
 
         return [array get person]
     }