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

Drop unused custom gettext macro

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@22667 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Geert Janssens 2012-12-18 10:25:28 +00:00
parent dc45370412
commit a158dab67b
2 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
intl-scm/xgettext.scm
View File

@ -42,8 +42,7 @@
(symbol? (car rest)) ; starting with a symbol
(string? (cadr rest)) ; and ending with a string
(or (eqv? '_ (car rest)) ; and the symbol is _
(eqv? 'N_ (car rest)) ; or N_
(eqv? 'gnc:_ (car rest)))) ; or gnc:_
(eqv? 'N_ (car rest)))) ; or N_
(write-string (cadr rest) out-port filename line-no)) ; then write it out
((pair? rest) ; otherwise, recurse

2
src/app-utils/app-utils.scm
View File

@ -27,7 +27,6 @@
;; c-interface.scm
(export gnc:error->string)
(export gnc:gettext)
(export gnc:_)
(export _)
(export-syntax N_)
(export gnc:make-string-database)
@ -276,7 +275,6 @@
;; gettext functions
(define gnc:gettext gnc-gettext-helper)
(define gnc:_ gnc:gettext)
(define _ gnc:gettext)
(define-syntax N_
(syntax-rules ()