corysanin/tubestation
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Perl doesn't work that well if you write JavaScript in it

Browse Source
This commit is contained in:
sayrer@gmail.com
2006-11-08 07:07:44 +00:00
parent 6c63c2f5c7
commit 196604079f
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
testing/mochitest/gen_template.pl
View File

@@ -10,14 +10,14 @@
# perl gen_template.pl -b 345876 -type xul
#
# sends a test case template for bug 345876 to stdout
use Switch;
use Getopt::Long;
GetOptions("b=i"=> \$bug_number,
"type:s"=> \$template_type);
if ($template_type == "xul") {
if ($template_type eq "xul") {
$template_type = "static/xul.template.txt";
} elsif ($template_type == "xhtml") {
} elsif ($template_type eq "xhtml") {
$template_type = "static/xhtml.template.txt";
} else {
$template_type = "static/test.template.txt";