IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
* 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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ChangeLog
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> 2002-07-27 Christian Stimming <stimming@tuhh.de>
* configure.in: Add --enable-hbci configure option. * configure.in: Add --enable-hbci configure option.

2
src/import-export/Makefile.am
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 pkglib_LTLIBRARIES=libgncmod-generic-import.la

7
src/import-export/hbci/gncmod-hbci.c
View File

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

10
src/import-export/hbci/hbci.scm
View File

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

1
src/scm/main.scm
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/binary-import" 0)
(gnc:module-load "gnucash/import-export/qif-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/ofx" 0)
(gnc:module-load-optional "gnucash/import-export/hbci" 0)
(gnc:module-load "gnucash/report/report-system" 0) (gnc:module-load "gnucash/report/report-system" 0)
(gnc:module-load "gnucash/report/stylesheets" 0) (gnc:module-load "gnucash/report/stylesheets" 0)
(gnc:module-load "gnucash/report/standard-reports" 0) (gnc:module-load "gnucash/report/standard-reports" 0)