File gettext-po-mode.diff of Package gettext-runtime

Index: gettext-tools/misc/po-mode.el
===================================================================
--- gettext-tools/misc/po-mode.el.orig	2010-06-06 14:49:57.000000000 +0200
+++ gettext-tools/misc/po-mode.el	2010-12-20 18:47:11.963132483 +0100
@@ -1242,6 +1242,7 @@ all reachable through 'M-x customize', i
     ;; mode-line-format usually contains global-mode-string, but some
     ;; people customize this variable. As a last resort, append at the end.
     (let ((prev-entry (or (member 'global-mode-string mode-line-format)
+                          (member 'mode-line-position mode-line-format)
                           (member "   " mode-line-format)
                           (last mode-line-format))))
       (setcdr prev-entry (cons po-mode-line-entry (cdr prev-entry)))))