is personal and small-business financial-accounting software.
| report-menus.scm (gnucash-5.0.tar.bz2) | : | report-menus.scm (gnucash-5.1.tar.bz2) |
|---|
| | |
| skipping to change at line 55 | | skipping to change at line 55 |
|---|
| (lambda (report-guid template) | | (lambda (report-guid template) |
| (let ((name (or (gnc:report-template-menu-name template) | | (let ((name (or (gnc:report-template-menu-name template) |
| (gnc:report-template-name template)))) | | (gnc:report-template-name template)))) |
| (set! *template-items* (cons (cons name template) *template-items*))))) | | (set! *template-items* (cons (cons name template) *template-items*))))) |
| | |
| (for-each | | (for-each |
| (lambda (item) | | (lambda (item) |
| (let* ((menu-name (car item)) | | (let* ((menu-name (car item)) |
| (template (cdr item)) | | (template (cdr item)) |
| (report-guid (gnc:report-template-report-guid template)) | | (report-guid (gnc:report-template-report-guid template)) |
|
| (menu-tip (or (gnc:report-template-menu-tip template) | | (menu-tip (or (let ((t (gnc:report-template-menu-tip template))) (an
d t (G_ t))) |
| (format #f (G_ "Display the ~a report") (G_ menu-name)
))) | | (format #f (G_ "Display the ~a report") (G_ menu-name)
))) |
| (menu-path (append (list gnc:menuname-reports) | | (menu-path (append (list gnc:menuname-reports) |
| (or (gnc:report-template-menu-path template) | | (or (gnc:report-template-menu-path template) |
| '())))) | | '())))) |
| (gnc-add-scm-extension | | (gnc-add-scm-extension |
| (gnc:make-menu-item | | (gnc:make-menu-item |
| menu-name report-guid menu-tip menu-path | | menu-name report-guid menu-tip menu-path |
| (lambda (window) | | (lambda (window) |
| (gnc-main-window-open-report | | (gnc-main-window-open-report |
| (gnc:make-report report-guid) window)))))) | | (gnc:make-report report-guid) window)))))) |
| | |
| skipping to change at line 91 | | skipping to change at line 91 |
|---|
| (gnc:make-menu gnc:menuname-multicolumn (list gnc:menuname-reports))) | | (gnc:make-menu gnc:menuname-multicolumn (list gnc:menuname-reports))) |
| (define tax-menu | | (define tax-menu |
| (gnc:make-menu gnc:menuname-taxes (list gnc:menuname-reports))) | | (gnc:make-menu gnc:menuname-taxes (list gnc:menuname-reports))) |
| (define business-menu | | (define business-menu |
| (gnc:make-menu gnc:menuname-business-reports (list gnc:menuname-reports))) | | (gnc:make-menu gnc:menuname-business-reports (list gnc:menuname-reports))) |
| | |
| (gnc-add-scm-extension | | (gnc-add-scm-extension |
| (gnc:make-menu-item | | (gnc:make-menu-item |
| (N_ "Saved Report Configurations") | | (N_ "Saved Report Configurations") |
| "4d3dcdc8890b11df99dd94cddfd72085" | | "4d3dcdc8890b11df99dd94cddfd72085" |
|
| (N_ "Manage and run saved report configurations") | | (G_ "Manage and run saved report configurations") |
| (list "Reports/ZSavedReportConfigs") ;; Added Z so it is last in list | | (list "Reports/ZSavedReportConfigs") ;; Added Z so it is last in list |
| (lambda (window) | | (lambda (window) |
| (gnc:debug "called into custom report dialog, window is " window) | | (gnc:debug "called into custom report dialog, window is " window) |
| (gnc-ui-custom-report window)))) | | (gnc-ui-custom-report window)))) |
| | |
| ;; (gnc-add-scm-extension tax-menu) | | ;; (gnc-add-scm-extension tax-menu) |
| (gnc-add-scm-extension income-expense-menu) | | (gnc-add-scm-extension income-expense-menu) |
| (gnc-add-scm-extension asset-liability-menu) | | (gnc-add-scm-extension asset-liability-menu) |
| (gnc-add-scm-extension budget-menu) | | (gnc-add-scm-extension budget-menu) |
| (gnc-add-scm-extension example-menu) | | (gnc-add-scm-extension example-menu) |
| | |
| skipping to change at line 117 | | skipping to change at line 117 |
|---|
| (gnc-hook-run HOOK-REPORT '()) | | (gnc-hook-run HOOK-REPORT '()) |
| | |
| ;; push reports (new items added on top of menu) | | ;; push reports (new items added on top of menu) |
| (gnc:add-report-template-menu-items) | | (gnc:add-report-template-menu-items) |
| | |
| ;; the dashboard report | | ;; the dashboard report |
| (gnc-add-scm-extension | | (gnc-add-scm-extension |
| (gnc:make-menu-item | | (gnc:make-menu-item |
| (N_ "Dashboard") | | (N_ "Dashboard") |
| "ad80271c890b11dfa79f2dcedfd72085" | | "ad80271c890b11dfa79f2dcedfd72085" |
|
| (N_ "A basic dashboard for your accounting data") | | (G_ "A basic dashboard for your accounting data") |
| (list gnc:menuname-reports gnc:menuname-multicolumn) | | (list gnc:menuname-reports gnc:menuname-multicolumn) |
| (lambda (window) | | (lambda (window) |
| (gnc-main-window-open-report (gnc:make-dashboard) window))))) | | (gnc-main-window-open-report (gnc:make-dashboard) window))))) |
| | | |
| End of changes. 3 change blocks. |
|---|
| 3 lines changed or deleted | | 3 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 