Lines 179-184
sub get_filetype {
Link Here
|
179 |
return 'pl' if $file =~ m{^svc} || $file =~ m{^opac/svc}; |
179 |
return 'pl' if $file =~ m{^svc} || $file =~ m{^opac/svc}; |
180 |
return 'pl' if $file =~ m{\.pl$} || $file =~ m{\.pm} || $file =~ m{\.t$}; |
180 |
return 'pl' if $file =~ m{\.pl$} || $file =~ m{\.pm} || $file =~ m{\.t$}; |
181 |
return 'pl' if $file =~ m{\.PL$}; |
181 |
return 'pl' if $file =~ m{\.PL$}; |
|
|
182 |
return 'pl' if $file =~ m{^debian/build-git-snapshot$}; |
182 |
|
183 |
|
183 |
return 'js' if $file =~ m{\.js$} || $file =~ m{\.ts$} || $file =~ m{\.vue$}; |
184 |
return 'js' if $file =~ m{\.js$} || $file =~ m{\.ts$} || $file =~ m{\.vue$}; |
184 |
|
185 |
|
185 |
- |
|
|