Short: Prevents posting unedited messages with THOR Author: Neil Bothwick Uploader: Neil Bothwick Type: comm/thor Version: 1.5 Architecture: m68k-amigaos THOR's asynchronous message editing is extremely useful, but there is a disadvantage. If you Send Events while a message is being edited, the unedited version is sent and the file you save is lost. SafeEdit.thor is the solution. It freezes the event before starting the editor and activates it when you exit the editor, while still retaining all the advantages of asynchronous editing. With version 1.1 you also get a warning if you leave the editor without saving. You have the choice of re-editing the message, leaving it or deleting the event. This removes the need for scripts like CancelEvent.ged. Installation ============ Copy SafeEdit.thor to {THORPath}/rexx Go into Global Config/Message options and set the external editor to Run >NIL: rexx/SafeEdit.thor Open a shell, CD to the THOR directory and type the following lines: protect rexx/SafeEdit.thor +s setenv THO0R/Editor [editor command] copy ENV:THOR/Editor ENVARC:THOR where [editor command] is the command used to start your editor in "sticky" mode. For the GoldED quickstarter use "C:Ed STICKY". The file to be edited will be added to the end of this line. If you have an editor than doesn't accept the file in this position, mail me with the syntax needed and I'll revise the script where necessary. Warranty ======== This script works for me. I guarantee that it will work for you whenever it works, but at no other time. Problems? ========= If SafeEdit.thor doesn't freeze the event when editing, make sure your editor command includes whatever option is needed to make the editor sticky. You can test this my typing the command in a shell, if the shell prompt doesn't return until you quit the editor the command should work. Should you still have problems, mail me with exact details. History ======= 1.0 First release - it worked 1.1 Added warning if you exit the editor without saving. 1.2 Added ADDUSER switch to add the recipient of the current mail to the User Database. this has proved less than useful if you use THOR to read and reply to mailing list messages :( 1.3 The script was assuming rexxdossupport.library was already available, thnks to Gian Maria Calzolari for pointing this out 1.4 SafeEdit would fail when run from a System with a space in the name - fixed 1.5 I forgot to load rexxsupport.library :( I hope this and rexxdossupport.library will be automatic in OS3.5 To Do ===== Add option to strip a signature from a message before replying.