diff options
author | Tony Sarajarvi <[email protected]> | 2013-03-20 13:47:21 +0200 |
---|---|---|
committer | Sergio Ahumada <[email protected]> | 2013-04-04 09:29:11 +0200 |
commit | 7de0e30043246b6d85ce52ab1be044ea8af173e7 (patch) | |
tree | f9950507b539a3d6c078e5ee783170dbd85d1f13 /index.pl | |
parent | 202be8d6286ea33ea4a5b46dbdf07c4662dc78cf (diff) |
Change-Id: I32d6a6658cd657d6e2465a0c872e364ee253fa50
Reviewed-by: Arto Kanninen
Reviewed-by: Tony Sarajärvi <[email protected]>
Reviewed-by: Janne Anttila <[email protected]>
Reviewed-by: Sergio Ahumada <[email protected]>
Diffstat (limited to 'index.pl')
-rwxr-xr-x | index.pl | 11 |
1 files changed, 9 insertions, 2 deletions
@@ -34,8 +34,15 @@ sub meaning return $result; } +my $toptext = "Sanity Test Guidelines can be found here: \ +<a href=http://qt-project.org/wiki/Sanity-Test-Guidelines> \ +http://qt-project.org/wiki/Sanity-Test-Guidelines</a><br> \ +Feel free to update them during your test to make them reusable \ +and helpful for other testers."; + # First create our form -my $form = CGI::FormBuilder->new(source => 'reltest-form.conf'); +my $form = CGI::FormBuilder->new(source => 'reltest-form.conf', + text => $toptext); # Check to see if we're submitted and valid if ($form->submitted && $form->validate) { @@ -62,7 +69,7 @@ if ($form->submitted && $form->validate) { } else { # Auto-fill with today's date - my $now = strftime("%m/%d/%Y", localtime); + my $now = strftime("%Y-%m-%d", localtime); $form->field(name => 'report_date', value => $now); $form->field(name => 'package_date', |