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

2001-05-01 Dave Peticolas <dave@krondo.com>

Browse Source 
* src/scm/report/stylesheet-plain.scm: fix i18n bugs

	* src/scm/report/stylesheet-fancy.scm: work on colors,
	fix i18n bugs

	* src/gnome/dialog-style-sheet.c: fix i18n bugs


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@4097 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas 2001-05-01 10:15:58 +00:00
parent efb07a072a
commit 73277fb3df
4 changed files with 55 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@ -1,5 +1,12 @@
2001-05-01 Dave Peticolas <dave@krondo.com>
* src/scm/report/stylesheet-plain.scm: fix i18n bugs
* src/scm/report/stylesheet-fancy.scm: work on colors,
fix i18n bugs
* src/gnome/dialog-style-sheet.c: fix i18n bugs
* src/gnome/window-acct-tree.c: add popup menu to account tree
* src/gnome/mainwindow-account-tree.c

13
src/gnome/dialog-style-sheet.c
View File

@ -21,11 +21,14 @@
* Boston, MA 02111-1307, USA gnu@gnu.org *
********************************************************************/
#include "config.h"
#include <gnome.h>
#include "dialog-style-sheet.h"
#include "dialog-options.h"
#include "glade-gnc-dialogs.h"
#include "messages.h"
StyleSheetDialog * gnc_style_sheet_dialog = NULL;
@ -103,7 +106,7 @@ gnc_style_sheet_dialog_fill(StyleSheetDialog * ss, SCM selected) {
struct ss_info * ssinfo = g_new0(struct ss_info, 1);
int this_row;
char * c_names[1];
char * c_name;
/* make the options DB and dialog, but don't parent it yet */
ssinfo->odialog = gnc_options_dialog_new(FALSE);
@ -123,8 +126,14 @@ gnc_style_sheet_dialog_fill(StyleSheetDialog * ss, SCM selected) {
ss);
/* add the column name */
c_names[0] = gh_scm2newstr(scm_name, NULL);
c_name = gh_scm2newstr(scm_name, NULL);
if (!c_name)
continue;
c_names[0] = _(c_name);
this_row = gtk_clist_append(GTK_CLIST(ss->list), c_names);
free (c_name);
gtk_clist_set_row_data_full(GTK_CLIST(ss->list), this_row,
(gpointer)ssinfo,
row_data_destroy_cb);

41
src/scm/report/stylesheet-fancy.scm
View File

@ -79,7 +79,7 @@
(gnc:make-color-option
(N_ "Colors")
(N_ "Background Color") "a" (N_ "General background color for report.")
(list #xff #x88 #xff 0)
(list #xff #xff #xff 0)
255 #f))
(opt-register
@ -93,14 +93,14 @@
(gnc:make-color-option
(N_ "Colors")
(N_ "Link Color") "c" (N_ "Link text color.")
(list #x00 #xff #xff 0)
(list #xb2 #x22 #x22 0)
255 #f))
(opt-register
(gnc:make-color-option
(N_ "Colors")
(N_ "Table Cell Color") "c" (N_ "Default background for table cells.")
(list #xff #x00 #xff 0)
(list #xff #xff #xff 0)
255 #f))
(opt-register
@ -108,7 +108,7 @@
(N_ "Colors")
(N_ "Alternate Table Cell Color") "d"
(N_ "Default alternate background for table cells.")
(list #x00 #x00 #x00 0)
(list #xff #xff #xff 0)
255 #f))
(opt-register
@ -116,7 +116,7 @@
(N_ "Colors")
(N_ "Subheading/Subtotal Cell Color") "e"
(N_ "Default color for subtotal rows.")
(list #x00 #x00 #x00 0)
(list #xee #xe8 #xaa 0)
255 #f))
(opt-register
@ -124,7 +124,7 @@
(N_ "Colors")
(N_ "Sub-subheading/total Cell Color") "f"
(N_ "Color for subsubtotals")
(list #x00 #x00 #x00 0)
(list #xfa #xfa #xd2 0)
255 #f))
(opt-register
@ -132,20 +132,21 @@
(N_ "Colors")
(N_ "Grand Total Cell Color") "g"
(N_ "Color for grand totals")
(list #x00 #x00 #x00 0)
(list #xff #xff #x00 0)
255 #f))
(opt-register
(gnc:make-number-range-option
(N_ "Tables")
(N_ "Table cell spacing") "a" (N_ "Space between table cells")
1 0 20 0 1))
(opt-register
(gnc:make-number-range-option
(N_ "Tables")
(N_ "Table cell padding") "b" (N_ "Space between table cells")
1 0 20 0 1))
(opt-register
(gnc:make-number-range-option
(N_ "Tables")
@ -171,9 +172,13 @@
(textcolor (color-val (N_ "Colors") (N_ "Text Color")))
(linkcolor (color-val (N_ "Colors") (N_ "Link Color")))
(normal-row-color (color-val (N_ "Colors") (N_ "Table Cell Color")))
(alternate-row-color (color-val (N_ "Colors") (N_ "Alternate Table Cell Color")))
(primary-subheading-color (color-val (N_ "Colors") (N_ "Subheading/Subtotal Cell Color")))
(secondary-subheading-color (color-val (N_ "Colors")
(alternate-row-color (color-val (N_ "Colors")
(N_ "Alternate Table Cell Color")))
(primary-subheading-color
(color-val (N_ "Colors")
(N_ "Subheading/Subtotal Cell Color")))
(secondary-subheading-color
(color-val (N_ "Colors")
(N_ "Sub-subheading/total Cell Color")))
(grand-total-color (color-val (N_ "Colors")
(N_ "Grand Total Cell Color")))
@ -233,8 +238,6 @@
'tag "td"
'attribute (list "align" "left"))
(gnc:html-document-set-style!
ssdoc "total-number-cell"
'tag '("td" "b")
@ -245,7 +248,6 @@
'tag '("td" "b")
'attribute (list "align" "left"))
;; don't surround marked-up links with <a> </a>
(if (not links?)
(gnc:html-document-set-style!
@ -267,13 +269,13 @@
(gnc:html-markup-b
(gnc:html-document-title doc))
(gnc:html-markup-br)
"Prepared by: "
(_ "Prepared by: ")
(gnc:html-markup-b preparer)
(gnc:html-markup-br)
"Prepared for: "
(_ "Prepared for: ")
(gnc:html-markup-b prepared-for)
(gnc:html-markup-br)
"Date: "
(_ "Date: ")
(gnc:timepair-to-datestring
(cons (current-time) 0)))
@ -302,9 +304,10 @@
(gnc:define-html-style-sheet
'version 1
'name "Fancy"
'name (N_ "Fancy")
'renderer fancy-renderer
'options-generator fancy-options)
#t)
(gnc:make-html-style-sheet "Fancy" "Technicolor")
(gnc:make-html-style-sheet "Fancy" (N_ "Technicolor"))

4
src/scm/report/stylesheet-plain.scm
View File

@ -166,9 +166,9 @@
(gnc:define-html-style-sheet
'version 1
'name "Plain"
'name (N_ "Plain")
'renderer plain-renderer
'options-generator plain-options))
;; instantiate a default style sheet
(gnc:make-html-style-sheet "Plain" "Default")
(gnc:make-html-style-sheet "Plain" (N_ "Default"))