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.76 -r1.77
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	28 May 2018 12:29:03 -0000	1.76
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	28 May 2018 12:33:05 -0000	1.77
@@ -98,7 +98,13 @@
     get the name of a person
 } {
     if {$person_id eq ""} {
+        # As the old functionality returned an error, but I want an
+        # empty string for e-mail, check if a person_id was found and
+        # return immediately otherwise
         set person_id [party::get_by_email -email $email]
+        if {$person_id eq ""} {
+            return ""
+        }
     }
     set person [dict create {*}[person::get -person_id $person_id]]
     set person_name [dict get $person person_name]