+{ # 21152: Each time you save a Template a newline is chopped off the front
+ $m->form_name('ModifyTemplate');
+ my $content;
+
+
+ TODO: {
+
+ local $TODO = "WWW::Mechanize doesn't strip newline following <textarea> tag like browsers do";
+ # this test fails because earlier tests add newlines when using Mech
+ like($content = $m->value('Content'), qr/^Subject: Resolved/, 'got expected Content');
+
+ }
+
+ $content = "\n\n\n" . $content;
+ $m->field(Content => $content);
+ $m->submit;
+
+ $m->content_contains('Template Resolved: Content updated');
+
+ # next submit should not result in an update
+ $m->form_name('ModifyTemplate');
+ $m->submit;
+
+ TODO: {
+
+ local $TODO = "WWW::Mechanize doesn't strip newline following <textarea> tag like browsers do";
+ # this test fails because the template change makes Mech continuously add newlines where browsers dont
+ $m->content_lacks('Template Resolved: Content updated');
+
+ }
+}
+