Index: openacs-4/packages/curriculum-central/tcl/staff-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/tcl/staff-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/curriculum-central/tcl/staff-procs.tcl	16 Jun 2006 06:33:58 -0000	1.5
+++ openacs-4/packages/curriculum-central/tcl/staff-procs.tcl	25 Apr 2018 19:47:47 -0000	1.6
@@ -35,7 +35,7 @@
     @param name_ids List of name IDs.
     @return Returns a concatenated string of pretty names.
 } {
-    set names [list]
+    set names {}
 
     foreach name_id $name_ids {
 	set pretty_name [curriculum_central::staff::pretty_name $name_id]