workbench/libs/gadtools/gt_replyimsg.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include <exec/ports.h>
  10 #include "gadtools_intern.h"
  11
  12 /*********************************************************************
  13
  14     NAME */
  15 #include <proto/gadtools.h>
  16 #include <intuition/intuition.h>
  17
  18         AROS_LH1(void, GT_ReplyIMsg,
  19
  20 /*  SYNOPSIS */
  21         AROS_LHA(struct IntuiMessage *, imsg, A1),
  22
  23 /*  LOCATION */
  24         struct Library *, GadToolsBase, 13, GadTools)
  25
  26 /*  FUNCTION
  27         Replies a message gotten via GT_GetIMsg().
  28
  29     INPUTS
  30         imsg - The message to reply.
  31
  32     RESULT
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41         GT_GetIMsg(), exec.library/ReplyMsg()
  42
  43     INTERNALS
  44
  45     HISTORY
  46
  47 ***************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct IntuiMessage *origmsg;
  52
  53     if (imsg)
  54     {
  55         origmsg = GT_PostFilterIMsg(imsg);
  56         if (origmsg)
  57             ReplyMsg(&origmsg->ExecMessage);
  58     }
  59
  60     AROS_LIBFUNC_EXIT
  61
  62 } /* GT_ReplyIMsg */