+void CtdlRegisterXmsgHook(int (*fcn_ptr) (char *, char *, char *) )
+{
+
+ struct XmsgFunctionHook *newfcn;
+
+ newfcn = (struct XmsgFunctionHook *)
+ mallok(sizeof(struct XmsgFunctionHook));
+ newfcn->next = XmsgHookTable;
+ newfcn->h_function_pointer = fcn_ptr;
+ XmsgHookTable = newfcn;
+
+ lprintf(5, "Registered a new x-msg function\n");
+}
+
+