diff options
author | Perl Tidy <perltidy@bugzilla.org> | 2018-12-05 21:38:52 +0100 |
---|---|---|
committer | Dylan William Hardison <dylan@hardison.net> | 2018-12-05 23:49:08 +0100 |
commit | 8ec8da0491ad89604700b3e29a227966f6d84ba1 (patch) | |
tree | 9d270f173330ca19700e0ba9f2ee931300646de1 /t/css.t | |
parent | a7bb5a65b71644d9efce5fed783ed545b9336548 (diff) | |
download | bugzilla-8ec8da0491ad89604700b3e29a227966f6d84ba1.tar.gz bugzilla-8ec8da0491ad89604700b3e29a227966f6d84ba1.tar.xz |
no bug - reformat all the code using the new perltidy rules
Diffstat (limited to 't/css.t')
-rw-r--r-- | t/css.t | 27 |
1 files changed, 14 insertions, 13 deletions
@@ -17,21 +17,22 @@ use Test::More; my $root = cwd(); find( - { - wanted => sub { - if (/\.css$/) { - my $css_file = $File::Find::name; - my $content = read_file($_); - while ($content =~ m{url\(["']?([^\?\)"']+)(?:\?.+)?['"]?\)}g) { - my $file = $1; - my $file_rel_root = File::Spec->abs2rel(realpath(File::Spec->rel2abs($file)), $root); + { + wanted => sub { + if (/\.css$/) { + my $css_file = $File::Find::name; + my $content = read_file($_); + while ($content =~ m{url\(["']?([^\?\)"']+)(?:\?.+)?['"]?\)}g) { + my $file = $1; + my $file_rel_root + = File::Spec->abs2rel(realpath(File::Spec->rel2abs($file)), $root); - ok(-f $file, "$css_file references $file ($file_rel_root)"); - } - } - }, + ok(-f $file, "$css_file references $file ($file_rel_root)"); + } + } }, - 'skins' + }, + 'skins' ); done_testing; |