2002-07-28 Christian Stimming <stimming@tuhh.de>

* src/scm/main.scm: Add module-load for HBCI.

	* src/import-export/hbci/*: Thanks to Benoit Gregoire, the initial
	HBCI druid is at least visible now. Still no code that would
	really do anything, though.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7128 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Christian Stimming 2002-07-28 21:15:39 +00:00
parent 21ba05c0de
commit 4c17c7e2dd
5 changed files with 16 additions and 12 deletions

View File

@ -1,3 +1,11 @@
2002-07-28 Christian Stimming <stimming@tuhh.de>
* src/scm/main.scm: Add module-load for HBCI.
* src/import-export/hbci/*: Thanks to Benoit Gregoire, the initial
HBCI druid is at least visible now. Still no code that would
really do anything, though.
2002-07-27 Christian Stimming <stimming@tuhh.de>
* configure.in: Add --enable-hbci configure option.

View File

@ -1,4 +1,4 @@
SUBDIRS = . binary-import qif-import ${OFX_DIR} test
SUBDIRS = . binary-import qif-import ${OFX_DIR} ${HBCI_DIR} test
pkglib_LTLIBRARIES=libgncmod-generic-import.la

View File

@ -61,10 +61,9 @@ gnc_module_init(int refcount) {
}
/* load the HBCI Scheme code */
if(gh_eval_str("(load-from-path \"hbci/hbci.scm\")") ==
SCM_BOOL_F) {
return FALSE;
}
gh_eval_str("(load-from-path \"hbci/hbci.scm\")");
printf("Load the HBCI initial druid\n");
gh_new_procedure("gnc:hbci-initial-setup",
scm_hbci_initial_druid, 0, 0, 0);

View File

@ -5,13 +5,9 @@
;; Copyright (c) 2002 Christian <Stimming@tuhh.de>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-module (gnucash import-export hbci))
(use-modules (gnucash main))
(define (add-hbci-menu-items)
(gnc:add-extension
(gnc:make-menu "HBCI" (list "_Tools" )))
(gnc:make-menu "HBCI" (list "_Tools" "")))
(gnc:add-extension
@ -19,11 +15,11 @@
(N_ "Initial HBCI Setup")
(list "_Tools" "HBCI" "")
(lambda ()
(gnc:hbci-initial-setup))))
(gnc:hbci-initial-setup)))))
;;(gnc:add-extension
;; (gnc:make-menu-item (N_ "Finish HBCI Setup")
;; (N_ "Finish HBCI Setup")
;; (list "_Tools" "HBCI" "")
;; (list "Tools" "HBCI" "")
;; (lambda ()
;; (gnc:hbci-finish-setup)))))

View File

@ -375,6 +375,7 @@ string and 'directories' must be a list of strings."
(gnc:module-load "gnucash/import-export/binary-import" 0)
(gnc:module-load "gnucash/import-export/qif-import" 0)
(gnc:module-load-optional "gnucash/import-export/ofx" 0)
(gnc:module-load-optional "gnucash/import-export/hbci" 0)
(gnc:module-load "gnucash/report/report-system" 0)
(gnc:module-load "gnucash/report/stylesheets" 0)
(gnc:module-load "gnucash/report/standard-reports" 0)