blob: c4a3732fb681b3059f937427403aef41ca68b49d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#| Example for use of GNU gettext.
Copyright (C) 2003 Free Software Foundation, Inc.
This file is in the public domain.
Source code of the librep program.
|#
(require 'rep.i18n.gettext)
(textdomain "hello-librep")
(bindtextdomain "hello-librep" "@localedir@")
(write standard-output (_ "Hello, world!"))
(write standard-output "\n")
(format standard-output (_ "This program is running as process number %d.")
(process-id))
(write standard-output "\n")
|
