diff options
Diffstat (limited to 'evolution/compose_mail.py')
-rwxr-xr-x | evolution/compose_mail.py | 91 |
1 files changed, 91 insertions, 0 deletions
diff --git a/evolution/compose_mail.py b/evolution/compose_mail.py new file mode 100755 index 0000000..387e951 --- /dev/null +++ b/evolution/compose_mail.py @@ -0,0 +1,91 @@ +# +# Linux Desktop Testing Project http://www.gnomebangalore.org/ldtp +# +# Authors: +# Khasim Shaheed <khasim.shaheed@gmail.com> +# +# Copyright 2004 Novell, Inc. +# +# This library is free software; you can redistribute it and/or +# modify it under the terms of the GNU Library General Public +# License as published by the Free Software Foundation; either +# version 2 of the License, or (at your option) any later version. +# +# This library is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +# Library General Public License for more details. +# +# You should have received a copy of the GNU Library General Public +# License along with this library; if not, write to the +# Free Software Foundation, Inc., 59 Temple Place - Suite 330, +# Boston, MA 02111-1307, USA. +# + +# Compose a new mail through File menu +from evoutils.mail import * +from evoutils.composemail import * +from evoutils.mailpreferences import * +from contact import * + +# Section to compose a new mail through File menu +def compose_mail (to, subject, body, cc, bcc, attachment, sentitemsfolder, refimg): + try: + #selectMailPane() + if sentitemsfolder: + sent_folder = sentitemsfolder[0] + else: + sent_folder = 'Sent' + + #remap ('evolution','frmEvolution-Mail') + selectrowpartialmatch ('frmEvolution-Mail', 'ttblMailFolderTree', sent_folder) + time.sleep (2) + #undoremap ('evolution','frmEvolution-Mail') + #remap ('evolution','frmEvolution-Mail') + sent_mail_count = getrowcount ('frmEvolution-Mail', 'ttblMessageList') + #undoremap ('evolution','frmEvolution-Mail') + compose (to, subject, body, cc,bcc, attachment) + sendmail (subject) + click ('frmEvolution-Mail', 'btnSend/Receive') + waittillguinotexist ('dlgSend&ReceiveMail') + #remap ('evolution','frmEvolution-Mail') + if verifymailwithimage (sent_folder, sent_mail_count, refimg) == 1: + log ('Compose new message', 'pass') + else: + log ('Compose new message', 'fail') + + ## check if To and CC are empty with only BCC field having values + if len (to)==0 and len (cc)==0: + sub=getcellvalue ('frmEvolution-Mail','ttblMessageList',sent_mail_count,4) + if body[0].startswith (sub)==1: + log ('Message without To and cc contains first line of message as subject','pass') + else: + log ('Message without To and cc contains first line of message as subject','fail') + + ## check if attachment is received properly +# selectitem () not implemented properly in LDTP. uncomment following lines whe resolved +# if len (attachment)>0: +# setcontext ('Readonlyframe', subject) +# selectmenuitem ('frmEvolution-Mail', 'mnuMessage;mnuOpeninNewWindow') +# time.sleep (1) +# if waittillguiexist ('frmReadonly') == 0: +# log ('Readonlyframe failed to open', 'cause') +# raise LdtpExecutionError (0) + +# activatewin (subject) +# time.sleep (1) +# try: +# for x in attachment[0]: +# selectitem ('frmReadonly','paneAttachmentBar',x) +# releasecontext() +# except: +# log ('attachments not received properly','error') +# raise LdtpExecutionError (0) + + #undoremap ('evolution','frmEvolution-Mail') + + except ldtp.error, msg: + log ('Compose new message failed ' + str (msg), 'cause') + log ('Compose message failed', 'fail') + raise LdtpExecutionError (0) + |