patch to fancy stylesheet for footer image

Brian b_rose at shaw.ca
Sat Dec 18 12:55:05 EST 2004


sorry, on the first try, I did the diff backwards 
as far as old vs. new files.

--- stylesheet-fancy.scm_orig   2004-12-18 
07:31:41.000000000 -0800
+++ stylesheet-fancy.scm        2004-12-18 
07:39:29.000000000 -0800
@@ -68,6 +68,14 @@
        (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")
@@ -183,6 +191,10 @@
                                        (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")))
@@ -298,6 +310,12 @@
         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!


-- 
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