[PATCH] Quote-source VWD, please include in 1.6.7

[Joachim Breitner]

--3MwIy2ne0vdjdPXF
Content-Type: text/plain; charset=ISO-8859-15
Content-Disposition: inline
Content-Transfer-Encoding: 8bit

Hello,

It may not be appropriate for a newcomer in the gnucash community like me, but could you please please include this simple patch in the 1.6.7 release? The VWD source (already in Finance::Quote) is the only source that has the German Deka-Fonts.

Thank you!

Hello to warlord

Joachim

-- 
Joachim Breitner 
	mail@joachim-breitner.de | http://www.joachim-breitner.de | ICQ: 74513189
Zufälliger Spruch/Random Fortune:

Drop that pickle!

--3MwIy2ne0vdjdPXF
Content-Type: application/DEFANGED-246466; charset="us-ascii"
Content-Disposition: attachment; filename="gnucash-vwd-source_diff.DEFANGED-246466"

Index: src/gnc-ui-util.c
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/Attic/gnc-ui-util.c,v
retrieving revision 1.34.2.6
diff -u -r1.34.2.6 gnc-ui-util.c
--- src/gnc-ui-util.c	3 Aug 2002 10:15:26 -0000	1.34.2.6
+++ src/gnc-ui-util.c	14 Aug 2002 20:46:27 -0000
@@ -558,6 +558,8 @@
       return "TIAA-CREF";
     case SOURCE_TRUSTNET :
       return "Trustnet";
+    case SOURCE_VWD :
+      return "VWD";
     default:
       break;
   }
@@ -590,6 +592,8 @@
       return "TIAACREF";
     case SOURCE_TRUSTNET :
       return "TRUSTNET";
+    case SOURCE_VWD :
+      return "VWD";
     default:
       break;
   }
Index: src/gnc-ui-util.h
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/Attic/gnc-ui-util.h,v
retrieving revision 1.15.2.4
diff -u -r1.15.2.4 gnc-ui-util.h
--- src/gnc-ui-util.h	27 Jan 2002 10:50:58 -0000	1.15.2.4
+++ src/gnc-ui-util.h	14 Aug 2002 20:46:28 -0000
@@ -121,6 +121,7 @@
   SOURCE_ASX,
   SOURCE_TIAA_CREF,
   SOURCE_TRUSTNET,
+  SOURCE_VWD,
   NUM_SOURCES
 } PriceSourceCode;
 /* NOTE: If you modify PriceSourceCode, please update price-quotes.scm
Index: src/quotes/finance-quote-helper.in
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/quotes/finance-quote-helper.in,v
retrieving revision 1.7.2.1
diff -u -r1.7.2.1 finance-quote-helper.in
--- src/quotes/finance-quote-helper.in	18 Aug 2001 08:23:12 -0000	1.7.2.1
+++ src/quotes/finance-quote-helper.in	14 Aug 2002 20:46:39 -0000
@@ -358,6 +358,10 @@
       %quote_data = $quoter->trustnet(@$symbols);
       last SWITCH;
     }
+    if($quote_method_name =~ m/^vwd$/) {
+      %quote_data = $quoter->vwd(@$symbols);
+      last SWITCH;
+    }
     if($quote_method_name =~ m/^currency$/) {
       my ($from_currency, $to_currency) = @$symbols;
 
Index: src/scm/price-quotes.scm
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/scm/price-quotes.scm,v
retrieving revision 1.11.2.2
diff -u -r1.11.2.2 price-quotes.scm
--- src/scm/price-quotes.scm	8 Sep 2001 07:43:10 -0000	1.11.2.2
+++ src/scm/price-quotes.scm	14 Aug 2002 20:46:46 -0000
@@ -355,6 +355,7 @@
      ((string=? "ASX" src) 'asx)
      ((string=? "TIAACREF" src) 'tiaacref)
      ((string=? "TRUSTNET" src) 'trustnet)
+     ((string=? "VWD" src) 'vwd)
      ((string=? "CURRENCY" src) 'currency)
      (else #f)))
 
@@ -369,6 +370,7 @@
      ((asx) "asx")
      ((tiaacref) "tiaacref")
      ((trustnet) "trustnet")
+     ((vwd) "vwd")
      ((currency) "currency")
      (else #f)))
 

--3MwIy2ne0vdjdPXF
Content-Type: text/sanitizer-log; charset="iso-8859-1"
Content-Transfer-Encoding: 8bit
Content-Disposition: attachment; filename="sanitizer.log"

This message has been 'sanitized'.  This means that potentially
dangerous content has been rewritten or removed.  The following
log describes which actions were taken.

Sanitizer (start="1029358339"):
  Part (pos="1047"):
    SanitizeFile (filename="unnamed.txt", mimetype="text/plain"):
      Match (rule="2"):
        Enforced policy: accept

  Part (pos="1617"):
    SanitizeFile (filename="gnucash-vwd-source.diff", mimetype="text/x-patch"):
      Match (rule="default"):
        Enforced policy: defang

      Replaced mime type with: application/DEFANGED-246466
      Replaced file name with: gnucash-vwd-source_diff.DEFANGED-246466

  Total modifications so far: 1


Anomy 0.0.0 : Sanitizer.pm
$Id: Sanitizer.pm,v 1.54 2002/02/15 16:59:07 bre Exp $

--3MwIy2ne0vdjdPXF--