[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