Return to compfuncs.c CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / clients / xmh

Annotation of researchv9/X11/src/X.V11R1/clients/xmh/compfuncs.c, revision 1.1

1.1     ! root        1: #ifndef lint
        !             2: static char rcs_id[] = "$Header: compfuncs.c,v 1.10 87/09/11 08:19:14 toddb Exp $";
        !             3: #endif lint
        !             4: /*
        !             5:  *                       COPYRIGHT 1987
        !             6:  *                DIGITAL EQUIPMENT CORPORATION
        !             7:  *                    MAYNARD, MASSACHUSETTS
        !             8:  *                     ALL RIGHTS RESERVED.
        !             9:  *
        !            10:  * THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE AND
        !            11:  * SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION.
        !            12:  * DIGITAL MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS SOFTWARE FOR
        !            13:  * ANY PURPOSE.  IT IS SUPPLIED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY.
        !            14:  *
        !            15:  * IF THE SOFTWARE IS MODIFIED IN A MANNER CREATING DERIVATIVE COPYRIGHT RIGHTS,
        !            16:  * APPROPRIATE LEGENDS MAY BE PLACED ON THE DERIVATIVE WORK IN ADDITION TO THAT
        !            17:  * SET FORTH ABOVE.
        !            18:  *
        !            19:  *
        !            20:  * Permission to use, copy, modify, and distribute this software and its
        !            21:  * documentation for any purpose and without fee is hereby granted, provided
        !            22:  * that the above copyright notice appear in all copies and that both that
        !            23:  * copyright notice and this permission notice appear in supporting documentation,
        !            24:  * and that the name of Digital Equipment Corporation not be used in advertising
        !            25:  * or publicity pertaining to distribution of the software without specific,
        !            26:  * written prior permission.
        !            27:  */
        !            28: 
        !            29: /* comp.c -- handle composition buttons. */
        !            30: 
        !            31: #include "xmh.h"
        !            32: 
        !            33: 
        !            34: /* Reset this composition window to be one with just a blank message
        !            35:    template. */
        !            36: 
        !            37: void ExecCompReset(scrn)
        !            38: Scrn scrn;
        !            39: {
        !            40:     Msg msg;
        !            41:     if (MsgSetScrn((Msg) NULL, scrn))
        !            42:        return;
        !            43:     msg = TocMakeNewMsg(DraftsFolder);
        !            44:     MsgLoadComposition(msg);
        !            45:     MsgSetTemporary(msg);
        !            46:     MsgSetReapable(msg);
        !            47:     (void) MsgSetScrn(msg, scrn);
        !            48: }
        !            49: 
        !            50: 
        !            51: /* Send the message in this window.  Avoid sending the same message twice.
        !            52:    (Code elsewhere actually makes sure this button is disabled to avoid
        !            53:    sending the same message twice, but it doesn't hurt to be safe here.) */
        !            54: 
        !            55: 
        !            56: void ExecSendDraft(scrn)
        !            57: Scrn scrn;
        !            58: {
        !            59:     if (scrn->msg == NULL) return;
        !            60:     if (!MsgGetReapable(scrn->msg)) {
        !            61:        MsgSend(scrn->msg);
        !            62:        MsgSetReapable(scrn->msg);
        !            63:     }
        !            64: }
        !            65: 
        !            66: 
        !            67: /* Save any changes to the message.  This also makes this message permanent. */
        !            68: 
        !            69: void ExecSaveDraft(scrn)
        !            70: Scrn scrn;
        !            71: {
        !            72:     if (scrn->msg == NULL) return;
        !            73:     MsgSetPermanent(scrn->msg);
        !            74:     MsgSaveChanges(scrn->msg);
        !            75:     MsgClearReapable(scrn->msg);
        !            76: }
        !            77: 
        !            78: 
        !            79: /* Utility routine; creates a composition screen containing a forward message
        !            80:    of the messages in the given msglist. */
        !            81: 
        !            82: CreateForward(mlist)
        !            83:   MsgList mlist;
        !            84: {
        !            85:     Scrn scrn;
        !            86:     Msg msg;
        !            87:     scrn = NewCompScrn();
        !            88:     msg = TocMakeNewMsg(DraftsFolder);
        !            89:     MsgLoadForward(msg, mlist);
        !            90:     MsgSetTemporary(msg);
        !            91:     (void) MsgSetScrn(msg, scrn);
        !            92:     MapScrn(scrn);
        !            93: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.