patch to fancy stylesheet for footer image

Brian b_rose at shaw.ca
Sat Dec 18 10:57:06 EST 2004


Hi all,
Below is the diff output for a patch I created to 
insert a footer in an invoice. Hope, it is helpful.

Brian
------------
brian at peter:/usr/share/gnucash/guile-modules/gnucash/report$ 
diff -Nau stylesheet-fancy.scm 
stylesheet-fancy.scm_orig
--- stylesheet-fancy.scm        2004-12-18 
07:39:29.000000000 -0800
+++ stylesheet-fancy.scm_orig   2004-12-18 
07:31:41.000000000 -0800
@@ -68,14 +68,6 @@
        (N_ "Images")
        (N_ "Heading Banner") "b" (N_ "Banner for 
top of report.")
        ""))
-
-;;; Brian: added option to use footer image as well.
-    (opt-register
-     (gnc:make-pixmap-option
-      (N_ "Images")
-      (N_ "Footer Banner") "f" (N_ "Banner for 
bottom of report.")
-      ""))
-
      (opt-register
       (gnc:make-pixmap-option
        (N_ "Images")
@@ -191,10 +183,6 @@
                                        (N_ "Grand 
Total Cell Color")))
          (bgpixmap (opt-val (N_ "Images") (N_ 
"Background Tile")))
          (headpixmap (opt-val (N_ "Images") (N_ 
"Heading Banner")))
-
-;;; Brian: added footer
-        (footpixmap (opt-val (N_ "Images") (N_ 
"Footer Banner")))
-
          (logopixmap (opt-val (N_ "Images") (N_ 
"Logo")))
          (spacing (opt-val (N_ "Tables") (N_ 
"Table cell spacing")))
          (padding (opt-val (N_ "Tables") (N_ 
"Table cell padding")))
@@ -310,12 +298,6 @@
         t 0 1
         (gnc:make-html-text
         (gnc:html-markup-img headpixmap)))
-
-;;; Brian: added footer
-      (gnc:html-table-set-cell!
-       t 3 1
-       (gnc:make-html-text
-       (gnc:html-markup-img footpixmap)))

        (apply
         gnc:html-table-set-cell!
brian at peter:/usr/share/gnucash/guile-modules/gnucash/report$
--
Contagious Design!
web . design . linux software . photo

Brian Rose .  programmer
Stacey Rose . designer
(604)-588-8827 . b_roseATshawDOTca



More information about the gnucash-user mailing list