mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-11-29 04:04:07 -06:00
Report a failure of F::Q to return a currency quote.
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@11967 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
0046dfc6bd
commit
ff3b79f9ab
@ -1,7 +1,7 @@
|
||||
2005-11-17 David Hampton <hampton@employees.org>
|
||||
|
||||
* src/quotes/dump-finance-quote: Add support for printing currency
|
||||
quotes.
|
||||
quotes. Report a failure of F::Q to return a currency quote.
|
||||
|
||||
* most files: Update FSF street address.
|
||||
|
||||
|
@ -165,7 +165,11 @@ if ($exchange eq "currency") {
|
||||
while ($#ARGV >= 0) {
|
||||
my $to = shift;
|
||||
my $result = $q->currency($from, $to);
|
||||
printf "1 $from = $result $to\n";
|
||||
if (defined($result)) {
|
||||
printf "1 $from = $result $to\n";
|
||||
} else {
|
||||
printf "1 $from = <unknown> $to\n";
|
||||
}
|
||||
}
|
||||
} else {
|
||||
while ($#ARGV >= 0) {
|
||||
|
Loading…
Reference in New Issue
Block a user