CODE
using terms from application "Colloquy"
on process outgoing chat message msg in chatView
set messageText to (get HTML of msg as string)
set msgCount to count of characters in messageText
if msgCount is greater than 420 then
set cutText to (get rich text 405 thru (count of characters in messageText) of messageText)
set messageText to (get rich text 1 through 405 of messageText)
sendMessage(cutText, messageText)
return true
end if
end process outgoing chat message
on sendMessage(cutText, messageText)
tell active panel of front window
send message messageText
send message "cut --> " & cutText
return true
end tell
end sendMessage
end using terms from
on process outgoing chat message msg in chatView
set messageText to (get HTML of msg as string)
set msgCount to count of characters in messageText
if msgCount is greater than 420 then
set cutText to (get rich text 405 thru (count of characters in messageText) of messageText)
set messageText to (get rich text 1 through 405 of messageText)
sendMessage(cutText, messageText)
return true
end if
end process outgoing chat message
on sendMessage(cutText, messageText)
tell active panel of front window
send message messageText
send message "cut --> " & cutText
return true
end tell
end sendMessage
end using terms from
The cut works and it posts it all but then after it's done that it posts the message again. Any one know how I can keep it from posting again?