eleksir/hexchat-scripts
1
Fork 0
Code Activity

fix coding style

Browse Source
This commit is contained in:
eleksir
2017-12-11 16:10:33 +03:00
parent 51b905cb70
commit d8a1e41eb2
5 changed files with 25 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
web_link_saver/img-save.pl
View File

@@ -71,7 +71,7 @@ sub cdlfunc($) {
$fname =~ s/[^\w!., -#]/_/g;
$savepath = $savepath . "/" . $fname . ".$extension";
if ( (lc($url) =~ /\.(gif|jpeg|png|webm|mp4)$/) and ($1 eq $extension) ){
if ( (lc($url) =~ /\.(gif|jpe?g|png|webm|mp4)$/) and ($1 eq $extension) ) {
$savepath = $ENV{'HOME'} . "/imgsave/" . $fname;
}
@@ -104,7 +104,7 @@ sub dlfunc(@) {
if (($^O ne 'cygwin') and defined($IMAGEMAGICK)) {
eval {
if ($file =~ /(png|jpe?g|gif)$/i){
if ($file =~ /(png|jpe?g|gif)$/i) {
my $im = Image::Magick->new();
my $rename = 1;
my (undef, undef, undef, $format) = $im->Ping($file);