[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: i18n, gettext support?
From: |
Kevin Ryde |
Subject: |
Re: i18n, gettext support? |
Date: |
Thu, 02 Sep 2004 09:31:39 +1000 |
User-agent: |
Gnus/5.110003 (No Gnus v0.3) Emacs/21.3 (gnu/linux) |
I removed this bit to ignore excess arguments, I think it's enough.
--- format.scm.~1.23.~ 2004-09-02 09:15:16.000000000 +1000
+++ format.scm 2004-09-02 09:27:37.000000000 +1000
@@ -194,10 +194,6 @@
(let ((arg-pos (format:format-work fmt args))
(arg-len (length args)))
(cond
- ((< arg-pos arg-len)
- (set! format:arg-pos (+ arg-pos 1))
- (set! format:pos (string-length fmt))
- (format:error "~a superfluous argument~:p" (- arg-len arg-pos)))
((> arg-pos arg-len)
(set! format:arg-pos (+ arg-len 1))
(display format:arg-pos)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Re: i18n, gettext support?,
Kevin Ryde <=