* src/report/standard-report/transactions.scm: symbols are not

strings in guile-1.6.  Fixes debian bug #186004.
	* doc/gnucash.1.in: it's --add-price-quotes (not quote)
	* src/app-utils/date-utilities.scm: fix "WeekDelta" and add
	  TwoWeekDelta.  Fixes debian #185860.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@8184 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Derek Atkins 2003-04-05 04:18:21 +00:00
parent 20b18eff5c
commit b4edce8281
4 changed files with 13 additions and 4 deletions

View File

@ -1,3 +1,11 @@
2003-04-04 Derek Atkins <derek@ihtfp.com>
* src/report/standard-report/transactions.scm: symbols are not
strings in guile-1.6. Fixes debian bug #186004.
* doc/gnucash.1.in: it's --add-price-quotes (not quote)
* src/app-utils/date-utilities.scm: fix "WeekDelta" and add
TwoWeekDelta. Fixes debian #185860.
2003-04-03 Derek Atkins <derek@ihtfp.com>
* src/scm/main.scm: guile-1.6 requires empty lists to be quoted

View File

@ -47,7 +47,7 @@ Set the search path for documentation files
Evaluate the guile command
.IP --load FILE
Load the given .scm file
.IP --add-price-quote FILE
.IP --add-price-quotes FILE
Add price quotes to the given data file
.IP --load-user-config
Load the user configuration

View File

@ -299,7 +299,8 @@
(define deltalist
(list (cons 'SecDelta SecDelta)
(cons 'DayDelta DayDelta)
(cons 'WeejDelta WeekDelta)
(cons 'WeekDelta WeekDelta)
(cons 'TwoWeekDelta TwoWeekDelta)
(cons 'MonthDelta MonthDelta)
(cons 'QuarterDelta QuarterDelta)
(cons 'HalfYearDelta HalfYearDelta)

View File

@ -1142,7 +1142,7 @@ Credit Card, and Income accounts")))))
;;This should probably a cond or a case to allow for different filter types.
;;(gnc:warn "Filter Mode: " filter-mode)
(if (string=? filter-mode "include")
(if (eq? filter-mode 'include)
(begin
;;(gnc:warn "Including Filter Accounts")
(set! splits (filter (lambda (split)
@ -1151,7 +1151,7 @@ Credit Card, and Income accounts")))))
)
)
(if (string=? filter-mode "exclude")
(if (eq? filter-mode 'exclude)
(begin
;;(gnc:warn "Excluding Filter Accounts")
(set! splits (filter (lambda (split)