[Gnucash-changes] r11967 - gnucash/trunk - Report a failure of F::Q
to return a currency quote.
David Hampton
hampton at cvs.gnucash.org
Thu Nov 17 00:58:31 EST 2005
Author: hampton
Date: 2005-11-17 00:58:30 -0500 (Thu, 17 Nov 2005)
New Revision: 11967
Trac: http://svn.gnucash.org/trac/changeset/11967
Modified:
gnucash/trunk/ChangeLog
gnucash/trunk/src/quotes/dump-finance-quote
Log:
Report a failure of F::Q to return a currency quote.
Modified: gnucash/trunk/ChangeLog
===================================================================
--- gnucash/trunk/ChangeLog 2005-11-17 05:54:31 UTC (rev 11966)
+++ gnucash/trunk/ChangeLog 2005-11-17 05:58:30 UTC (rev 11967)
@@ -1,7 +1,7 @@
2005-11-17 David Hampton <hampton at 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.
Modified: gnucash/trunk/src/quotes/dump-finance-quote
===================================================================
--- gnucash/trunk/src/quotes/dump-finance-quote 2005-11-17 05:54:31 UTC (rev 11966)
+++ gnucash/trunk/src/quotes/dump-finance-quote 2005-11-17 05:58:30 UTC (rev 11967)
@@ -165,7 +165,11 @@
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) {
More information about the gnucash-changes
mailing list