duckduckgo
/
zeroclickinfo-goodies
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Adjust byline to accommodate disscussion in #981

master
John Lifsey 2015-03-04 22:58:46 -05:00
parent 76e5d1dab1
commit 179af414b9
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lib/DDG/Goodie/Wavelength.pm
View File

@ -46,6 +46,8 @@ handle remainder => sub {
my ($vf) = $query =~ m/\bvf[ =]([\d\.]+)/i; my ($vf) = $query =~ m/\bvf[ =]([\d\.]+)/i;
$vf = 1 if (!$vf or $vf>1 or $vf<0); $vf = 1 if (!$vf or $vf>1 or $vf<0);
my $velocity_text = ($vf == 1 ? '' : "$vf × ").'Speed of light in a vacuum';
my $mul = MULTIPLIER->{lc($units)}; my $mul = MULTIPLIER->{lc($units)};
my $hz_freq = $freq * $mul * (1/$vf); my $hz_freq = $freq * $mul * (1/$vf);
@ -63,13 +65,14 @@ handle remainder => sub {
} }
} }
my $output_text = "λ = $output_value $output_units"; my $result_text = "λ = $output_value $output_units";
my $operation_text = "Wavelength of $freq ".FORMAT_UNITS->{lc($units)}." ($velocity_text)";
return $output_text, return $result_text,
structured_answer => { structured_answer => {
input => [$freq, FORMAT_UNITS->{lc($units)}], input => [],
operation => "Wavelength ( Velocity Factor $vf × Speed of light in a vacuum )", operation => $operation_text,
result => $output_text, result => $result_text,
}; };
}; };