|
Send mail
[Back]
# Ask for address
mailto = string_dialog("Mail to: (default: alberto@coker)", "OK", "Cancel")
if ($string_dialog_button == 2) return
# Set default value if not given
if (mailto == "")
mailto = "alberto@coker"
# If no selection, send the whole window contents
if ($selection_start == -1) {
start = 0
end = $text_length
} else {
start = $selection_start
end = $selection_end
}
# Issue the command
string = get_range(start, end)
shell_command("mail " mailto, string)
# Check command status
if ($shell_cmd_status == 0)
dialog("Mail sent correctly")
else
dialog("Mail not sent")
[Back]
Released on Wed, 21 Nov 2001
by
C. Denat
|
|