diff options
author | Tony Sarajarvi <tony.sarajarvi@digia.com> | 2013-03-20 13:47:21 +0200 |
---|---|---|
committer | Sergio Ahumada <sergio.ahumada@digia.com> | 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 <tony.sarajarvi@digia.com>
Reviewed-by: Janne Anttila <janne.anttila@digia.com>
Reviewed-by: Sergio Ahumada <sergio.ahumada@digia.com>
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', |