Behandlung von data[SENDER] als string

Das kann ein string sein und das Objekt muss dann
gesucht werden.

Change-Id: Iaac1c5c15ed98fc08f38cdee2b52115622a13c30
diff --git a/secure/udp/reply.c b/secure/udp/reply.c
index d60661a..43b70ce 100644
--- a/secure/udp/reply.c
+++ b/secure/udp/reply.c
@@ -15,7 +15,6 @@
   string err,recpt,serv;
   object ob;
   
-  
   if (pointerp(data[SYSTEM])&&member(data[SYSTEM],TIME_OUT)>-1)
   {
     if (data[SENDER])
@@ -24,17 +23,20 @@
       {
         switch(data[REQUEST])
         {
-          case "tell": serv="teile mit: ";break;
-          case "who":  serv="wer: ";break;
-          default: serv=data[REQUEST]+": "; break;
+          case "tell": serv="teile mit: ";      break;
+          case "who":  serv="wer: ";            break;
+          default:     serv=data[REQUEST]+": "; break;
         }
         tell_object(ob, break_string("Das Mud \'" + data[NAME] +
                                      "\' konnte nicht erreicht werden.\n",
                                      78,serv));
       }
-      else
-        if (objectp(ob = data[SENDER])||(ob = find_object(data[SENDER])))
+      else {
+        if (stringp(data[SENDER]))
+          ob = find_object(data[SENDER]);
+        if (objectp(ob))
           ob->udp_reply(data);
+      }
     }
     return;
   }