Package: gettext-el
Version: 0.17-3
Severity: normal
Tags: patch

Hi,

po-previous-translated-entry (keybind: 'T') goes into an infinite loop
(unless the current previous entry is not a 'translated' one).  It is
because the function searches for a previous *untranslated* entry with a
regular expression and checks whether the entry is a translated one or
not.  Here I attach a patch to fix that bug.  Could you please apply
this patch?

A changelog entry describing the details is as follows:

2008-08-28  Noritada Kobayashi  <[EMAIL PROTECTED]>

        * po-mode.el: Fix po-previous-translated-entry going into an
        infinite loop.
        (po-previous-translated-entry): Search for a previous entry of
        every type in the while loop.  Previously, this function
        searched only for an untranslated entry and checked whether it
        is translated or not.

P.S. I'm happy if my previous three patches[1] are also checked when you
have time. ;-)
[1] http://lists.gnu.org/archive/html/bug-gnu-utils/2008-08/msg00019.html

Sincerely,

-nori


-- System Information:
Debian Release: 4.0
  APT prefers stable
  APT policy: (500, 'stable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18-6-686
Locale: LANG=ja_JP.eucJP, LC_CTYPE=ja_JP.eucJP (charmap=EUC-JP)

Versions of packages gettext-el depends on:
ii  emacs21 [emacsen]         21.4a+1-3etch1 The GNU Emacs editor
ii  gettext                   0.16.1-1       GNU Internationalization utilities
ii  xemacs21-mule-canna-wnn [ 21.4.19-2      highly customizable text editor --

gettext-el recommends no packages.

-- no debconf information
Index: gettext/gettext-tools/misc/po-mode.el
===================================================================
--- gettext.orig/gettext-tools/misc/po-mode.el  2008-08-29 00:11:38.000000000 
+0900
+++ gettext/gettext-tools/misc/po-mode.el       2008-08-29 00:11:55.000000000 
+0900
@@ -1780,7 +1780,7 @@
     (po-previous-entry-with-regexp po-any-msgstr-block-regexp t)
     (po-find-span-of-entry)
     (while (not (eq po-entry-type 'translated))
-      (po-previous-entry-with-regexp po-untranslated-regexp t)
+      (po-previous-entry-with-regexp po-any-msgstr-block-regexp t)
       (po-find-span-of-entry))))
 
 ;; Auto-selection feature.

Reply via email to