i18n some strings.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7387 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Christian Stimming 2002-10-26 21:29:54 +00:00
parent 709fa7dfb5
commit c2db299e66

View File

@ -13,9 +13,9 @@
(use-modules (gnucash main)) ;for gnc:debug
(define main-window gnc:window-name-main)
(define top-level "_Business")
(define new-label "New")
(define find-label "Find")
(define top-level (N_ "_Business"))
(define new-label (N_ "New"))
(define find-label (N_ "Find"))
(define gnc:*business-label* (N_ "Business"))
(define gnc:*company-name* (N_ "Company Name"))
@ -25,10 +25,10 @@
(define (add-customer-items)
(let ((last-cust (gnc:owner-create))
(cust "Customers"))
(cust (N_ "Customers")))
(define customer-menu
(gnc:make-menu (N_ cust)
(gnc:make-menu cust
(list main-window top-level "")))
(define new-customer-item
@ -102,7 +102,7 @@
(define (add-vendor-items)
(let ((last-vendor (gnc:owner-create))
(vendor "Vendors"))
(vendor (N_ "Vendors")))
(define vendor-menu
(gnc:make-menu (N_ vendor)