--- loncom/interface/loncommon.pm	2007/12/08 19:19:02	1.623
+++ loncom/interface/loncommon.pm	2007/12/11 00:47:58	1.624
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.623 2007/12/08 19:19:02 raeburn Exp $
+# $Id: loncommon.pm,v 1.624 2007/12/11 00:47:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6598,6 +6598,19 @@ sub instrule_disallow_msg {
     return $response;
 }
 
+sub personal_data_fieldtitles {
+    my %fieldtitles = &Apache::lonlocal::texthash (
+                        id => 'Student/Employee ID',
+                        permanentemail => 'E-mail address',
+                        lastname => 'Last Name',
+                        firstname => 'First Name',
+                        middlename => 'Middle Name',
+                        generation => 'Generation',
+                        gen => 'Generation',
+                   );
+    return %fieldtitles;
+}
+
 =pod
 
 =back