mirror of https://github.com/Gnucash/gnucash
- store them in a subdirectory - reuse the report module loader - eliminate gncmod-stylesheet, gui bits are now in gnomepull/519/head
Geert Janssens
7 years ago
parent
93489d4ffc
commit
6b5dcc3877
@ -1,86 +0,0 @@
|
||||
/*********************************************************************
|
||||
* gncmod-stylesheets.c
|
||||
* module definition/initialization for the standard reports
|
||||
*
|
||||
* Copyright (c) 2001 Linux Developers Group, Inc.
|
||||
*********************************************************************/
|
||||
/********************************************************************\
|
||||
* This program is free software; you can redistribute it and/or *
|
||||
* modify it under the terms of the GNU General Public License as *
|
||||
* published by the Free Software Foundation; either version 2 of *
|
||||
* the License, or (at your option) any later version. *
|
||||
* *
|
||||
* This program is distributed in the hope that it will be useful, *
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
|
||||
* GNU General Public License for more details. *
|
||||
* *
|
||||
* You should have received a copy of the GNU General Public License*
|
||||
* along with this program; if not, contact: *
|
||||
* *
|
||||
* Free Software Foundation Voice: +1-617-542-5942 *
|
||||
* 51 Franklin Street, Fifth Floor Fax: +1-617-542-2652 *
|
||||
* Boston, MA 02110-1301, USA gnu@gnu.org *
|
||||
* *
|
||||
\********************************************************************/
|
||||
|
||||
|
||||
#include <config.h>
|
||||
|
||||
#include <gmodule.h>
|
||||
#include <libguile.h>
|
||||
|
||||
#include "gnc-module.h"
|
||||
#include "gnc-module-api.h"
|
||||
#include "gnc-plugin-stylesheets.h"
|
||||
|
||||
GNC_MODULE_API_DECL(libgncmod_stylesheets)
|
||||
|
||||
/* version of the gnc module system interface we require */
|
||||
int libgncmod_stylesheets_gnc_module_system_interface = 0;
|
||||
|
||||
/* module versioning uses libtool semantics. */
|
||||
int libgncmod_stylesheets_gnc_module_current = 0;
|
||||
int libgncmod_stylesheets_gnc_module_revision = 0;
|
||||
int libgncmod_stylesheets_gnc_module_age = 0;
|
||||
|
||||
|
||||
char *
|
||||
libgncmod_stylesheets_gnc_module_path(void)
|
||||
{
|
||||
return g_strdup("gnucash/report/stylesheets");
|
||||
}
|
||||
|
||||
char *
|
||||
libgncmod_stylesheets_gnc_module_description(void)
|
||||
{
|
||||
return g_strdup("Standard report stylesheet definitions");
|
||||
}
|
||||
|
||||
int
|
||||
libgncmod_stylesheets_gnc_module_init(int refcount)
|
||||
{
|
||||
/* load the report system */
|
||||
if (!gnc_module_load("gnucash/report", 0))
|
||||
{
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/* load the report generation scheme code */
|
||||
if (scm_c_eval_string("(use-modules (gnucash report stylesheets))") ==
|
||||
SCM_BOOL_F)
|
||||
{
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/* Add menu items with C callbacks */
|
||||
gnc_plugin_stylesheets_create_plugin();
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
int
|
||||
libgncmod_stylesheets_gnc_module_end(int refcount)
|
||||
{
|
||||
return TRUE;
|
||||
}
|
||||
@ -1,34 +0,0 @@
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; stylesheets.scm
|
||||
;; load the standard stylesheet definitions
|
||||
;;
|
||||
;; Copyright (c) 2001 Linux Developers Group, Inc.
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; This program is free software; you can redistribute it and/or
|
||||
;; modify it under the terms of the GNU General Public License as
|
||||
;; published by the Free Software Foundation; either version 2 of
|
||||
;; the License, or (at your option) any later version.
|
||||
;;
|
||||
;; This program is distributed in the hope that it will be useful,
|
||||
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
;; GNU General Public License for more details.
|
||||
;;
|
||||
;; You should have received a copy of the GNU General Public License
|
||||
;; along with this program; if not, contact:
|
||||
;;
|
||||
;; Free Software Foundation Voice: +1-617-542-5942
|
||||
;; 51 Franklin Street, Fifth Floor Fax: +1-617-542-2652
|
||||
;; Boston, MA 02110-1301, USA gnu@gnu.org
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
|
||||
(define-module (gnucash report stylesheets))
|
||||
|
||||
(use-modules (gnucash utilities))
|
||||
(use-modules (gnucash report stylesheet-plain))
|
||||
(use-modules (gnucash report stylesheet-fancy))
|
||||
(use-modules (gnucash report stylesheet-footer))
|
||||
(use-modules (gnucash report stylesheet-easy))
|
||||
(use-modules (gnucash report stylesheet-head-or-tail))
|
||||
@ -1,25 +0,0 @@
|
||||
set(GUILE_DEPENDS
|
||||
scm-test-core
|
||||
scm-gettext
|
||||
scm-core-utils
|
||||
scm-gnc-module
|
||||
scm-scm
|
||||
scm-engine
|
||||
gncmod-backend-xml
|
||||
scm-gnome-utils
|
||||
gncmod-html
|
||||
scm-report
|
||||
scm-gnome
|
||||
scm-report-stylesheets
|
||||
)
|
||||
|
||||
gnc_add_scheme_test_targets(scm-test-load-report-stylesheets-module
|
||||
"test-load-report-stylesheets-module.scm"
|
||||
"tests"
|
||||
"${GUILE_DEPENDS}"
|
||||
FALSE
|
||||
)
|
||||
|
||||
gnc_add_scheme_tests("test-load-report-stylesheets-module.scm")
|
||||
|
||||
set_dist_list(test_stylesheets_DIST CMakeLists.txt test-load-report-stylesheets-module.scm)
|
||||
@ -1,23 +0,0 @@
|
||||
(setenv "GNC_UNINSTALLED" "1")
|
||||
(display " testing stylesheet module load ... ")
|
||||
(use-modules (tests unittest-support))
|
||||
(define log-domain "gnc.report.core")
|
||||
(define check (new-TestErrorStruct))
|
||||
(define log-level (G-LOG-LEVEL-CRITICAL))
|
||||
(define msg "gnc_get_default_report_font_family: assertion `top_list != NULL' failed")
|
||||
(TestErrorStruct-log-domain-set check log-domain)
|
||||
(TestErrorStruct-log-level-set check log-level)
|
||||
(TestErrorStruct-msg-set check msg)
|
||||
(define handler (test-set-checked-handler log-domain log-level check))
|
||||
(use-modules (gnucash gnc-module))
|
||||
(gnc:module-system-init)
|
||||
|
||||
(if (gnc:module-load "gnucash/report/stylesheets" 0)
|
||||
(begin
|
||||
(g-log-remove-handler log-domain handler)
|
||||
(display "ok\n")
|
||||
(exit 0))
|
||||
(begin
|
||||
(g-log-remove-handler log-domain handler)
|
||||
(display "failed\n")
|
||||
(exit -1)))
|
||||
Loading…
Reference in new issue