po2msg: ignore untranslated messages

diff --git a/po/po2msg.sh b/po/po2msg.sh
index 48a2669967c77980f7953c886203e5deee96289b..91d420b4fbda333856dba25e8b112d37e4a0eb0c 100644 (file)
--- a/po/po2msg.sh
+++ b/po/po2msg.sh
@@ -62,6 +62,9 @@ proc flush_msg {} {
        if {$msgid == ""} {
                set prefix "set ::msgcat::header"
        } else {
+               if {$msgstr == ""} {
+                       return
+               }
                set prefix "::msgcat::mcset $lang \"[u2a $msgid]\""
        }