Revcoders

ON killAllPendingMessages
    put the pendingmessages into tMessages
    REPEAT for each line tLine in tMessages
        cancel (item 1 of tLine)
    END REPEAT
END killAllPendingMessages

ON cancelThisMsg tMsg

    put the pendingmessages into tPendingMsgs

    IF tMsg is in tPendingMsgs THEN

          repeat FOR each line x in tPendingMsgs

                if tMsg is in x THEN cancel item 1 of x

          end REPEAT

    END IF

END cancelThisMsg