diff options
author | dobey <dobey> | 2006-09-21 17:33:54 +0000 |
---|---|---|
committer | dobey <dobey> | 2006-09-21 17:33:54 +0000 |
commit | bc7c021804cf31c1ed2d33741ab51b30130f18ef (patch) | |
tree | a9bdafb7dbdf72bff73307975da44aa01f02644b | |
parent | 5f0293f705402a99dbcb609ec180d7a47f1c60c7 (diff) |
2006-09-21 Rodney Dawes <dobey@novell.com>
* scripts/evolution.py: New script to scan most of the Mail UI in the
Evolution application
* scripts/evolutin-mail.py: Remove this script in favor of evolution.py
-rw-r--r-- | ChangeLog | 7 | ||||
-rwxr-xr-x | scripts/evolution.py | 105 |
2 files changed, 112 insertions, 0 deletions
@@ -1,5 +1,12 @@ 2006-09-21 Rodney Dawes <dobey@novell.com> + * scripts/evolution.py: New script to scan most of the Mail UI in the + Evolution application + + * scripts/evolutin-mail.py: Remove this script in favor of evolution.py + +2006-09-21 Rodney Dawes <dobey@novell.com> + * scripts/gnome-theme-manager.py: Fix the program name and window title so that the capplet will get scanned properly diff --git a/scripts/evolution.py b/scripts/evolution.py new file mode 100755 index 0000000..8745ccf --- /dev/null +++ b/scripts/evolution.py @@ -0,0 +1,105 @@ +#!/usr/bin/python + +import string, sys, os +from ldtp import * +from ldtputils import * +from A11yTestUtils import * + +program_name = 'evolution' +window_title = 'Evolution Setup Assistant' + +a11y_test_init (program_name, '-c mail') + +# +# This big block of stuff is for the first-run wizard +# it is commented out so that we may + +#guiexist (window_title) +# +#a11y_scan_window (window_title) +#click (window_title, 'btnForward') +#settextvalue (window_title, 'txtEmailAddress', 'user@localhost') +#settextvalue (window_title, 'txtReply-To', 'user@localhost') +#settextvalue (window_title, 'txtOrganization', 'Organization, Inc.') +#time.sleep (1) +#click (window_title, 'btnForward') +# +#time.sleep (1) +#click (window_title, 'btnForward') +# +#time.sleep (2) +#comboselect (window_title, 'cboServerType1', 'Sendmail') +#time.sleep (2) +#lick (window_title, 'btnForward') +# +#settextvalue (window_title, 'txtName', 'Localhost') +#time.sleep (3) +#click (window_title, 'btnForward') +#time.sleep (2) +#click (window_title, 'btnForward') +#time.sleep (2) +#click (window_title, 'btnApply') +# +#time.sleep (2) + +# The Main Mail window +guiexist ('*Evolution-*') + +a11y_scan_window ('*Evolution-*') + +# Scan the preferences dialog +selectmenuitem ('*Evolution-*', 'mnuEdit;mnuPreferences') +a11y_scan_dialog ('dlgEvolutionPreferences', 'btnClose') + +# Scan the Mail Filters dialog +selectmenuitem ('*Evolution-*', 'mnuEdit;mnuMessageFilters') +#click ('dlgMessageFilters', 'btnAdd') +#a11y_scan_dialog ('dlgAddRule', 'btnCancel') +a11y_scan_dialog ('dlgMessageFilters', 'btnCancel') + +# Scan the Search Folders dialog +selectmenuitem ('*Evolution-*', 'mnuEdit;mnuSearchFolders') +#click ('dlgMessageFilters', 'btnAdd') +#a11y_scan_dialog ('dlgAddRule', 'btnCancel') +a11y_scan_dialog ('dlgSearchFolders', 'btnCancel') + +# Scan the Plugin Manager dialog +selectmenuitem ('*Evolution-*', 'mnuEdit;mnuPlugins') +a11y_scan_dialog ('dlgPluginManager', 'btnOK') + +# Scan the custom views dialog +selectmenuitem ('*Evolution-*', 'mnuView;mnuCurrentView;mnuDefineViews') +time.sleep (2) +guiexist ('dlgDefineViewsforMail') +click ('dlgDefineViewsforMail', 'btnNew') +a11y_scan_dialog ('dlgDefineNewView', 'btnCancel') +a11y_scan_dialog ('dlgDefineViewsforMail', 'btnClose') + +# Scan the subscribe folders dialog +selectmenuitem ('*Evolution-*', 'mnuFolder;mnuSubscriptions') +a11y_scan_dialog ('dlgFolderSubscriptions', 'btnClose') + +# Scan the copy folder dialog +selectmenuitem ('*Evolution-*', 'mnuFolder;mnuCopyFolderTo') +a11y_scan_dialog ('dlgSelectfolder', 'btnCancel') + +# Scan the folder properties dialog +selectmenuitem ('*Evolution-*', 'mnuFolder;mnuProperties') +a11y_scan_dialog ('dlgFolderProperties', 'btnOK') + +# Scan the mail composer +selectmenuitem ('*Evolution-*', 'mnuMessage;mnuComposeNewMessage') +a11y_scan_window ('frmComposeMessage') +selectmenuitem ('frmComposeMessage', 'mnuFile;mnuClose') + +# Switch to the Calendar view +selectmenuitem ('*Evolution-*', 'mnuView;mnuWindow;mnuCalendars') + +time.sleep (2) +a11y_scan_window ('*Evolution-Calendars') + +# Close the main window +selectmenuitem ('*Evolution-Calendars', 'mnuFile;mnuQuit') + +a11y_test_shutdown () + |