*** empty log message ***

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@2184 57a11ea4-9604-0410-9ed3-97b8803252fd

ChangeLog

@@ -1,5 +1,7 @@
 2000-04-14  Dave Peticolas  <peticola@cs.ucdavis.edu>
 
+	* src/engine/AccInfo.c: allow the price source to be set to NULL.
+
 	* lots of build system files: changes for the global id stuff.
 
 	* src/engine/GNCId.c: engine globally unique id api implementation.

doc/README

@@ -553,6 +553,7 @@ Tyson Dowd   <tyson@tyse.net> for config/make patches & debian maint
 Koen D'Hondt <ripley@xs4all.nl> for Solaris patches to XmHTML
 Bob Drzyzgula <bob@mostly.com> for budgeting design notes
 Paul Fenwick <pjf@schools.net.au> ASX support
+Hubert Figuiere <hfiguiere@teaser.fr> patch to gnc-prices
 Jan-Uwe Finck <ju_finck@mail.netwave.de> for German message translation
 Ron Forrester <rjf@aracnet.com> for gnome patches
 Dave Freese <DFreese@osc.uscg.mil> for leap-year fix

doc/html/C/xacc-about.html

@@ -290,6 +290,10 @@
 
       <dd>ASX support</dd>
 
+      <dt> <a href="mailto:hfiguiere@teaser.fr"> Hubert Figuiere</a></dt>
+
+      <dd>patch to gnc-prices</dd>
+
       <dt> <a href="mailto:ju_finck@mail.netwave.de"> Jan-Uwe
       Finck</a></dt>
 

src/engine/AccInfo.c

@@ -213,9 +213,12 @@ xaccFreeInvAcct (InvAcct *iacc)
 void 
 xaccInvAcctSetPriceSrc (InvAcct *iacc, const char *src)
 {
-   if (!iacc || !src) return;
+   if (!iacc) return;
    if (iacc->pricesrc) { free(iacc->pricesrc); }
-   iacc->pricesrc = strdup (src);
+   if (src)
+     iacc->pricesrc = strdup (src);
+   else
+     iacc->pricesrc = NULL;
 }
 
 char * 

src/engine/GNCId.c

@@ -113,7 +113,7 @@ entity_table_init()
 
   entity_table = g_hash_table_new(id_hash, id_compare);
 
-  atexit(summarize_table);
+  /* atexit(summarize_table); */
 }
 
 GNCIdType

src/quotes/gnc-prices.in

@@ -140,6 +140,11 @@ foreach $acct (@acctlist)
     $accinfo = gnucash::xaccAccountGetAccInfo ($acct);
     $invacct = gnucash::xaccCastToInvAcct ($accinfo);
 
+    if ($security eq "") 
+    {
+       print "unknown. skipping...\n";
+       next;
+    }
     if ($invacct)
     {
       $quotesrc = gnucash::xaccInvAcctGetPriceSrc ($invacct);

src/swig/perl5/Makefile.in

@@ -55,7 +55,7 @@ include @top_srcdir@/Makefile.common
 default: gnucash.so 
 
 gnucash.so: ${OBJS} ../../engine/libengine.a
-	gcc -shared ${OBJS} ../../engine/libengine.a -L@libdir@ ${LIBNANA} -o gnucash.so
+	gcc -shared ${GLIB_LIBS} ${OBJS} ../../engine/libengine.a -L@libdir@ ${LIBNANA} -o gnucash.so
 
 SWIG_FILTER    := %P.h %/util.h
 SWIG_ENGINE_HDRS := \