--- libaitrpc/src/srv.c	2012/05/16 13:17:51	1.9.2.16
+++ libaitrpc/src/srv.c	2012/05/16 16:36:10	1.9.2.17
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@openbsd-bg.org>
 *
 * $Author: misho $
-* $Id: srv.c,v 1.9.2.16 2012/05/16 13:17:51 misho Exp $
+* $Id: srv.c,v 1.9.2.17 2012/05/16 16:36:10 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -82,6 +82,7 @@ txPacket(sched_task_t *task)
 	if (rpc->call_argc) {
 		f = rpc_srv_getCall(s, ntohs(rpc->call_tag));
 		if (!f) {
+			rpc_SetErr(EPROGUNAVAIL, "Function not found at RPC server");
 			rpc->call_argc ^= rpc->call_argc;
 			rpc->call_rep.ret = RPC_ERROR(-1);
 			rpc->call_rep.eno = RPC_ERROR(rpc_Errno);