aboutsummaryrefslogtreecommitdiff
path: root/ellinika
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2008-06-21 22:37:28 +0000
committerSergey Poznyakoff <gray@gnu.org.ua>2008-06-21 22:37:28 +0000
commit64af4748a2cae68c7ff4aa48d3dc7c93a2d469f6 (patch)
treead814d2b70fd119e3c6bfbe9557d454b8bb05e63 /ellinika
parent0b6c4fa6b8ed26f71695e4f3e55bbc561e0e0f0f (diff)
downloadellinika-64af4748a2cae68c7ff4aa48d3dc7c93a2d469f6.tar.gz
ellinika-64af4748a2cae68c7ff4aa48d3dc7c93a2d469f6.tar.bz2
* ellinika/i18n.scm (_): New syntax.
* cgi-bin/dict.scm4 (gamma gettext): Remove. Use (ellinika i18n). * data/pl/setup.xml: Fix copy-n-paste error. git-svn-id: file:///home/puszcza/svnroot/ellinika/trunk@524 941c8c0f-9102-463b-b60b-cd22ce0e6858
Diffstat (limited to 'ellinika')
-rw-r--r--ellinika/i18n.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/ellinika/i18n.scm b/ellinika/i18n.scm
index 4031254..474c8c9 100644
--- a/ellinika/i18n.scm
+++ b/ellinika/i18n.scm
@@ -15,9 +15,14 @@
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>.
(define-module (ellinika i18n)
+ #:use-syntax (ice-9 syncase)
+ #:export-syntax (_)
#:export (locale-setup))
-(use-modules (gamma gettext))
+(define-syntax _
+ (syntax-rules ()
+ ((_ msg) (gettext msg))))
+
;;; ISO 639 language code => ISO 3166 country code
;;; The corresponding country codes where selected using the following

Return to:

Send suggestions and report system problems to the System administrator.