erp5_corporate_identity_test: add tests for letter preview

bt5/erp5_corporate_identity_test/PathTemplateItem/portal_tests/template_test_zuite/testAndUpdateTestLetterEventTemplate.zpt

@@ -183,6 +183,37 @@ Note:
   <td>name=field_my_aggregate_title_list</td>
   <td>Test</td>
 </tr>
+<!-- test whether preview loads correctly -->
+<tr>
+  <td>clickAndWait</td>
+  <td>//a/span[contains(text(), 'Preview')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>waitForElementPresent</td>
+  <td>//div[contains(text(), '1999-12-31')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>verifyElementPresent</td>
+  <td>//div[contains(text(), '1999-12-31')]</td>
+  <td></td>
+</tr>
+  <tr>
+  <td>clickAndWait</td>
+  <td>//a[contains(text(), 'Test')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>clickAndWait</td>
+  <td>//a/span[contains(text(), 'View')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>waitForElementPresent</td>
+  <td>//a[contains(@href, 'my_aggregate_title_list')]</td>
+  <td></td>
+</tr>
 <tr>
   <td>clickAndWait</td>
   <td>//a[contains(@href, 'my_aggregate_title_list')]</td>
@@ -510,6 +541,37 @@ Note:
   <td>Created and associated a new Letter to the ticket.</td>
   <td></td>
 </tr>
+<!-- test whether preview loads correctly -->
+<tr>
+  <td>clickAndWait</td>
+  <td>//a/span[contains(text(), 'Preview')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>waitForElementPresent</td>
+  <td>//div[contains(text(), '1999-12-31')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>verifyElementPresent</td>
+  <td>//div[contains(text(), '1999-12-31')]</td>
+  <td></td>
+</tr>
+  <tr>
+  <td>clickAndWait</td>
+  <td>//a[contains(text(), 'Test')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>clickAndWait</td>
+  <td>//a/span[contains(text(), 'View')]</td>
+  <td></td>
+</tr>
+<tr>
+  <td>waitForElementPresent</td>
+  <td>//a[contains(@href, 'my_aggregate_title_list')]</td>
+  <td></td>
+</tr>
 <tr>
   <td>verifyValue</td>
   <td>name=field_my_aggregate_title_list</td>