r14684 - gnucash/branches/swigify/src/business/business-gnome - Make temporary wrappers for values of gnc:url-id type.

[Chris Shoemaker]

Author: chris
Date: 2006-08-15 23:39:21 -0400 (Tue, 15 Aug 2006)
New Revision: 14684
Trac: http://svn.gnucash.org/trac/changeset/14684

Modified:
   gnucash/branches/swigify/src/business/business-gnome/businessmod-gnome.c
Log:
   Make temporary wrappers for values of gnc:url-id type.


Modified: gnucash/branches/swigify/src/business/business-gnome/businessmod-gnome.c
===================================================================
--- gnucash/branches/swigify/src/business/business-gnome/businessmod-gnome.c	2006-08-16 03:24:27 UTC (rev 14683)
+++ gnucash/branches/swigify/src/business/business-gnome/businessmod-gnome.c	2006-08-16 03:39:21 UTC (rev 14684)
@@ -36,6 +36,7 @@
 #include "gnc-module.h"
 #include "gnc-module-api.h"
 //#include "gw-business-gnome.h"
+#include "g-wrap-wct.h" //temp
 
 #include "search-core-type.h"
 #include "search-owner.h"
@@ -106,6 +107,24 @@
   scm_c_eval_string("(use-modules (gnucash business-gnome))");
   scm_c_eval_string("(use-modules (gnucash report business-reports))");
 
+  // temp code until gnc:id-type is wrapped
+  {
+      SCM wct_gnc_url_type = scm_c_eval_string("<gnc:url-type>");
+      SCM tmp;
+      
+      tmp = gw_wcp_assimilate_ptr(GNC_CUSTOMER_MODULE_NAME, wct_gnc_url_type);
+      scm_c_define("gnc:url-type-customer", tmp);
+      tmp = gw_wcp_assimilate_ptr(GNC_VENDOR_MODULE_NAME, wct_gnc_url_type);
+      scm_c_define("gnc:url-type-vendor", tmp);
+      tmp = gw_wcp_assimilate_ptr(GNC_EMPLOYEE_MODULE_NAME, wct_gnc_url_type);
+      scm_c_define("gnc:url-type-employee", tmp);
+      tmp = gw_wcp_assimilate_ptr(GNC_INVOICE_MODULE_NAME, wct_gnc_url_type);
+      scm_c_define("gnc:url-type-invoice", tmp);
+      tmp = gw_wcp_assimilate_ptr(URL_TYPE_OWNERREPORT, wct_gnc_url_type);
+      scm_c_define("gnc:url-type-ownerreport", tmp);
+  }
+
+
   if (refcount == 0) {
     /* Register the Owner search type */
     gnc_search_core_register_type (GNC_OWNER_MODULE_NAME,